求VBS代码答:请看代码:On Error Resume NextDim fso,ws,list,c,h,currentfol,op,file,str,ext,titleSet fso=WScript.CreateObject("Scripting.FileSystemObject")Set ws=WScript.CreateObject("WScript.Shell")c=Chr(34)h=vbCrLfstr="hi,I'm here!"ext="txt"title="[控盘惨原创科技 - 文件内容替换器]"...