SAVE DATA ON .TXT FILE

Hi people!

Im trying to save data in a txt file but I dont know enough about VB Script. Im working on Wincc TIA Portal V13. Have you any help to me, better if this is in a code format ;)!

Thanks you a lot!

Hello mnabaes,

Have you seen this link:

how do you write data to a file or read data from a file by means of a script on a panel with SIMATIC WinCC (TIA Portal)?

Best regards,

Wizard

Thanks you Wizard!

Best regards!

Martín.

Mon ami, 

I have a problem with the code you gave me. I dont know why, that's the problem, its not work.

I wrote exactly the same code, compile without any problem, but when it runs dont create any file.

Here you have the code, maybe you could find some problem.

------------------------------------------------------------------------------------------------

Dim fo, path, mode, delimiter, gap

Const NEU =0

mode = 8

path = "c:\Text.txt"

delimiter = vbTab

gap = vbTab

On Error Resume Next

Set fo= CreateObject("FileCtl.File")

If Err.Number <> 0 Then

ShowSystemAlarm "Error #" & CStr(Err.Number) & " " & Err.Description

Err.Clear

Exit Sub

End If

fo.open path,mode

If Err.Number <> 0 Then

ShowSystemAlarm "Error #" & CStr(Err.Number) & " " & Err.Description

Err.Clear

Exit Sub

End If

If fo.NEU Then

fo.LinePrint("gato")

End If

fo.Close

Set fo=Nothing

ShowSystemAlarm "C'fait bien enregistrè"

------------------------------------------------------------------------------------------------

Thanks you!

Hello mnabaes,

Which panel are you using?

Or are you using a PC?

Then have a look at the following link:

how do you store data with a script in a file with WinCC (TIA Portal) PC Runtime?

Best regards,

Wizard

Hi

It is not possible to open your project in TIA portal.

May you upload again ?

Thanks

Hi Wizard

Could you advise me, I am trying to script with description from forum, but it is still Error.

I joying my program, I work only in simulate.

http://www.upnito.sk/subor/a929b1906ba99d6229e504ea49ba1fb6.html

Thank for answer