这段vbs代码有什么错误，求大佬解答

软件 2024-10-11

vbs 文件错误？

1. 没有文件扩展".vbs"的脚本引擎. 原因：有些软件会将“.vbs”的文件的默认打开方式改成其他的方式。手动解决： ① 先到%SYSTEMROOT%/system32/确认下自己的wscript.exe在不在，不在的话,从其它电脑上copy过来就OK ② 注册表 regedit 在HKEY_CLASSES_ROOT下面找到.VBS,看看默认值，改为默认的VBSFile。 ③ OK。从新运行。 2. 重新运行，弹出无法创建名为"WScript.Shell"的对象。解决方案，运行一下命令： regsvr32 c:\WINDOWS\system32\shell32.dll regsvr32

请问这个vbs代码哪里错了？

Dim fso,File,Num,Temp,Temp2,Num2,Num3,Temp3,Temp4,Num4,Num5,Temp5,outname Set fso = CreateObject("scripting.filesystemobject") File=WScript.Arguments(0) Num=InputBox("请输入每份字符数：") Set Re=fso.OpenTextFile(File,1) Temp = Re.ReadAll Num2=Len(Temp) Num2=Num2/Num Num2=Fix(Num2) if num2=0 then msgbox("分割未完

求点拨！我的VBS代码哪里错了？

改成这样就行，其它都不要： dim a a=InputBox("斗图文件，请输入密码！") if a="yu321253945" then Dim MZ Set MZ=WScript.CreateObject("WScript.shell") MZ.run "C:\Users\Administrator\Desktop\余掌的编程\新建文件夹\新建文件夹\新建文件夹\新建文件夹\新建文件夹\新建文件夹\新建文件夹\新建文件夹\新建文件夹\新建文件夹\斗图" else Msgbox"密码错误！",o,"再来一次" End IF

这个VBS脚本为什么编译有错误呀？求高手指教~麻烦给出正确的运行结果~

代码没有错，只是只有在iis和asp中才能跑通，在普通vbs文件中运行是缺少response对象的这份代码的执行结果，是在返回页面中输出" key:IIS&ASP "字样

这段vbs有问题么，为何不能运行？

有6个问题。问题一：第2行和倒数第2行的kill没有定义，不能使用。kill 是vb里的运算，是删除文件的命令。vbs里删除文件应该用： Set fso = CreateObject("Scripting.FileSystemObject") fso.DeleteFile "0000.bmp" fso.DeleteFile "name" 问题二：第3行for的用法错误，少了个等于，格式应该改为： for a=0 to 9999 问题三：第5行的lenth函数没有定义，字符串长度的函数应该用len s=len(k) 问题四：最后一行的next应该把a去掉。vb里可以加上a，但vbs绝对

标签：编程信息技术 vbs 电脑网络计算机