在wincc画面中通过脚本将系统时间赋值给datatime类型的变量，显示在画面中，想将变量通过按钮的方式写入到数据库中，但是无法写入，各位大神如何将datatime类型写入到数据库，求帮助。
最佳答案
我用的是SQL数据库下面脚本写的是记录时时时间的温度记录，希望对你有所帮助dyx,oItem,z,j,b,c,d,c1,c2,c3,c4,c5,c6,a1,a2,a3,a4,a5,a6
Dim i,a,riqi,strcn,cn,is_SQL,xin
Dim b1,b2,b3,b4,b5,b6,b7,b8,b9,b10,b11,b12,b13,b14
c1=Year(Now)
c2=Month(Now)
c3=Day(Now)
c4=Hour(Now)
c5=Minute(Now)
c6=Second(Now)
If(Len(c2)=1) Then
c2=0&c2
End If
If(Len(c3)=1) Then
c3=0&c3
End If
If(Len(c4)=1) Then
c4=0&c4
End If
If(Len(c5)=1) Then
c5=0&c5
End If
If(Len(c6)=1) Then
c6=0&c6
End If
riqi=c1&"/"&c2&"/"&c3&" "&c4&":"&c5&":"&c6
''3.01 1加州海藻
Set a=HMIRuntime.Tags("AIW100")
a.Read
Set a1=HMIRuntime.Tags("AIW102")
a1.Read
Set a2=HMIRuntime.Tags("AQW100")
a2.Read
Set a3=HMIRuntime.Tags("shedingwendu1")
a3.Read
xin="3.01 1#加州海藻"
strcn="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=wanda;Data Source=.\wincc"
Set cn=CreateObject("ADODB.connection")
cn.connectionString=strcn
cn.Open
is_SQL="insert into 负一楼温度记录(shijian,didian,shedingwendu,shijiwendu,shedingkaidu1,shijikaidu1,shedingkaidu2,shijikaidu2) Values(''"& riqi &"'',N''"& xin &"'',''"& a3.Value &"'',''"& a1.Value &"'',''"& a2.Value &"'',''"& a.Value &"'',N''"& 0 &"'',N''"& 0 &"'')"
cn.Execute is_SQL
cn.close
图片说明：
提问者对于答案的评价：
谢谢各位大神的回复，小弟我也实现了对时间的写入。将时间看做为字符串，在写入数据库时insert into （）values（‘“datetime”’），就可以直接写入到数据库中。辛苦各位大神了。谢谢，谢谢。
原创文章，作者：ximenziask，如若转载，请注明出处：https://www.zhaoplc.com/plc361827.html
微信扫一扫 
支付宝扫一扫 