找答案

使用vbs程序
Dim ObjConnection
Dim ObjCommand
Dim amount
Set ObjConnection = CreateObject("ADODB.Connection")
Set ObjCommand = CreateObject("ADODB.Command")
ObjConnection.ConnectionTimeout=2000
ObjConnection.ConnectionString= "DRIVER = {Microsoft Access Driver (*.mdb,*.accdb)};DBQ = F:\amount.accdb"
ObjConnection.open
If ObjConnection.State=adStateOpen Then
 amount=1
Else
 amount=0
End If
HMIRuntime.Tags("adress").write amount
With ObjCommand
    ActiveConnection=ObjConnection
    CommandText="INSERT INTO 表1 (name.count) values ('余厚祥',25)"
End With
ObjConnand.Execute
判断连接成功与否的程序好像跟本没有执行，更不用说插入数据了。我用的是ACCESS2013,ODBC配置好了，系统windows7，不知道有什么不对的地方

产品版区：SIMATIC WinCC 悬赏西币:5 | 解决时间：2015-07-01 21:57:37 | 提问者： 全凉了 - 新生  第1级

回答者： zhangli0 - 超级顾问  第15级  2015-06-10 08:31:59

评论

提问者对于答案的评价：
试试看

暂无回答