易语言的MYSQL数据库 *** 作。

用循环读取后面的记录：

计次循环首 (取记录集行数 (记录集句柄), 计次)

读字段值 (记录集句柄, “在线用户”, 账号ID)

调试输出 (账号ID)

到下一行 (记录集句柄)

计次循环尾 ()

.版本 2

.子程序 判断文本重复次数

.参数 文件名, 文本型, , 包括目录

.参数 欲判断的文本, 文本型

.局部变量 TXT文件内容, 文本型

.局部变量 i, 整数型

TXT文件内容 ＝ 到文本 (读入文件 (文件名))

.判断循环首 (寻找文本 (TXT文件内容, 欲判断的文本, , 假) ≠ -1)

TXT文件内容 ＝ 文本替换 (TXT文件内容, 寻找文本 (TXT文件内容, 欲判断的文本, , 假), 6, “”)

i ＝ i ＋ 1

.判断循环尾 ()

.如果 (i ＞ 3)

子程序2 ()

.否则

子程序3 ()

.如果结束

.子程序 子程序2

信息框 (“出现次数 >3 执行子程序2”, 0, “提示”)

.子程序 子程序3

信息框 (“出现次数 <3 执行子程序3”, 0, “提示”)

.子程序 _按钮1_被单击

判断文本重复次数 (“D:\1.txt”, “123456”)

.版本

2

.支持库

mysql

.局部变量

记录集,

整数型

.局部变量

a1,

文本型

.局部变量

a2,

文本型

记录集

＝

查找记录

(MySql句柄,

“b_1”,

“a1”,

,

)

读字段值

(记录集,

“a1”,

a1)

.判断开始

(user

＝

a1)

返回

(真)

.默认

记录集

＝

查找记录

(MySql句柄,

“b_2”,

“a2”,

,

)

读字段值

(记录集,

“a2”,

a2)

.判断开始

(password

＝

a2)

返回

(真)

.默认

更新记录

(MySql句柄,

“b_2”,

“a2”,

“132515”)

---