我有一个工作脚本,它读取WinCC DB并将数据写入包含两个列(1个时间标记和1个值)的CSV中。
path = "C:\HMI\Report\Report.csv"
'creating csv file
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists(path) Then
fso.DeleteFile(path)
End If
fso.CreateTextFile(path)
Set f = fso.GetFile(path)
Const
我正在尝试使用参数化来防止我使用的HMI中的一个文本框中的SQL注入。
已经寻找了很多解决方案,我收集到的取决于有什么SQL语法,我可以使用?或@来告诉系统它是参数,但是它们都抛出了一个错误。
Dim DBCommand
Dim DBRecordSet
Dim Connection
Dim sqlString
Set DBRecordSet = CreateObject("ADODB.Recordset")
Set DBCommand = CreateObject("ADODB.Command")
Set Connection = GetDBConn
想知道是否有人可以帮助解决以下问题。我正在西门子WinCC中使用Vbscript。当我激活脚本时,"lngValue“变量包含一个带有字母"BC”的字符串,当试图插入数据库时,它会显示一个错误。
如果"lngValue“是空的,那么插入到mysql数据库中是空的,一切正常。(所以所有连接都好,甚至尝试了INT和工作)
我得到以下错误:
MySQLmysqld-5.6.19您的SQL语法出现了错误;请检查与MySQL服务器版本对应的手册,以获得在第1行“BC”附近使用的正确语法。
该脚本如下:
Sub Writetomysql()
Dim lngValue
D
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim x1 As String
Dim x2 As String
Dim x3 As String
Dim x4 As Date
Dim x5 As Date
x1 = CInt(TextBox1.Text)
x2 = CStr(ComboBox1.Text)
x3 = CStr(ComboBox2.Text)
x4 = DateTimePicker1.Va
我用VBScript为wincc编写了这段代码,在运行它之后,Excel应用程序仍然在运行,并且在执行此脚本后,项目不能正常工作。如何关闭Excel应用程序?
下面是脚本:
Dim fso
Dim rowcount
Dim ExcelObject
Dim WorkbookObject
Dim file
Dim i
Dim tg
Dim objSheet1
Dim objSheet2
'Set Object
Set fso = CreateObject("Scripting.FileSystemObject")
Set ExcelObject = CreateObjec
我正在使用WINCC将数据保存在SQL server中,但我无法插入当前数据和时间帮助我解决此问题
Sub OnClick(ByVal Item)
Dim objConnection
Dim strConnectionString
Dim lngValue
Dim strSQL
Dim objCommand
strConnectionString = "Provider=MSDASQL;DSN=winnrc;UID=;PWD=;"
lngValue = HMIRuntime.Tags("JOB_
我正在使用西门子WinCC 7.0中的C脚本来读取源和目标逗号分隔的文本文件,例如
C:\Users\Administrator\Desktop\C File Transfer Test\Source\Cat.txt,P:\Cat.txt
C:\Users\Administrator\Desktop\C File Transfer Test\Source\Cat1.txt,P:\Cat1.txt
C:\Users\Administrator\Desktop\C File Transfer Test\Source\Cat2.txt,P:\Cat2.txt
C:\Users\Administrat
我有一个触发器,当某些列被更新时,它会登录到Audit表。在删除一列之后,我在使用columns_updated()时遇到了很多问题,所以我正在重写触发器--只使用Update(),这似乎是可行的。
但是,我一直在每个IF语句If Update(ColumnName)中重复查询,请参阅下面的代码,因为我需要动态更改列名。有什么方法可以欺骗这个问题吗?这样我就不必再重复INSERT查询了吗?
IF (@TYPE IN ('U') and UPDATE(ShippingAddressFlag))
BEGIN
SELECT @fieldname =