作者 | 主题 |
---|---|
rission 侠圣 经验值:4545 发帖数:221 精华帖:2 |
楼主 2015-12-31 15:20:08
主题:【分享】VB脚本分享-ADO连接数据库实例 参考如下脚本的步骤可查询数据库 LMName = HMIRuntime.Tags ("@LocalMachineName").Read IGCStr="Provider=SQLOLEDB.1;Password=1234567890;Persist Set IGCcom=CreateObject("ADODB.Connection") IGCcom.open IGCStr
Set IGCRS = CreateObject("ADODB.Recordset") Dim IGCsql IGCsql = "SELECT * FROM " & CStr(HMIRuntime.Tags ("lastInListName").Read) IGCRS.Open IGCsql,IGCcom
涓涓不塞,将为江河!
|