日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

博途wincc 与 sql 连接操作(博途V14 wincc advanced)

發布時間:2023/12/31 编程问答 71 豆豆
生活随笔 收集整理的這篇文章主要介紹了 博途wincc 与 sql 连接操作(博途V14 wincc advanced) 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

博途wincc 與 sql 連接操作(博途V14 wincc advanced)
1,sql 端配置,創建數據庫,可在vb中進行,或者直接定義好(更為簡單)
1, 使用 ODBC數據源連接 conn.open"Provider=SQLOLEDB.1;DSN=12" 此方式運行時提示字符串不正確
其中 Provider = SQLOLEDB.1。 SQLOLEDB.1是Windows集成的驅動程序
2,采用傳統的鏈接方式,設置編寫連接字符串。

con = "Provider=SQLOLEDB.1;Integrated Security = SSPI;Persist Security Info=False;UserID=sa;password=123456;Initial Catalog=Machine_01;Data Source=DESKTOP-QFMFB1D\WQ" Set conn=CreateObject("ADODB.Connection")conn.ConnectionString=conconn.CursorLocation=3conn.OpensSql2="select *from Table_1 where id='12'" //定義sql語句Set oRs=CreateObject("ADODB.Recordset") //創建Recordset對象用來容納記錄Set oCom=CreateObject("ADODB.Command")//創建Command對象用來執行sql指令Set oCom.ActiveConnection=connoCom.CommandType=1oCom.CommandText=sSql2Set oRs = oCom.Execute//執行sql語句SmartTags("HMI_Tag_1") = oRs.fields(0).name//賦值給西門子變量

2,wincc 端配置
vb 中寫腳本即可, 最后有全部腳本代碼

3,vb 腳本 需要三個對象,缺一不可。
1,ADODB.Connection
Connection 對象用于創建一個到達某個數據源的開放連接。通過此連接,您可以對一個數據庫進行訪問和操作。
2,ADODB.Command
Command 對象用于執行面向數據庫的一次簡單查詢。此查詢可執行諸如創建、添加、取回、刪除或更新記錄等動作。
3,ADODB.Recordset
Recordset 對象用于容納一個來自數據庫表的記錄集。一個 Recordset 對象由記錄和列(字段)組成。
在 ADO 中,此對象是最重要且最常用于對數據庫的數據進行操作的對象。

4,腳本文檔

Dim sCon Dim sSql Dim sSql2 Dim sSql3Dim oRs Dim conn Dim con Dim oComDim aacon = "Provider=SQLOLEDB.1;Integrated Security = SSPI;Persist Security Info=False;User ID=sa;password=123456;Initial Catalog=Machine_01;Data Source=DESKTOP-QFMFB1D\WQ" Set conn=CreateObject("ADODB.Connection") conn.ConnectionString=con conn.CursorLocation=3 conn.OpensSql2="select *from Table_1 where id='12'"Set oRs=CreateObject("ADODB.Recordset") Set oCom=CreateObject("ADODB.Command") Set oCom.ActiveConnection=conn oCom.CommandType=1oCom.CommandText=sSql2 Set oRs = oCom.ExecuteIf Not (oRs.EOF And oRs.BOF) ThenoRs.MoveFirstSmartTags("HMI_Tag_1") = oRs.fields(0).nameoRs.close ElseShowSystemAlarm"Dat_No.is not availble"End IfSet oRs=Nothing conn.Close Set conn=Nothing

此鏈接位淘寶上某位賣家,感謝他的幫助。
https://item.taobao.com/item.htm?spm=a1z10.1-c.w4004-932985339.8.2badd640QEwzLe&id=570401337752

總結

以上是生活随笔為你收集整理的博途wincc 与 sql 连接操作(博途V14 wincc advanced)的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。