SQL: WinCC export Database SQL

Аватар автора
БД: Работа с JSON и XML
code VB Scripts (" 'VBS108 Dim objConnection Dim strConnectionString Dim GIATRI1 Dim GIATRI2 Dim GIATRI3 Dim GIATRI4 Dim strSQL Dim objCommand strConnectionString = "Provider=MSDASQL;DSN=EX_WINCC_DATA;UID=;PWD=;" GIATRI1 = HMIRuntime.Tags("GIA_TRI_1").Read GIATRI2 = HMIRuntime.Tags("GIA_TRI_2").Read GIATRI3 = HMIRuntime.Tags("GIA_TRI_3").Read GIATRI4 = HMIRuntime.Tags("GIA_TRI_4").Read strSQL = "INSERT INTO Table1 (GIA_TRI_x1,GIA_TRI_x2,GIA_TRI_x3,GIA_TRI_x4) VALUES (" & GIATRI1 & "," & GIATRI2 & "," & GIATRI3 & "," & GIATRI4 & ");" Set objConnection = CreateObject("ADODB.Connection") objConnection.ConnectionString = strConnectionString objConnection.Open With objCommand .ActiveConnection = objConnection End With objCommand.Execute Set objCommand = Nothing objConnection.Close Set objConnection = Nothing ") Công ty Cổ phần Tự động hóa Vinatec - Thiết kế, lập trình các hệ thống tự động (tủ điều khiển bơm, nhà máy - trạm xử lý nước, ...). - Cung cấp các thiết bị vật tư ngành điện: Máy biến áp, Thiết bị điện LS, Mitsubishi, Schneider. - Lập trình PLC, HMI, hệ thống giám sát SCADA. - Gia công tủ điện các loại.

0/0


0/0

0/0

0/0