Wincc7.3学习之——如何建立起数据库链接
如何建立数据库链接
1、 设置用户信息
计算机->右键管理(G）->本地用户和组->当前登录用户名如[Dell] ->右键属性->只勾选密码永不过期（同时对其他用户勾选：账户已禁用）
2、 设置数据库信息
打开SQL Server Management Studio->
Connect建立链接
在Security项内新建一个sa用户，Password：sa或其他（牢记）
Disconnect退出登录
再次建立链接，Authentication：选SQL Server Authentication
新建数据库：Databases右键New Database：RBJX_Traceability
Owner选择sa，Path地址选择自己想要存放的地方（一般选择D：\Database）
完成后出现新建的数据库如下所示：
建好数据库后开始建表
3、 新建Wincc单用户项目，并保存（一般选择D：\Project\WINCC）
4、 Wincc数据库的概念详解
Wincc的Object对象ADODB
在Wincc内部如果要使用对象，必须先创建，创建ADODB的代码如下：
Dim Conn
Set Conn=Createobject(“ADODB.Connection”)
创建完ADODB对象后，要对对象的ConnectionString属性进行赋值，赋值代码如下：
Dim sPro, sDsn , sSer,sCon
sPro = "Provider=SQLOLEDB.1;"
sDsn = "Password=sa;Persist Security Info=True;"
sSer = "User ID=sa;Initial Catalog=RBJX_ Traceability;Data Source=DELL-PC\WINCC"
sCon = sPro& sDsn & sSer
Conn.ConnectionString= sCon
5、 通过一个实例来查看一下自己建立的数据库
实例的内容为：通过一个文本框，保存数据到数据库中
1、 在图形编辑器中创建一个画面Start，并使其作为起始画面
2、 在Start画面上添加一个控件TextBox，对象名称为Test，再添加一个窗口对象按钮，名字叫Save，对象按钮的事件里，选择鼠标->单击鼠标，右键VBS动作
3、 在数据库中新建一个表Test，建一个int变量的字段名字叫Int1
4、 在VBS动作内输入如下代码：
Sub OnClick(ByVal Item)
Dim Conn
Set Conn=Createobject(“ADODB.Connection”)
Dim sPro, sDsn , sSer,sCon
sPro = "Provider=SQLOLEDB.1;"
sDsn = "Password=sa;PersistSecurity Info=True;"
sSer = "User ID=sa;InitialCatalog=RBJX_ Traceability;DataSource=DELL-PC\WINCC"
sCon = sPro & sDsn & sSer
Conn.ConnectionString = sCon
Dim Table
Table = “Test”
Dim Int1
Set Int1=ScreenItems(“Test”)
Dim SqlInto
SqlInTo = "Insert Into "&SearchTable&"(Int1) Values(‘ "&Int1.Value&" ’) "
Conn.Execute (SqlInTo)
Conn.Close
Set Conn = Nothing
End Sub
5、 运行系统
在TextBox内输入值，点击Save按钮，打开数据库，在Test表上Select Top 1000 Rows，就能看到刚才输入的值
6、 数据库的链接及操作还有很多方法可以学习，SQL语言与Wincc平台的巩固是学习的前提，Enjoy Yourself!
如果不成功，查看Password是否与数据库一致，Data Source是否与Server Name一致