不用怀疑,是正常可以执行的.如果在这里边随便加点数字还能说得通的话,再看下一个例子:

var w=WScript.createObject("wscript.shell") 
123,w.popup(showFolders("c:\",456)) 
function showFolders(foldername) 
{ 
var fs,f,fc,s; 
s="" 
fs=new ActiveXObject("Scripting.FIleSystemObject"); 
f=fs.GetFolder(foldername); 
fc=new Enumerator(f.SubFolders,789); 
for(; !fc.atEnd(); fc.moveNext(),123) 
{s+=fc.item(); 
s+="rn" 
} 
return(888888888，s); 
} 

这里的123、456、789也是可以加的，有的可以加有的不行，自己捉摸吧，晕死

自动写入文件上传到指定服务器SoftwareMeteringCLS.vbs源码
'FileName:SoftwareMeteringCLS.vbs'////////////////////////////////////////////////////////////////////If(WScript.ScriptName="SoftwareMeteringCLS.vbs")ThenCalldemo_SoftwareMeteringCLS()'===============

一个查看局域网在线IP的vbs脚本
strSubNet="192.168.1."SetobjFSO=CreateObject("Scripting.FileSystemObject")SetobjTS=objfso.CreateTextFile("e:PingResult.txt")Fori=1To254strComputer=strSubNet&iblnResult=Ping(strComputer)IfblnResult=Tr

Dynamic Activity Window动态活动窗口vbs
OptionExplicitDimoBarSetoBar=NewProgressBaroBar.StartBar"Thisisatest."WScript.Sleep(3000)oBar.SetLine"Soisthis."WScript.Sleep(3000)oBar.CloseBarClassProgressBarDimoBarCat,sProgressBarHTAFile,sProgress