[Example]: archiving data WinCC Flexible MSSQL CSV

[zesava]

Example of archiving data WinCC flexible 2007 in MS SQL and then their export to Excel MS.

As a source code Siemens has been taken Project_SQL_Database from a Siemens site, and a little processed.

In archive:

Пример архивирования данных WinCC flexible 2007 в MS SQL и затем их экспорт в MS Excel.
В качестве исходника был взят Project_SQL_Database с сайта сименса, и немонго переработан.

В архиве:

WinCCF_MSSQL_EXCEL.pdf
WinCCF_SQL_CSV.hmi
WinCCF_SQL_CSV_log.LDF

http://www.sendspace.com/file/3bosg4

[sania]

предлагаю подправить,чтоб можно было вписать путь файла из рантайм:

[sania]

convert DT WinCC ( Flexible ) into SQL (US time) from samples
http://support.automation.siemens.com/W ... n/26283062
make function DT_WinCC_to_SQL with input parameter DT_in (see codes)
now i call not Now() ,but DT_WinCC_to_SQL(Now)

Russian:
столкнулся с такой проблемой : несовпадение форматов DT WinCC ( Flexible ) и SQL (US time)
чтоб побороть это,создал в WinCC ( Flexible ) функцию DT_WinCC_to_SQL с входным параметром DT_in.
внутри такой код:
into function:

Code: Select all

DT_WinCC_to_SQL=CStr(CStr(DatePart("m",DT_in))& CStr("/")& CStr(DatePart("d",DT_in)) &_
       CStr("/")& CStr(DatePart("yyyy",DT_in))& CStr(" ")& CStr(FormatDateTime(DT_in,3)))

теперь в скриптах вызываю не Now(),а DT_WinCC_to_SQL(Now)
в таком виде неважны региональные настройки компа с WinCC ( Flexible )
sample:

Code: Select all

SQL_Table = "SELECT * FROM " & szTableName & " WHERE Date_Time =" &_
                         "'" & DT_WinCC_to_SQL(End_Date) & "'"
                         
'Writes a data record into a table
Set rst = conn.Execute(SQL_Table)	

SQL_Table = "INSERT INTO " & szTableName & " VALUES ('"& DT_WinCC_to_SQL(End_Date) & _
           "' , '" & aValue_1 & "' , '" & aValue_2 & "' , '" & aValue_3 &_
           "' , '" & aValue_4 & "' , '" & aValue_5 & "' , '" & aValue_6 &_
           "' , '" & DT_WinCC_to_SQL(aValue_7)     & "' , '" & aValue_9 & "')"

[Vovan]

Прошу прощения за оживления некропоста, но нет-ли возможности перезалить архив по исходной ссылке? К сожалению ссылка уже битая.
Спасибо.