以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85403)

--  作者:9602084
--  发布时间:2016/5/25 10:12:00
--  [求助]
网络条件下简单编号速度好慢呀,101个编号,用时23.58秒

Dim st As Date = Date.now
For i As Integer = 0 To 100
Dim msg As String = "##104044##"
msg = QQClient.SendWait(msg,5)
\'output.show(msg)
Next
output.show(Format((Date.now -st).Totalseconds,"0.0000"))

能不能再快些?

--  作者:大红袍
--  发布时间:2016/5/25 10:14:00
--  

 你有必要一次性增加这么多个编号吗?

 

 你可以在服务器写一个方法,一次性返回一连串编号啊。


--  作者:9602084
--  发布时间:2016/5/25 10:36:00
--  
单位有几千人,用四角号码编号法对人事档案进行编号,需要批量处理。
--  作者:大红袍
--  发布时间:2016/5/25 10:38:00
--  
 写个方法,比如需要100个号码,就传递100过去,服务器返回连续的号码即可啊。
--  作者:9602084
--  发布时间:2016/5/25 10:49:00
--  
我要的不是连续号码。按照四角号码编号法,对人员姓名进行编码,因为汉字结构,这个编码会出生重码,为了区别,编码后再加一个顺序号。当有人调走后,该人员的档案编号就空缺出来了,当有新人进来,且其姓名编码正好与调走人员姓名编码一样,那么新进人员的顺序号就用调走人员的顺序号。
上面的任务已经能实现,编码在本机完成,顺序号需要服务完成,防止编号重复。
就是当批量进人的时候,批量编码太费时了。

--  作者:大红袍
--  发布时间:2016/5/25 10:56:00
--  

 你就不能做个批量的方法?耗时是在连接的次数那里啊。

 

 你把所有需要的东西传给服务器,然后服务器把处理结果传回,你获取后分割字符串啊。