signed 发表于 2011-5-22 17:32:01

读取文本内容并判断执行

本帖最后由 signed 于 2011-5-22 17:34 编辑

1.判断
2.检测Http://www.baidu.com/1.txt 是否有10.10.10.1这个IP
3.如果有
4.继续执行程序
5.如果没有 程序自动退出并且删除自身！



-------------------------------------------------
程序中产生任何文件都必须自删除...
希望高手把AU3代码发上来...主要是为了防止程序被复制使用~
谢谢~~
1.txt 有多个IPip格式为每行一个IP

cxlater 发表于 2011-5-22 20:07:40


#include <INet.au3>
Global $ip = "127.0.0.1"
$dText = _INetGetSource ("Http://www.baidu.com/1.txt")
If StringInStr($dText ,$ip) Then main()
Func main()
        ...
EndFunc


没有测试

signed 发表于 2011-5-24 19:50:54

回复 2# cxlater


    如果要获取外网IP呢？

papapa314 发表于 2011-5-24 20:00:11

希望高手把AU3代码发上来...

呵呵，又是个伸手要源码的

cxlater 发表于 2011-5-25 00:10:31

回复 3# signed


    不生成临时文件

signed 发表于 2011-5-25 18:10:29

回复 4# papapa314


    我也懂AU3只是还没有学到这个境界 现在又要用 你敢保证你没有用过人家源码
页: [1]
查看完整版本: 读取文本内容并判断执行