|
楼主 |
发表于 2012-10-9 11:53:01
|
显示全部楼层
福建省南平市
我在线等啊,各位大侠帮帮忙吧。。
.版本 2
.支持库 EThread
.支持库 HtmlView
.程序集 窗口程序集1
.程序集变量 填表, 普通填表
.子程序 _按钮1_被单击
初始化 ()
填表.文本框_写内容 (“1”, 删首尾空 (账号1.内容))
填表.文本框_写内容 (“2”, 删首尾空 (账号1.内容))
填表.文本框_写内容 (“3”, 删首尾空 (密码1.内容))
填表.文本框_写内容 (“4”, 删首尾空 (密码1.内容))
填表.按钮_点击 (“1”)
.子程序 初始化
填表.初始化 (取窗口句柄 ())
.子程序 _按钮3_被单击
初始化 ()
填表.文本框_写内容 (“1”, 删首尾空 (姓名1.内容))
填表.文本框_写内容 (“2”, 删首尾空 (手机号码1.内容))
填表.文本框_写内容 (“3”, 删首尾空 (账号1.内容))
.子程序 __启动窗口_创建完毕
启动线程 (&子程序1, , )
.子程序 子程序1
.判断循环首 (真)
.如果真 (取小时 (取现行时间 ()) = 10)
刷新 ()
跳出循环 ()
.如果真结束
.判断循环尾 ()
.子程序 刷新
超文本浏览框1.地址 = “www.qzpfzc.com/bbs”
.子程序 _按钮2_被单击
超文本浏览框1.地址 = “www.qzpfzc.com/bbs”
这是源码 |
|