| |
svansingel
Posts: 11
Score: 0
Joined: 9/18/2007
Status: offline
|
Ok here is the deal. I have this script that will create folders with Todays date. That part works fine. It will also create two subfolders. What I need to do is. Copy files to the new Subfolders. Below is what I use for creating the files strFolderName = "C:\APACS\" & strCompName & "_" & strMonth & "-" & strDay & "-" & strYear Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.CreateFolder(strFolderName) objFSO.CreateFolder(strFolderName) & "\PSLogs" objFSO.CreateFolder(strFolderName) & "\APIlogs" strPSLogsFolder = (strFolderName) & "\PSLogs" strAPILogsFolder = (strFolderName) & "\APIlogs" I used strPSLogsFolder as a string to represent the folder. In this part, I need to copy files ot the folder objFSO.CopyFile "\\" &strComputer &"\c$\Documents and Settings\" &strNewComp &"\Local Settings\Application Data\Dictaphone\HSG\Trace\PSClientApp\PSClientApp_LOG.txt" , strPSLogsFolder , OverwriteExisting any ideas? Thanks
|
|