技术论坛

 wincc上传变量数据到mysql数据库

返回主题列表
作者 主题
红尘照我心QAQ
游士

经验值:156
发帖数:16
精华帖:1
楼主    2020-04-09 10:20:44
主题:wincc上传变量数据到mysql数据库

脚本如下,

Sub OnLButtonUp(Byval Item, Byval Flags, Byval x, Byval y)             

Dim adoConn '定义ADO连接对象

Dim ConnectionStr '定义数据库连接字符串

Dim sqlstr

Dim adoRst

Dim data(3)

ConnectionStr="Provider=MSDASQL.1;Persist Security Info=True;Extended Properties='DRIVER=MySQL ODBC 5.1 Driver;SERVER=localhost;UID=root;PWD=123456;DATABASE=test;PORT=3308'"

'声明连接对象

Set adoConn=CreateObject("ADODB.Connection")

 

On Error Resume Next

adoConn.Open ConnectionStr            

 

'Set data(0) = HMIRuntime.Tags("编号")

'Set data(1)= HMIRuntime.Tags("姓名")

'Set data(2)=HMIRuntime.Tags("年龄")

 

'sqlStr="insert into test1 (ID,name,age) values('"&data(0).Read&"','"&data(1).Read&"','"&data(2).Read&"');"

sqlStr="insert into test1 (ID,name,age) values (7,'小王',19);"

adoConn.Execute sqlStr

 

'关闭数据库

adoConn.Close

'释放数据库对象

Set adoConn = Nothing

End Sub

我通过wincc 读取mysql数据没有问题,但是用wincc在写的过程中一致写不上,不用变量,直接写入数据的方式也尝试了还是写不进去,不知道什么原因

红尘照我心QAQ
游士

经验值:156
发帖数:16
精华帖:1
6楼    2020-04-11 15:18:17
精华帖  主题:回复:wincc上传变量数据到mysql数据库
这个问题我解决了,变量还是设置的16位文本变量,但数据库的name改成varchar(20)就可以了
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。