Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

FileCtl, manage file and folder

Created by: Roby at: 6/23/2008 8:47 AM (9 Replies)

Rating (2)

Thanks 1

10 Entries

6/23/2008 8:47 AM	Rate (0)
Roby Silver Member Joined: 4/10/2006 Last visit: 11/11/2024 Posts: 942 Rating: (2)	Hi, I need to manipulate file and folderwith a script. I try with a FileCtl property that is FolderExists Set fs = CreateObject("filectl.filesystem") If (fs.folderexists(path)) Then ShowSystemAlarm ("Folder exist") Else fs.createfolder(path) ShowSystemAlarm ("Folder created") End If In this way I only testing the function of file system But when I run the script I receive the error Error object doesn't support this property or method: "fs.FolderExists" Anybody help me, please? Where can I find a list of property and method of FileCtl? Thanks in advance, Roby
	Setting of my PG M6 Siemens OS: Windows 10 Enterprise 22H2; Intel(R) Core(TM) i7-8850H CPU @ 2.60GHz 2.59 GHz - 32G of RAM TIA15.1 Update 8; TIA17 Update 7; TIA18 Update 4 (i use normally)
Suggestion To thank Quote Answer

6/23/2008 11:54 AM	Rate (0)
Roby Silver Member Joined: 4/10/2006 Last visit: 11/11/2024 Posts: 942 Rating: (2)	In Protool when I call fs.open path,A this method create the specific path i not exist. Why now in wincc 2007 fs.open don't create the path? then I receive the error: The system cannot find the path specified. Please reply me. Roby
	Setting of my PG M6 Siemens OS: Windows 10 Enterprise 22H2; Intel(R) Core(TM) i7-8850H CPU @ 2.60GHz 2.59 GHz - 32G of RAM TIA15.1 Update 8; TIA17 Update 7; TIA18 Update 4 (i use normally)
Suggestion To thank Quote Answer

6/23/2008 3:16 PM	Rate (0)
The Body Gold Member Joined: 5/13/2008 Last visit: 12/18/2019 Posts: 836 Rating: (71)	This FAQ's may help. Scripting a file on panels: http://support.automation.siemens.com/WW/view/en/26107211 Scripting a file on PC: http://support.automation.siemens.com/WW/view/en/26106419
	mfG / Best regards Roland
Suggestion To thank Quote Answer

6/23/2008 3:26 PM	Rate (0)
Roby Silver Member Joined: 4/10/2006 Last visit: 11/11/2024 Posts: 942 Rating: (2)	Thank you but I need some proprierties to create a folder with FileCtl. In the FAQ that you explain me it isn't. If you know something say me please. Roby
	Setting of my PG M6 Siemens OS: Windows 10 Enterprise 22H2; Intel(R) Core(TM) i7-8850H CPU @ 2.60GHz 2.59 GHz - 32G of RAM TIA15.1 Update 8; TIA17 Update 7; TIA18 Update 4 (i use normally)
Suggestion To thank Quote Answer

6/23/2008 3:45 PM	Rate (0)
The Body Gold Member Joined: 5/13/2008 Last visit: 12/18/2019 Posts: 836 Rating: (71)	Search inside the flexible help for 'VBScript for Windows CE' and the function 'MkDir'. A more printible file is here: http://support.automation.siemens.com/WW/view/en/13408815.
	mfG / Best regards Roland
Suggestion To thank Quote Answer

11/3/2009 3:49 AM	Rate (2)
agrade Posts: 10 Rating: (2)	From the above link, the appropriate method is fso.Dir(pathname) - it will return "" if the folder or file is not found. I have implemented this [code]Dim fso Set fso = CreateObject("FileCtl.FileSystem") If (fso.Dir(strFolderName)<>"") Then IF (fso.Dir(strFolderName & "\" & strFileName) <> "") Then Message = "File Found" Else Message = "Folder found but not File" End If Else Message = "Folder Not Found" End If [/code] Now I know if my file system access is working ... Cheers
agrade Posts: 10 Rating: (2)
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users Bofely

3/29/2018 1:28 AM	Rate (0)
Andrew Crowley Member Joined: 1/23/2017 Last visit: 9/20/2024 Posts: 1 Rating: (0)	To help a future version of myself..... Code for created a directory Set fso1 = CreateObject("FileCtl.FileSystem") If fso1.dir("\Storage Card SD\" & DataFolderName & "\")="" Then 'Create folder on SD card fso1.MkDir("\Storage Card SD\" & DataFolderName & "\") End If

Suggestion To thank Quote Answer

4/16/2019 6:42 AM	Rate (0)
nerbv Posts: 1 Rating: (0)	Sub Create_Folder() Dim fs, path path = "\Storage Card USB\Logs" Set fs = CreateObject("Scripting.FileSystemObject") fs.CreateFolder(path) End Sub and then call this script from say a click of a button
nerbv Posts: 1 Rating: (0)
Suggestion To thank Quote Answer

5/12/2021 9:27 AM	Rate (0)
akiselev Regular Member Joined: 9/12/2012 Last visit: 5/14/2024 Posts: 9 Rating: (0)	These methods do not work for Windows 10 shared folders.

Suggestion To thank Quote Answer

10/29/2021 11:20 AM	Rate (0)
LuukDelicia Regular Member Joined: 7/28/2016 Last visit: 9/10/2024 Posts: 2 Rating: (0)	Do you know if this also doesn't work on any version equal or higher than windows server 2012?

Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Follow us on