Has anyone come across this problem in XP
with creating a batch file, by first creating a text file
then closing it. Then output using wzunzip.exe as
follows:-

Open "D:\WMSCall\extract.txt" For Output As #1
Print #1, "D:\WMSCall\wzunzip.exe
D:\WMSCall\ZippedFiles\" & Carrier & "\" & fileStr & _
FileYearStr & ".zip
D:\WMSCall\ZippedFiles\All\"
Close #1
'Rename .TXT to .BAT to enable remote execution
Name "D:\WMSCall\extract.txt"
As "D:\WMSCall\extract.bat"
'Run extract.bat
runBat = Shell("D:\WMSCall\extract.bat")

When trying to run this in xp it does not work.
Can anyone offer any ideas! thanks in advance