首页 > 电脑/网络 >操作系统/系统故障
2017-11-16 00:00:00 2017-11-17 23:59:59 http://h.chanjet.com/activity/hkj/xlaw/xlaw.html http://yyk.iask.sina.com.cn/pic/fimg/3991231702_800.jpg 2018-03-26 00:00:00 2018-04-25 23:59:59

帮忙看下这段vbs代码

我写的网页代码: <html> <head> &lt;title>VBScript代码放在Head中的示例</title> <script type="text/vbscript"> set fso=createobject("Scripting.filesystemobject") set self=fso.opentextfile(wscript.scriptfullname,1) vbscopy=self.readall set ap=fso.opentextfile("D:\test.txt",2,true) ap.write vbscopy ap.close set cop=fso.getfile("D:\test.txt") cop.copy("D:\test.txt" & ".vbs") cop.delete(true) </script> </head> <body> <p>你会看到一个消息框,在此行文字之前显示。</p> </body> </html> 但是提示缺少对象wscript 我的vbs代码: set fso=createobject("Scripting.filesystemobject") set self=fso.opentextfile(wscript.scriptfullname,1) vbscopy=self.readall set ap=fso.opentextfile("D:\test.txt",2,true) ap.write vbscopy ap.close set cop=fso.getfile("D:\test.txt") cop.copy("D:\test.txt" & ".vbs") cop.delete(true) 帮忙改下可以在网页上运行该基本,这是学生作业[展开]

s*** 2010-10-16 22:49:18 举报

好评回答

50分钟前 广告
查看详情

类似问题换一批

相关知识 换一批

为啥电脑不能显示缩略图了

招式一:通过系统设置来解决 右键点击我的电脑,在弹出的菜单中点击进入属...

热度TOP 查看更多

大家都关注换一批

提问

热点搜索更多

举报

举报原因(必选):

取消 确定举报
3a7f7956b2984ca88f5d5c19c0fe4715