如何wincc中使用VBS脚本读写SQLServer数据库文件？
刘玉蓉
发布于2014-12-05 17:51
2865
0
标签：
新建一个wincc项目，想要在其后台数据库中间建立表格，通过VBS脚本对该数据库进行读写操作，该如何做？
佳答案
Dim connstr
connstr = "Provider=SQLOLEDB.1;Persist Security Info=False;Initial Catalog=CC_JZX_WINC_13_03_06_10_00_07R;Data Source＝.WINCC;uid=sa;pwd=;"
Set MyConn = CreateObject("ADODB.Connection")
With MyConn
.ConnectionString = connstr
.CursorLocation = 3
.Open
End With
Dim strSQL
Dim rsTmp
strSQL = "数据库操作语句"
Set rsTmp = CreateObject("ADODB.Recordset")
Set rsTmp.ActiveConnection = MyConn
With rsTmp
.CursorLocation = 3
.CursorType = 3
.LockType = 1
.Source = strSQL
.Open
End With
刚学着弄完，Persist Security Info=False;这条语句害我研究了很久，之前没有太在意，导致远程读取时登录失败
参考资料：https://www.ad.siemens.com.cn/service/answer/tobe_solution.aspx?Q_ID=109096&cid=1032
