vbs读取Access数据库

精

奖

官

6135 产品版区：WinCC基本系统

文档类型：问题类别：产品选型问题类别：产品使用问题类别：故障诊断

我编写了vbs脚本读取Access数据库，代码如下：Dim path,ssql,cnn,rst,a,b
set cnn=WScript.CreateObject("ADODB.Connection")
set rst=WScript.CreateObject("adodb.recordset")
path="d:\student.mdb"
cnn.connectionstring="driver={Microsoft Access Driver (*.mdb)};dbq=" &path

cnn.open
ssql="select * from 学生情况"
rst.open ssql,cnn
  rst.MoveFirst
if rst.eof then
      rst.close
else
    rst.MoveFirst
    do while not rst.eof
    a=rst("学号")
    b=rst("姓名")
   HMIRuntime.Tags("access1").Write a
   HMIRuntime.Tags("access2").Write b
      rst.movenext
    loop
    rst.close
end if
为什么在vbs中运行没有问题，但是导入到wincc中就取不到数据呀，请高手指点一下，谢谢！

问题补充：

扫码小程序：

一键登录查看全部问答

舴艋舟资深学长

被采纳率 9.38%

问题为何被关闭

分享

手机扫码追踪该问题，
觉得实用，立即去分享！

点击复制链接
举报

去论坛讨论

不要使用WScript.CreateObject("ADODB.Connection")，WinCC不存在WScript对象，直接用CreateObject("ADODB.Connection")语句就可以了。
另外你的do while 语句好像没什么意义啊？变量access1、access2的值总是记录的最后一条。