|
要采纳哦...
- 空间 下载所有连接
- 功能 readWeb(address)
- text = 网络.url读内容(address)
- 变量 返回值,返回值2,len1,len2,endvar
- 字符串.分割(text,"http://",返回值)
- 数组空间.大小(返回值,len1)
- for(i=0;i<len1;i++)
- 字符串.分割(返回值[i],".exe",返回值2)
- 数组空间.大小(返回值2,len2)
- for(ii=0;ii<len2;ii++)
- if(字符串.查找字符串(返回值2[ii],"<")<0 && 字符串.查找字符串(返回值2[ii],">")<0 && 字符串.查找字符串(返回值2[ii],",")<0)
- endvar = endvar&"\r\n"&"http://"&返回值2[ii]&".exe"
- endif
- endfor
- endfor
- help.messagebox(endvar)
- 功能结束
- 功能 开始_点击()
- 线程.开启("下载所有连接.readWeb","http://www.crsky.com/soft/15060.html")
-
- 功能结束
- 空间结束
复制代码 |

|