用wincc里的vbs对SQL进行读写操作
试了好几种方法 似乎根本没有连接上数据库从网上找了个成功的例子试了下,还是不行,求助,为什么。
已经在图形编辑器里创建了按钮,按钮动作时引用这个过程。
代码如下:
Sub procedure1
Dim objConnection
Dim strConnectionString
Dim lngValue
Dim strSQL
Dim objCommand
Dim Name
Name="222"
strConnectionString = "Provider=MSDASQL;DSN=ZCZ;UID=;PWD=;"
'字符串连接到数据库
strSQL = "INSERT INTO ZCZ (search) VALUES ("& Name &");"
'sql语句将new插入zcZ的变量名的列
Set objConnection = CreateObject("ADODB.Connection")
'将objconnection定义成adodb的连接
objConnection.ConnectionString = strConnectionString
'将数据库连接字符串赋值给adodb.objconnection
objConnection.Open
'打开连接数据库
Set objCommand = CreateObject("AdodB.Command")
'将objcommand定义成adodb的命令
With objCommand
.ActiveConnecTion = objConnection
.Commandtext = strSQL
End With
objCommand.Execute
set objCommand = Nothing
oBjcoNnection.Close
Set objConnection = Nothing
End Sub --------------------编程问答-------------------- 建议LZ移到VB板块问比较好 --------------------编程问答-------------------- 谢谢
补充:VB , 数据库(包含打印,安装,报表)