a=HMIRuntime.Tags("tt").Read
Set conn=CreateObject("adodb.connection")
Set rs=CreateObject("adodb.recordset")
conn.Provider = "sqloledb"
conn.open "SERVER=ccri\WINCC;uid=;pwd=;database=ccri"
strsql="insert into tt_ch(TagValue)VALUES(''" & a &"'')"
Set rs=conn.execute(strsql)
conn.close
Set rs=Nothing
Set conn=Nothing
我的程序到conn.open 就不运行了。vbs中需要加ado控件才能访问数据库吗还是直接编写程序?如果需要的话,怎么加?谢谢大家了!
最佳答案
数据库连接字符串不正确。按以下代码进行修改:
conn.open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ccri;Data Source=.\WinCC"
提问者对于答案的评价:
好,谢谢
原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc278162.html