e语言-QQ聊天记录管理易语言

时间:2022-09-12 06:20:39
【文件属性】:

文件名称:e语言-QQ聊天记录管理易语言

文件大小:48KB

文件格式:RAR

更新时间:2022-09-12 06:20:39

易语言

QQ聊天记录管理易语言源码.版本 2 .支持库 xplib .支持库 iext .支持库 spec .子程序 __启动窗口_创建完毕 XP风格 (1) xc = _启动窗口.高度 - 外形框1.高度 qq = “609759007” 昵称aa = “樱桃小丸子” ttxxx = “18” 标签2.标题 = “ ” + qq + “(” + 昵称aa + “)” hh = 0 外部数据库1.打开MDB数据库 (取运行目录 () + “\db2.mdb”, , , , ) jb = 外部数据库1.查询 (“select * from fzb”) 外部数据库1.到首记录 (jb) .判断循环首 (外部数据库1.尾记录后 (jb) = 假)     xrx = 0     hh = 树型框1.加入项目 (0, 外部数据库1.读 (jb, 2), 16, 17, )     调试输出 (hh)     jb2 = 外部数据库1.查询 (“select * from hyb where fz='\u201d\u00a0\uff0b\u00a0\u5916\u90e8\u6570\u636e\u5e931.\u8bfb\u00a0(jb,\u00a02)\u00a0\uff0b\u00a0\u201c'”)     外部数据库1.到首记录 (jb2)     .判断循环首 (外部数据库1.尾记录后 (jb2) = 假)         树型框1.加入项目 (hh, 外部数据库1.读 (jb2, “nc”) + “(” + 外部数据库1.读 (jb2, “hm”) + “)”, 外部数据库1.读 (jb2, “tx”), , )         xrx = xrx + 1         外部数据库1.到后一记录 (jb2)     .判断循环尾 ()     树型框1.置项目文本 (hh, 树型框1.取项目文本 (hh) + “(” + 到文本 (xrx) + “)”)     外部数据库1.关闭记录集 (jb2)     外部数据库1.到后一记录 (jb) .判断循环尾 () 外部数据库1.关闭记录集 (jb)


网友评论