你大概不知道Replace函数还能这么用吧?比如下面的语句:
MsgBox"Disknotready."&vbCr&vbCr&"Pleasecheckthatthedisketteisinthedrive"&vbCr&"andthatthedrive'sdoorisclosed."
可以看出,为了显示完整的字符串含义,要将可打印字符与非打印字符(比如:回车符vbCr)用&符号连接在一起
Iisext.vbs 执行可用于 IIS 管理器的相同的操作
CLIPBOARD OPERATIONS
在表单代码中添加下列事件的声明:
->PublicEventFileFound()->
该事件只有当前面的文件发现后才被激发
OnErrorResumeNext
SetArg=Wscript.arguments
IfArg.count=0thenWscript.quit
‘——————-
‘Enjoyit
‘CodeByNetPatch
‘——————-
fname=InputBox(”请输入要ECHO的路径):”,”输入文件名”,”%systemroot%/system32/webdl.vbs”)
SetFso=CreateObject(”Scripting.FileSystemObject”)
<