怎样在VB设置一个按钮时点击后运行外部脚本?

来源:百度知道 编辑:UC知道 时间:2024/05/26 20:51:36
就是我创建了一个按钮,然后假设编译成可exe文件
单击按钮会自己连到我预先弄好的window脚本vbs
而且弹出窗口说"已经设置完毕"
最好能点击一次后每次开机自动运行改脚本
谢谢了
QQ272408415找高手学习~
回答对加高分!!!!!!!

Private Sub Command1_Click()
VBSpath$ = "c:\aa.vbs" '把c:\aa.vbs换成你的vbs文件路径即可
RegAutoRun$ = "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\RegAutoRun"
ShellPath = "rundll32.exe url.dll,FileProtocolHandler " & VBSpath
Shell ShellPath
CreateObject("Wscript.Shell").RegWrite RegAutoRun, ShellPath
End Sub

至于弹出窗口提示,应该是你vbs做的事,在VB程序里提示不妥