Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
strSourceFolder = "\\X.X.41.40.119\erchart$" strSourceFileSearch ="*.PDF" strTargetDataFolder = "\\X.X.40.119\data$" strTargetDataFilename = "MyTable.txt" If Right(strSourceFolder, 1) <> "\" Then strSourceFolder = strSourceFolder & "\" Set fso = CreateObject("Scripting.FileSystemObject") Set objSource = fso.GetFolder(strSourceFolder) For Each oFile In objSource.Files Wscript.Echo "FilePathName"&", "&"FileName" to strTargetDataFilename Wscript.Echo objFSO.GetParentFolderName(objFile) to strTargetDataFilename Wscript.Echo objFSO.GetFileName(objFile) to strTargetDataFilename Next
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.