Run Command Line Script from VBS

[thec0dy]

I need to run the line below in VBS. It is tricky due to the quotes. I need to run the code and any output send to a log file. This is the A-PDF Renaming software I am using. Thanks for you assistance!

for %i in (D:\Centers\CO022\Test\*.pdf) do ""C:\Program Files (x86)\A-PDF Rename\prncmd.exe"" %i ""[%Content_1% ] %Content_2% (%Content_3%)"" -L""C:\Scripts\1.rul"",""C:\Scripts\2.rul"",""C:\Scripts\3.rul"" > ""C:\Scripts\CO022-RPL-Log.txt

Dim WshShell, fso, file
Set WshShell = WScript.CreateObject("WScript.Shell")
Set fso  = CreateObject("Scripting.FileSystemObject")
WshShell.Run("cmd for %i in (D:\Centers\CO022\Test\*.pdf) do ""C:\Program Files (x86)\A-PDF Rename\prncmd.exe"" %i ""[%Content_1% ] %Content_2% (%Content_P3%)"" -L""C:\Scripts\1.rul"",""C:\Scripts\2.rul"",""C:\Scripts\3.rul"" > ""C:\Scripts\CO022-RPL-Log.txt"""),1,false
wscript.quit

 

[PHV]

Why not simply run a .BAT (or .CMD) file ?

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[thec0dy]

When I try to do a .bat it does not like %i in (D:\Centers\CO022\Test\*.pdf). It always comes back with for \Centers\CO022\Test\*.pdf")' do "C:\Program Files (x86)\A-PDF..... It seems to be cutting that first part off (D:

for %i in (D:\Centers\CO022\Test\*.pdf) do ""C:\Program Files (x86)\A-PDF Rename\prncmd.exe"" %i ""[%Content_1% ] %Content_2% (%Content_3%)"" -L""C:\Scripts\1.rul"",""C:\Scripts\2.rul"",""C:\Scripts\3.rul"" > ""C:\Scripts\CO022-RPL-Log.txt

 

[PHV]

In a .bat you should use %%I

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[xwb]

Also, if you are using files, use for /f.

To get all the options in a for loop,type for /?