读取帐号列表问题！

那片叶子 · 发表于 2009-9-14 14:50:17

本帖最后由那片叶子于 2009-9-14 16:57 编辑

以这张图为示！
读取帐号列.ini内的帐号！

帐号为1行1行的读，在输入框内输入一个帐号，和帐号列表.ini内一样则继续，如ini里没有那帐号就退出！
请各位大大指点迷津！

afan · 发表于 2009-9-14 15:20:18

#Include <File.au3>
Dim $a, $inp = '读取输入框字符'
_FileReadToArray('帐号列表.ini', $a)
For $i = 1 to $a[0]
     If $a[$i] = $inp Then msgbox(0,0,0)
Next

那片叶子 · 发表于 2009-9-14 15:33:50

又是AFAN帮我解决！谢谢！救星啊！！！

请教下，
比如 http:\\www.***.com\12345.ini

如何获取那文件名 12345

afan · 发表于 2009-9-14 15:38:18

$a = 'http:\\www.***.com\12345.ini'
$a = stringregexp($a, '\\([^\\]+).ini', 3)
msgbox(0,0, '获取到的文件名：' & $a[0])

那片叶子 · 发表于 2009-9-14 15:42:12

这么快？看来我和你有缘啊！嘿嘿！

afan · 发表于 2009-9-14 15:42:46

可惜你是叶子不是花，呵呵

那片叶子 · 发表于 2009-9-14 15:44:11

想采花？

afan · 发表于 2009-9-14 15:44:43

采花大盗是也...

那片叶子 · 发表于 2009-9-14 15:47:10

我就多个问题好了！（趁你在！）

比如我在输入框输入 560 而http://www.***.com/ $D .ini
$D 不是560则退出，如果是则继续！

afan · 发表于 2009-9-14 15:51:22

Dim $inp = '读取输入框字符', $a = 'http:\\www.***.com\12345.ini'
$D = stringregexp($a, '\\([^\\]+).ini', 3)
If $inp <> $D then Exit
;以下代码继续

那片叶子 · 发表于 2009-9-14 15:53:31

得此贤者指导，勿半途而废啊！埋头去！

		自动登录	找回密码
密码			加入