wincc中使用VBS脚本读写SQLServer数据库文件.doc

例程:
读写SQLServer数据库
一、在数据库中建立数据库文件,文件名为“读写数据库”,在数据库中建立新的表,命名为“个人信息”分别建立编号、姓名、年龄。
二、数据库中建立表后,中建立与数据库中类型相同的变量,变量类型相同在读写数据时很重要。在图形编辑器中新建画面,并在画面中增加三个输入输出域,并连接变量。
三、添加两个按钮控件,分别命名为写数据、读数据
1、在写数据按钮中写入一下VBS脚本
变量写入数据库
定义变量
Dim sCon
Dim sSql
Dim oRs
Dim conn
Dim oCom
Dim Con
Dim Data1, Data2, Data3
‘变量
Data1=("编号").read
Data2=("姓名").read
Data3=("年龄").read
‘连接数据库
Con="Provider=;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=读写数据库;Data Source=.\"
Set conn = CreateObject("")
= Con
= 3

‘写入数据库
sSql="insert into个人信息VALUES('" & Data1 & "','" & Data2&"','"&Data3&"');"
Set oRs = CreateObject("")
Set oCom = CreateObject("mand")
Set = conn
mandType = 1
mandText = sSql
Set oRs =
Set oRs = Nothing

Set conn = Nothing
Dim sCon
Dim sSql
Dim oRs
Dim conn
Dim oCom
Dim Con
Dim Data1, Data2, Data3
'变量
Data1=("编号").read
Data2=("姓名").read
Data3=("年龄").read
'连接数据库
Con="Provider=;nitial Catalog=读写数据库;Data Source=panzhiyou;uid=sa;pwd=panzhiyou"
Set conn = CreateObject("")
= Con
= 3

'写入数据库
sSql="insert into个人信