【成品源码】贴吧顶贴脚本源码分享
1发布于 2019-10-07
贴吧顶贴脚本源码分享 配置介绍: 模拟器:雷电模拟器 480*800 dpi 160 按键精灵手机助手 涉及的图片有两张: 注意事项:每次发布3-5条,之后时间间隔不低于20分钟,单账号一天不要发布太多,频率过快有可能封号,所以要注意操作频率。建议生成小精灵...
阅读(1342)赞 (0)
发布于 2019-10-07
贴吧顶贴脚本源码分享 配置介绍: 模拟器:雷电模拟器 480*800 dpi 160 按键精灵手机助手 涉及的图片有两张: 注意事项:每次发布3-5条,之后时间间隔不低于20分钟,单账号一天不要发布太多,频率过快有可能封号,所以要注意操作频率。建议生成小精灵...
阅读(1342)赞 (0)
发布于 2019-10-07
安卓按键精灵脚本命令-保存与读取脚本上次运行结果 Function 运行() Dim i,j,上次值="" '读书上次值 上次值=读取上次值() If 上次值 = "" Then j = 0 Else j=cint(上次值)+1 End If For i=j to 9 Trace...
阅读(1254)赞 (0)
发布于 2019-10-07
易语言教学答案-导入文本源码 .版本 2 .支持库 iext .子程序 _导入文本按钮_被单击 .局部变量 文件名, 文本型 .局部变量 文本一, 文本型, , "0" .局部变量 文本二, 文本型, , "0" .局部变量 索引, 整数型 .局部变量 i, 整数型 编辑框6.内...
阅读(1172)赞 (0)
发布于 2019-10-07
Function GetNetIP() Dim i, IP接口, IP GetNetIP = "" IP接口 = "http://1212.ip138.com/ic.asp|" &_ "http://pv.sohu.com/ci...
阅读(1166)赞 (0)
发布于 2019-10-07
Function 顺序UID() Dim lines,content,Row Row = file.linesnumber(用户路径) '计算用户路径总数 lines=File.Readline(用户关注记录, 1) '找到记录 If Row &...
阅读(943)赞 (0)
发布于 2019-10-07
//si为组合数组,成员数量不定 Dim si="|张三|小明|小明|小明|小明|小明|小明|张三|小黄|小黄|小黄|小红|小黄|张三|小红|小红|小红|小红" Dim 成员1="张三" Dim 成员2="小红" Dim 成员3="小黄" Dim 成员4="小明" //多成员要用...
阅读(1313)赞 (0)
发布于 2019-10-07
Function 获取总素材() Dim FileArr = ShanHai.ScanPathEx(总素材)'获取总素材的文件名 Dim Filenumber =UBound(FileArr)+1'获取总素材的总行数 For Each v In FileA...
阅读(959)赞 (4)
发布于 2019-09-24
Function 复制图片(n) dim 总行 = file.linesnumber(总数目) '总数目 dim 行 = File.Read(记录)'发布记录 For n If CInt(行) < CInt(总行) Then ...
阅读(1307)赞 (0)
发布于 2019-08-17
这个案例来自于VIP群友的问题,问我能不能把数字自动换成谐音字?看到这个问题我猜测是为了发联系方式,又怕平台检测到,所以用谐音字代替。 比方说,QQ:1131121634 可以写成企鹅:壹壹叄壹壹弍伊溜叁泗 通过这种谐音字的转换,平台检测不到多位纯数字,减少QQ被检测出来的可能性...
阅读(1378)赞 (0)
发布于 2018-12-22
有三个多选框 和三个脚本, 要单独对应该 如何做呢? 多选框 和脚本都有了 Function a UIP.SetAttribute "多选框2", {"选中":false} UIP.SetAttribute "多选框3", {"选中":false} End Function Fu...
阅读(1373)赞 (0)