Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

delete or export csv

Created by: monnane at: 2/10/2023 8:05 AM (11 Replies)

Rating (0)

Thanks 1

Result pages:: |; 1 | 2; |

12 Entries

Entries per page: 10 | all

2/10/2023 8:05 AM	Rate (0)
monnane Joined: 10/30/2022 Last visit: 3/27/2023 Posts: 13 Rating: (0)	Hello all, I'm very bad at programming vb for windows CE, so I need your help I use a KTP900 comfort with TIA V16, a SD card inside in wich there are many csv file. So i want to know programming a script to : 1- Exporting all CSV file located on a "data" folder (located on the SD card) to an USB (replace a file wich already exist in the usb) 2 - Delete all CSV file located in this folder (data) Also, I want to learn windows CE command, does anyone knows à good website where I can learn that ? Thanks

Suggestion To thank Quote Answer

2/10/2023 10:50 AM	Rate (0)
Prof. Frink Platinum Expert Joined: 7/5/2013 Last visit: 11/13/2024 Posts: 3120 Rating: (516)	Hello monnane, have a look in Differences between the VB script functions of Windows and WinCE. You could either use MoveFile or (FileCopy and Kill). Regards, Frink
	Pi is exactly three! All you have to do is think of things which people need but which don’t exist yet.
Suggestion To thank Quote Answer

2/13/2023 8:42 AM	Rate (0)
monnane Joined: 10/30/2022 Last visit: 3/27/2023 Posts: 13 Rating: (0)	Thanks you very much ! In addition to this, do you know somewhere I can find exemple of these file system controls ?

Suggestion To thank Quote Answer

2/16/2023 11:46 AM	Rate (0)
Murof Platinum Expert Joined: 8/3/2009 Last visit: 11/15/2024 Posts: 14176 Rating: (1774)	Hello monnane Check out these information: https://support.industry.siemens.com/cs/ww/en/view/59604194 https://support.industry.siemens.com/cs/ww/en/view/59885894 Functions: https://support.industry.siemens.com/cs/ww/en/view/109813306/128457876107 Bye Murof
	If this Information really helps, you could use the Rate function
Suggestion To thank Quote Answer

3/20/2023 12:46 PM	Rate (0)
monnane Joined: 10/30/2022 Last visit: 3/27/2023 Posts: 13 Rating: (0)	Hello Murof. I tried for hours the program below, for exporting all CSV file located on a "data" folder (located on the SD card) to an USB (replace a file wich already exist in the usb), but without success ! Nothing happen in the usb key, no file copied... Could you please tell me where I amm wrong in this program Sub exportHistoriqueSurUsb() On Error Resume Next Dim fso, filename, SourcePath, DestinationPath, check DestinationPath = "\Storage Card USB\" SourcePath = "\Storage Card SD\data\" '' Create the File system object to the file system of the panel Set fso = CreateObject ("FileCtl.filesystem") ' Search for files in the destination directory and delete them. filename = fso.Dir(DestinationPath & "",0) Do Until filename = "" fso.kill DestinationPath & filename filename = fso.Dir Loop 'Search For files In the Source directory And copy them To the Destination directory filename = fso.Dir(SourcePath & "",0) Do Until filename = "" fso.filecopy SourcePath & filename, DestinationPath & filename filename = fso.Dir Loop ' Clean object fso Set fso = Nothing

Suggestion To thank Quote Answer

3/21/2023 1:14 PM	Rate (0)
Prof. Frink Platinum Expert Joined: 7/5/2013 Last visit: 11/13/2024 Posts: 3120 Rating: (516)	Hi monnane, monnane Set fso = CreateObject ("FileCtl.filesystem") Set fso = CreateObject ("FileCtl.File") First change that please and then you may use system function ShowSystemAlarm for outputting errors. If Err.Number <> 0 Then ShowSystemAlarm "Error ##: " Err.Number Err.Clear End if Regards, Frink
	Pi is exactly three! All you have to do is think of things which people need but which don’t exist yet.
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users Murof

3/22/2023 12:54 PM	Rate (0)
Murof Platinum Expert Joined: 8/3/2009 Last visit: 11/15/2024 Posts: 14176 Rating: (1774)	Hello monnane if you are not sure where your error is in VB Script on a WinCC comfort/Advanced project, then you can use ShowSystemAlarm (of course show the system alarms in our runtime) or count an internal HMI tag up in your script. then do an Output or count on every line you do something. Then you can see in Runtime where in your script is an error or where do you get wrong values or similar. you have to try to analyse your Script in that way to find the reasons... Bye Murof
	If this Information really helps, you could use the Rate function
Suggestion To thank Quote Answer

3/23/2023 7:47 AM	Rate (0)
monnane Joined: 10/30/2022 Last visit: 3/27/2023 Posts: 13 Rating: (0)	Tkank you Frink and Murof. I will modify my script for the error system. Murof, I tried what you advice me, I know that the script is launching from the begining to the the end, but nothing get copied to the usb key, so I think that I don't use the right command in my script and I don't know what to do...

Suggestion To thank Quote Answer

3/23/2023 11:46 AM	Rate (0)
Murof Platinum Expert Joined: 8/3/2009 Last visit: 11/15/2024 Posts: 14176 Rating: (1774)	Hello monnane delete the "on Error resume Next" -> this will cause that your script runs to the end also if there are problems. Try without and you will see if there is a crash (then work with the diagnose outputs to see in which line it crashes) Bye Murof
	If this Information really helps, you could use the Rate function
Suggestion To thank Quote Answer

3/24/2023 10:17 AM	Rate (0)
monnane Joined: 10/30/2022 Last visit: 3/27/2023 Posts: 13 Rating: (0)	Hello Murof. The script doesn't crash, I'm sure of that (I put a variable at the end of the script to prove that) So I'm sure that the script runs well, but no file is copied to the usb...

Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Follow us on