VB让软件自动运行
用VB做了个超市的pos管理系统,我现在的情况是,电脑安装的是xp系统,我需要是一开机不要直接进入桌面,而是把开机过程结束后直接运行该系统,例如:网吧的Pubwin客户端...
用VB做了个超市的pos管理系统,我现在的情况是,电脑安装的是xp系统,我需要是一开机不要直接进入桌面,而是把开机过程结束后直接运行该系统,例如:网吧的Pubwin客户端系统、富基旋风系统。请会用VB的亲们把该功能的代码写清楚点,谢谢!
展开
2个回答
展开全部
这个简单 建立一个Command1按钮 把里面的能容删除,复制下面代码
Private Sub Command1_Click()
Dim w As Object
Set w = CreateObject("wscript.shell")
w.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & "123", "D:\321\123.exe", "REG_SZ"
End Sub
上面的,123,改成你的POS管理系统名字,D:\321\123.exe,把这个改成你的
POS系统路径就行了,鼠标右键点击你的POS管理系统选属性,里面有的POS管理系统路径
Private Sub Command1_Click()
Dim w As Object
Set w = CreateObject("wscript.shell")
w.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & "123", "D:\321\123.exe", "REG_SZ"
End Sub
上面的,123,改成你的POS管理系统名字,D:\321\123.exe,把这个改成你的
POS系统路径就行了,鼠标右键点击你的POS管理系统选属性,里面有的POS管理系统路径
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询