sqlserver用易语言多线程处理问题时遇到了问题求助

fengguanghui

两个查找一起按就出现问题了，有没有大佬帮忙看下哪里出了

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
线程句柄0	整数型
线程句柄1	整数型
线程句柄2	整数型
线程句柄3	整数型
线程句柄4	整数型

子程序名	返回值类型	公开	备 注
_按钮1_被单击

如果 (全局_数据库.连接SQLServer (“WIN-D2GV13L29T3”, “testsql”, “sa”, “123456”) ＝ 假)
信息框 (“数据库打开失败”, 0, , )
返回 ()

全局_记录集.置连接 (全局_数据库)
如果 (记录集1.打开 (“用户表”, #数据表名, ) ＝ 假)
信息框 (“打开表失败”, 0, , )
返回 ()

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

全局_数据库 ＝ 数据库连接1
全局_记录集 ＝ 记录集1

子程序名	返回值类型	公开	备 注
_按钮_清空列表框_被单击

超级列表框1.全部删除 ()
超级列表框2.全部删除 ()

子程序名	返回值类型	公开	备 注
_按钮3_被单击

如果 (全局_数据库.是否已连接 ＝ 真)
启动线程 (&子程序查询计次, 0, )
信息框 (“未打开数据库”, 0, , )

子程序名	返回值类型	公开	备 注
子程序查询计次1
参数名	类 型	参考	可空	数组	备 注
参数_标志	整数型

变量名	类 型	静态	数组	备 注
局部_记录数量	整数型
局部_循环次数	整数型
局部_计次	整数型
局部_ID	文本型
局部_用户名	文本型
局部_密码	文本型
局部_索引	整数型

局部_记录数量 ＝ 全局_记录集.记录数量
编辑框1.内容 ＝ 到文本 (局部_记录数量)
全局_记录集.到首记录 ()
全局_记录集.移到 (局部_记录数量 ÷ 5 × 参数_标志)
局部_循环次数 ＝ 局部_记录数量 ÷ 5
进度条1.最大位置 ＝ 局部_循环次数
计次循环首 (局部_循环次数, 局部_计次)
全局_记录集.读文本 (“ID”, 局部_ID)
全局_记录集.读文本 (“账号”, 局部_用户名)
全局_记录集.读文本 (“密码”, 局部_密码)
局部_索引 ＝ 超级列表框2.插入表项 (局部_记录数量 ÷ 5 × 参数_标志 ＋ 局部_计次, , , , , )
超级列表框2.置标题 (局部_索引, 0, 到文本 (到整数 (局部_ID)))
超级列表框2.置标题 (局部_索引, 1, 局部_用户名)
超级列表框2.置标题 (局部_索引, 2, 局部_密码)
全局_记录集.到下一条 ()
处理事件 ()
进度条1.位置 ＝ 局部_计次
计次循环尾 ()
进度条1.位置 ＝ 0

子程序名	返回值类型	公开	备 注
_按钮4_被单击

如果 (全局_数据库.是否已连接 ＝ 真)
启动线程 (&子程序查询计次1, 1, )
信息框 (“未打开数据库”, 0, , )

子程序名	返回值类型	公开	备 注
子程序查询计次
参数名	类 型	参考	可空	数组	备 注
参数_标志	整数型

变量名	类 型	静态	数组	备 注
局部_记录数量	整数型
局部_循环次数	整数型
局部_计次	整数型
局部_ID	文本型
局部_用户名	文本型
局部_密码	文本型
局部_索引	整数型

局部_记录数量 ＝ 全局_记录集.记录数量
编辑框1.内容 ＝ 到文本 (局部_记录数量)
全局_记录集.到首记录 ()
全局_记录集.移到 (局部_记录数量 ÷ 5 × 参数_标志)
局部_循环次数 ＝ 局部_记录数量 ÷ 5
进度条2.最大位置 ＝ 局部_循环次数
计次循环首 (局部_循环次数, 局部_计次)
全局_记录集.读文本 (“ID”, 局部_ID)
全局_记录集.读文本 (“账号”, 局部_用户名)
全局_记录集.读文本 (“密码”, 局部_密码)
局部_索引 ＝ 超级列表框1.插入表项 (局部_记录数量 ÷ 5 × 参数_标志 ＋ 局部_计次, , , , , )
超级列表框1.置标题 (局部_索引, 0, 到文本 (到整数 (局部_ID)))
超级列表框1.置标题 (局部_索引, 1, 局部_用户名)
超级列表框1.置标题 (局部_索引, 2, 局部_密码)
全局_记录集.到下一条 ()
处理事件 ()
进度条2.位置 ＝ 局部_计次
计次循环尾 ()
进度条2.位置 ＝ 0

i支持库列表	支持库注释
eDB	数据库操作支持库
iext	扩展界面支持库一
EThread	多线程支持库

.版本 2<br /> .支持库 eDB<br /> .支持库 iext<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 线程句柄0, 整数型<br /> .程序集变量 线程句柄1, 整数型<br /> .程序集变量 线程句柄2, 整数型<br /> .程序集变量 线程句柄3, 整数型<br /> .程序集变量 线程句柄4, 整数型<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .如果 (全局_数据库.连接SQLServer (“WIN-D2GV13L29T3”, “testsql”, “sa”, “123456”) ＝ 假)<br />     信息框 (“数据库打开失败”, 0, , )<br />     返回 ()<br /> <br /> <br /> .否则<br />     全局_记录集.置连接 (全局_数据库)<br />     .如果 (记录集1.打开 (“用户表”, #数据表名, ) ＝ 假)<br />         信息框 (“打开表失败”, 0, , )<br />         返回 ()<br /> <br />     .否则<br /> <br />     .如果结束<br /> <br /> .如果结束<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 全局_数据库 ＝ 数据库连接1<br /> 全局_记录集 ＝ 记录集1<br /> <br /> .子程序 _按钮_清空列表框_被单击<br /> <br /> 超级列表框1.全部删除 ()<br /> 超级列表框2.全部删除 ()<br /> <br /> .子程序 _按钮3_被单击<br /> <br /> .如果 (全局_数据库.是否已连接 ＝ 真)<br />     启动线程 (&子程序查询计次, 0, )<br /> .否则<br />     信息框 (“未打开数据库”, 0, , )<br /> .如果结束<br /> <br /> <br /> <br /> <br /> .子程序 子程序查询计次1<br /> .参数 参数_标志, 整数型<br /> .局部变量 局部_记录数量, 整数型<br /> .局部变量 局部_循环次数, 整数型<br /> .局部变量 局部_计次, 整数型<br /> .局部变量 局部_ID, 文本型<br /> .局部变量 局部_用户名, 文本型<br /> .局部变量 局部_密码, 文本型<br /> .局部变量 局部_索引, 整数型<br /> <br /> 局部_记录数量 ＝ 全局_记录集.记录数量<br /> 编辑框1.内容 ＝ 到文本 (局部_记录数量)<br /> 全局_记录集.到首记录 ()<br /> 全局_记录集.移到 (局部_记录数量 ÷ 5 × 参数_标志)<br /> 局部_循环次数 ＝ 局部_记录数量 ÷ 5<br /> 进度条1.最大位置 ＝ 局部_循环次数<br /> .计次循环首 (局部_循环次数, 局部_计次)<br />     全局_记录集.读文本 (“ID”, 局部_ID)<br />     全局_记录集.读文本 (“账号”, 局部_用户名)<br />     全局_记录集.读文本 (“密码”, 局部_密码)<br />     局部_索引 ＝ 超级列表框2.插入表项 (局部_记录数量 ÷ 5 × 参数_标志 ＋ 局部_计次, , , , , )<br />     超级列表框2.置标题 (局部_索引, 0, 到文本 (到整数 (局部_ID)))<br />     超级列表框2.置标题 (局部_索引, 1, 局部_用户名)<br />     超级列表框2.置标题 (局部_索引, 2, 局部_密码)<br />     全局_记录集.到下一条 ()<br />     处理事件 ()<br />     进度条1.位置 ＝ 局部_计次<br /> .计次循环尾 ()<br /> 进度条1.位置 ＝ 0<br /> <br /> .子程序 _按钮4_被单击<br /> <br /> <br /> .如果 (全局_数据库.是否已连接 ＝ 真)<br />     启动线程 (&子程序查询计次1, 1, )<br /> .否则<br />     信息框 (“未打开数据库”, 0, , )<br /> .如果结束<br /> <br /> <br /> <br /> .子程序 子程序查询计次<br /> .参数 参数_标志, 整数型<br /> .局部变量 局部_记录数量, 整数型<br /> .局部变量 局部_循环次数, 整数型<br /> .局部变量 局部_计次, 整数型<br /> .局部变量 局部_ID, 文本型<br /> .局部变量 局部_用户名, 文本型<br /> .局部变量 局部_密码, 文本型<br /> .局部变量 局部_索引, 整数型<br /> <br /> 局部_记录数量 ＝ 全局_记录集.记录数量<br /> 编辑框1.内容 ＝ 到文本 (局部_记录数量)<br /> 全局_记录集.到首记录 ()<br /> 全局_记录集.移到 (局部_记录数量 ÷ 5 × 参数_标志)<br /> 局部_循环次数 ＝ 局部_记录数量 ÷ 5<br /> 进度条2.最大位置 ＝ 局部_循环次数<br /> .计次循环首 (局部_循环次数, 局部_计次)<br />     全局_记录集.读文本 (“ID”, 局部_ID)<br />     全局_记录集.读文本 (“账号”, 局部_用户名)<br />     全局_记录集.读文本 (“密码”, 局部_密码)<br />     局部_索引 ＝ 超级列表框1.插入表项 (局部_记录数量 ÷ 5 × 参数_标志 ＋ 局部_计次, , , , , )<br />     超级列表框1.置标题 (局部_索引, 0, 到文本 (到整数 (局部_ID)))<br />     超级列表框1.置标题 (局部_索引, 1, 局部_用户名)<br />     超级列表框1.置标题 (局部_索引, 2, 局部_密码)<br />     全局_记录集.到下一条 ()<br />     处理事件 ()<br />     进度条2.位置 ＝ 局部_计次<br /> .计次循环尾 ()<br /> 进度条2.位置 ＝ 0

问题

陈云135

厉害，大神的操写作动作  学习一下

wuyanqing187

感谢分享，很给力！~

zxxiaopi

感谢分享

xdwtdcq

解决易语言多线程出错的问题

最近在给客户写软件,发现我这边一直没有发现出错的问题,但是客户的软件一运行多线程就出错,一直找不到问题,找了好久才找到解决方法,原来是CPU的问题,多线程对于双核CPU亲和性上有问题,现在找到问题的解决方法,顺便记录一下,或许有朋友遇到同样的问题,可以一起参考.

DLL命令:
.版本 2

.DLL命令 SetProcessAffinityMask, 整数型, , , 公开, 设置CPU亲和性 进程句柄 返回CPU号
.参数 hProcess, 整数型
.参数 hProcess, 整数型

.DLL命令 SetThreadAffinityMask, 整数型, , , 公开, 设置CPU亲和性 线程句柄
.参数 hProcess, 整数型
.参数 Mask, 整数型

.DLL命令 GetCurrentProcess, 整数型, , , 公开, 获取当前进程的一个伪句柄 一般是-1

.DLL命令 GetCurrentThread, 整数型, , , 公开, 获取当前线程的一个伪句柄 一般是-2

将以下代码放到易代码开始即可:
SetProcessAffinityMask (-1, 1)
以上就是解决问题的全部内容

linchen12306

最近也在搞数据库方面的，互相交流下

zwh8698

我中间用接口处理的。服务器挂个接口。
接口 处理数据
易语言调用 网页_访问(接口Api)
稳定的一批