Board logo

标题: [问题求助] VBS ADO对象查询SQL2000 [打印本页]
作者: czjt1234    时间: 2016-5-18 10:51     标题: VBS ADO对象查询SQL2000

  1. Set oAdoConn = CreateObject("Adodb.Connection")

  2. oAdoConn.Open "Provider=SQLOLEDB;server=192.168.0.254;Database=local;uid=NetCafe;pwd=123456;"

  3. 

  4. Set oAdoRecs = CreateObject("Adodb.Recordset")

  5. 

  6. oAdoRecs.Open "SELECT ClientID FROM cur_useraccount ORDER BY ClientID", oAdoConn, 3, 1

  7. 'ClientID字段的值是 001 ~ 124

  8. 

  9. s = "在线机器列表：|"

  10. Do Until oAdoRecs.EOF = True

  11.     s = s & oAdoRecs("ClientID").Value & "|"

  12.     oAdoRecs.MoveNext()

  13. Loop

  14. 

  15. oAdoRecs.Close()
复制代码
现在我想每秒一次查询 在线机器列表
如果用Do ... Loop 的话，会不会占用系统资源过多？
这种反复查询的语句，怎么样能占用系统资源少？

还有是否可以在SQL查询时，就对比出减少的机器和增加的机器？
现在是得到s后，再进行字符串处理
作者: zz100001    时间: 2016-5-24 15:21

你不关闭数据库连接，只是重复查，不会占很多资源。
要想对比，SQLServer不支持Flashback，你可以找找替代方法，
比如上次结果放到中间表查的时候直接关联，
或者存放到程序运行时一个Scripting.Dictionary里，获取结果集的时候就对比。



欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2