利用WINCC的VB脚本写入变量到自定义的数据库方法?

请问一下,我想利用wincc的vb脚本在自己创建的sql数据库(该自定义数据库是常规数据库,在sql中用sql语句创建)中周期存储变量值(包括时间,变量名,变量值)我利用... 请问一下,我想利用wincc的vb脚本在自己创建的sql数据库(该自定义数据库是常规数据库,在sql中用sql语句创建)中周期存储变量值(包括时间,变量名,变量值)
我利用create database guowincc创建了数据源是guowincc

利用create table testwincc(
one 变量名,
tow 归档时间,
three 归档值,
primary key(one,tow)
)
创建这个testwincc表的话我不知道one,tow,three各应该定义为什么类型。

wincc里面的变量的类型各对应数据库中自定义的哪些类型呢?
比如wincc里的“有符号16位数”该对应sql中的哪个类型?
“浮点数 32位 IEEE 754”又对应sql中的什么类型呢?
wincc中的“日期时间”对应sql中是什么呢?
如果我想把wincc中用vb的Now()得到的时间变成字符串存储的话是不是用
Dim nowTimeStr
nowTimeStr = Format(Now,"yyyy年MM月dd日 HH时nn分ss秒")
就可以了呢?

我在winncc里写VB的脚本
Dim objConnection
Dim strConnectionString
Dim nowTime
Dim lngValue
Dim strSql
Dim objCommand
strConnectionString = "Provider = MSDASQL;DSN = guowincc;UID = ;PWD = ;"
lngValue = HMIRuntime.Tags("NewTag1_inter").Read 'NewTag1_inter是我自定义的归档变量
tagTime = Now() '这句语句正确吗?
strSql = "insert into testwincc values("'NewTag1_inter',&nowTime&,&lngValue&");"
'尤其是这句语句正确吗?
Set objConnection = CreateObject("ADOB.Connection");
objConnection.ConnectionString = strConnectinString
objConnection.open
Set objCommand = CreateObject("ADOB.Command")
with objCommand
.ActiveConnection = objConnection
.CommandText = strSql
end with
objCommand.Execute
Set objCommand = Nothing
objConnection.Close
Set objConnection = Nothing

看看上面的有没有错误啊,wincc运行起来太耗时间了,所以我想把疑问都解决了再去激活wincc。
vb动作脚本调试出错:Microsoft vbscript 运行时错误:Activex部件不能创建对象:'ADODB.Connection
出错位置是:Set objConnection = CreateObject("ADOB.Connection")
以下是脚本(有省略)
Sub 按钮1_OnClick(ByVal Item)
....
Dim nowTime
Dim lngValue
Dim strSql
Dim objCommand
strConnectionString = "Provider = MSDASQL;DSN = guowincc;UID = ;PWD = ;"
lngValue = HMIRuntime.Tags("NewTag1_inter").Read
nowTime = Now()
strSql = "insert into testwincc values('NewTag1_inter',"& nowTime & "," & lngValue & ");"
Set objConnection = CreateObject("ADOB.Connection")
objConnection.ConnectionString = strConnectinString
....
End Sub
展开
 我来答
糖糖寳寳
推荐于2017-10-02 · TA获得超过6.4万个赞
知道大有可为答主
回答量:1.8万
采纳率:92%
帮助的人:3924万
展开全部

WinCC的VBS虽可以声明Public变量,但作用域仅限于本画面,如下:

如果WinCC版本>=V6.0 SP3,则可以使用Dataset对象,该对象可以在不同的VBS脚本中进行访问,下面是个简单的例子:

1、绝核连接

Dim objConnection,strConnectionString

strConnectionString ="Driver={SQL Server};Server=.\WINCC;uid=;pass=;database=guowincc" 

Set objConnection = CreateObject("段盯ADODB.Connection") 

objConnection.ConnectionString = 并燃掘strConnectionString 

objConnection.open 

HMIRuntime.DataSet.Add "objConnection",objConnection


2、全局动作中引用

Dim objConnection

objConnection= HMIRuntime.DataSet("objConnection").Value

with objCommand 

.ActiveConnection = objConnection 

xxxxxxxx


3、关闭连接:

Dim objConnection

objConnection= HMIRuntime.DataSet("objConnection").Value

objConnection.Close 

Set objConnection = Nothing

dcount10
推荐于2017-09-16 · TA获得超过301个赞
知道小有建树答主
回答量:294
采纳率:0%
帮助的人:403万
展开全部
1、如果你不知道怎么用SQL语法创建数据库,那就手动创建好了,数据类型对应如下:
变量名 --- nchar
归档时间 ---- datetime
归档值 ----- real
PrimaryID ----- int(如想自动编号,请将其Identify Specfication设置为True)
2、可以直接使用Now,而不必Format为那种格式,否则可能会键咐歼引起查询问题。你可以读出来后再进行转化。
3、tagTime = Now() 没问题
4、INSERT的语法为:
INSERT mytable (first_column,second_column,third_column)
VALUES (‘some data’,’some more data’,’yet more data’)
你稿冲那句有简悉问题,自己琢磨琢磨,是最基本的字符串连接语法。

小错误,大问题:ADOB.Connection >> ADODB.Connection
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友b8b3f90
2009-05-21 · TA获得超过1.5万个赞
知道大有可为答主
回答量:7178
采纳率:94%
帮助的人:3167万
展开全部
要明白,Wincc中是使用VBS并非VB,如果你指望你按照VB的思路去氏键写VBS,那么恐怕你移歼桥巧植到VBS中的话,要晕过去。如果你一定要在VB中做,那么在VB中编译为EXE文档后,然后在Wincc作为外部程序来引用。

对于VBS来说,只有变体类型,并无所谓的INT,String等类型。

ngValue = HMIRuntime.Tags("NewTag1_inter").Read 'NewTag1_inter是我自定义的归档变量

只能读取Wincc变量管理器中建立的变量,如果你不是在那里建立,那么是消乱不正确的。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式