安卓按键精灵-触屏划动(划动距离)滑动屏幕
发布于 2019-10-07
Sub 触屏划动(数组特征) Dim arr(),n arr=数组特征 n=Int(10*Rnd())'给划动操作增加些随机偏值 TouchDown arr(0)+n,arr(1)+n,1 TouchMove arr(2)+n,arr(3)+n,1 Delay 500 Touch...
阅读(1253)赞 (0)
发布于 2019-10-07
Sub 触屏划动(数组特征) Dim arr(),n arr=数组特征 n=Int(10*Rnd())'给划动操作增加些随机偏值 TouchDown arr(0)+n,arr(1)+n,1 TouchMove arr(2)+n,arr(3)+n,1 Delay 500 Touch...
阅读(1253)赞 (0)
发布于 2019-10-07
TAG标签输出有时为了判断或者其他,我们需要获取它的自增数字,织梦dede:tag默认标签没有自增标签,我们可以自己添加 打开 /include/taglib/tag.lib.php 找到 $ctp->LoadSource($InnerText); 在它下面加入 $GLOB...
阅读(811)赞 (0)
发布于 2019-10-07
本插件主要针对织梦dedecms5.7添加文章访问密码。使用方法如下: 1、下载插件后解压,把里面文件覆盖织梦系统对应文件,需要替换的文件文件如下: /dede/viewarcpwd.php /dede/article_add.php /dede/article_edit.php...
阅读(861)赞 (0)
发布于 2019-10-07
Import "shanhai.lua" Dim aa aa = ShanHai.GetUIXml() TracePrint aa Dim i i = UTF8.InStr(1, aa, "小姐姐") TracePrint i If i > 0 Then Trac...
阅读(895)赞 (0)
发布于 2019-10-07
//si为组合数组,成员数量不定 Dim si="|张三|小明|小明|小明|小明|小明|小明|张三|小黄|小黄|小黄|小红|小黄|张三|小红|小红|小红|小红" Dim 成员1="张三" Dim 成员2="小红" Dim 成员3="小黄" Dim 成员4="小明" //多成员要用...
阅读(1324)赞 (0)
发布于 2019-10-07
1、后台模型添加自定义字段,数据类型用单行文本(varchar),用来填要调用的相关文章的id 填多个文章id用英文逗号隔开,例如:3,5,6,8,9 2、在内容页模板里写dede:sql标签 {dede:sql sql="SELECT * ...
阅读(861)赞 (0)
发布于 2019-10-07
Function 顺序UID() Dim lines,content,Row Row = file.linesnumber(用户路径) '计算用户路径总数 lines=File.Readline(用户关注记录, 1) '找到记录 If Row &...
阅读(955)赞 (0)
发布于 2019-10-07
Function _Rnd(num) _Rnd = Int((num + 1) * Rnd()) End Function Function _Rnd_Name()'随机取姓名 Dim A = Array("贾", "赵", "萧","梁","胡","谢...
阅读(1174)赞 (0)
发布于 2019-10-07
/*-------------随机字母---------------*/ Function 随机字母() Dim zm="abcdefghijklmnopqrstuvwxyz" Dim sj,D,S Randomize For 4 ...
阅读(979)赞 (0)
发布于 2019-10-07
易语言教学代码片段-导出编辑框内容到TXT 办法1:自命名TXT导出路径 .版本 2 .子程序 _按钮_导出结果_被单击 .局部变量 文件号, 整数型 .如果真 (组合结果.内容 = “”) 信息框 (“结果为空?”, 0, “错误”, ) 返回 () .如果真结...
阅读(1185)赞 (0)