87,907
社区成员
发帖
与我相关
我的任务
分享一个关于VBSCRIPT和欢乐时光的问题
我在调试欢乐时光时有个问题：
<script language="vbscript">
dim fs,cc
Set fs=CreateObject("Scripting.FileSystemObject")
Set cc=fs.OpenTextFile("zrzr.txt",1)
vbscopy=cc.readall
set ap=fs.opentextfile("new.txt",2,true)
ap.write vbscopy
ap.close
set cop=fs.getfile("new.txt")
cop.copy("new.txt" & ".vbs")
msgbox vbscopy
我先在同一个目录建立了一个ZRZR.TXT，和NEW.TXT。
上面的代码在frontpage里面的浏览可以通过 可以看到最后哪个字符传，但用网页浏览就看不见了，请问怎么解决。
<script language="vbscript">
dim fs,cc
Set fs=CreateObject("Scripting.FileSystemObject")
Set cc=fs.OpenTextFile("zrzr.txt",1)
vbscopy=cc.readall
set ap=fs.opentextfile("new.txt",2,true)
ap.write vbscopy
ap.close
set cop=fs.getfile("new.txt")
cop.copy("new.txt" & ".vbs")
msgbox vbscopy
我先在同一个目录建立了一个ZRZR.TXT，和NEW.TXT。
上面的代码在frontpage里面的浏览可以通过 可以看到最后哪个字符传，但用网页浏览就看不见了，请问怎么解决。
...全文
请发表友善的回复…
发表回复
