Question

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

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

Answer 1

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程序里提示不妥