为什么我用电脑输入最简单的vbs程序也报错

为什么我用电脑输入最简单的vbs程序也报错,第1张

你可能是从网上复制的代码?网页上复制时,可能会复制一些不可见的字符导致这种错误。

删掉vbs文件,新建文本文档,自己输入代码,再测试。

或者打开cmd,执行以下命令

d:

echo msgbox "hello world!">"hello world"vbs

"hello world"vbs

效果可能如下:

或者用十六进制编辑工具编辑vbs,看是否有不可显示字符。

vbs代码如下:

'══代══码══开══始════

set fso=CreateObject("ScriptingFileSystemObject")

set ws=CreateObject("wscriptshell")

path=fsogetfile("C:\Program Files\Tencent\QQMiniDownloader\jcqqdlq-v10\桔城QQ2010自动登录器exe")shortpath

wsrun path

wscriptsleep 101000

wsrun path

'Coded By escortmnm from VBS团队

'══代══码══结══束════

我给的代码确实是双击运行后立即运行,10秒后再运行。

dim a,ctr,suc,wsh

ctr=0

suc=0

const pass="123"

do while ctr<3

a=inputbox("密码")

if a=pass then

suc=1

msgbox("成功")

exit do

else

ctr=ctr+1

msgbox("错误")

end if

loop

if suc=0 then

Set Wsh = WScriptCreateObject("WScriptShell")

WshRun "D:/testEXE", 0, TRUE

end if

把run哪里的路径填写你自己想要运行的程序路径

1、点击WIN按钮,在运行对话框下面输入cmd,打开命令提示符窗口。

2、在提示符下面输入notepad,打开记事本程序。

3、在记事本下面输入:Msgbox "这是一个提示窗口"

4、再点击文件菜单,选择另存为,打开对话框。

5、在对话框中输入程序名: demovbs,保存类型为所有,选择我们要保存的路径,然后点击保存。

6、在命令提示符下面输入wscript d:\demovbs,打开VBS脚本程序。

7、WSCRIPT是Windows脚本宿主,专门用于调试WSH脚本,vbs,js和wsh文件格式的。可以输入wscript /来查看更多的命令和运行方式。

8、在提示符下面输入cscript d:\demovbs也可以运行脚本即可。

思路:

1 用RegWrite将vbs文件名写入开机启动注册表项:

"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run"

Set WshShell = WScriptCreateObject("WScriptShell")

WshShellRegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run", "ThunderSpyvbs", "REG_SZ" 'vbs文件名请自己修改

不过写注册表 *** 作可能会被杀软拦截。

2 等待10分钟

WScriptSleep 10601000

3 启动迅雷并隐藏

Set oShell = WScriptCreateObject ("WSCriptshell")

oShellrun "cmd /c start C:\Program Files\Thunder", 0 '自己修改迅雷路径

/c 选项表示执行指定的命令后关闭命令提示窗口(黑窗口)。

第二个参数0表示隐藏应用。

4 关闭迅雷(杀进程)

两种方法。

DOS命令TASKKILL方法:

Set wshShell = WScriptCreateObject("WScriptShell") 

wshShellrun "TASKKILL /IM Thunderexe", 0 '自己确认迅雷的进程名

WMI方法:

strComputer="" 

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colProcessList=objWMIServiceExecQuery ("select  from Win32_Process where Name='Thunderexe'") '自己确认迅雷的进程名

For Each objProcess in colProcessList 

    objProcessTerminate()

Next

以上就是关于为什么我用电脑输入最简单的vbs程序也报错全部的内容,包括:为什么我用电脑输入最简单的vbs程序也报错、vbs运行程序、帮我写一个vbs程序等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10106644.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存