vb6.0用shell打开文件
PrivateSubForm_Load()Shell"C:\DocumentsandSettings\Administrator\桌面\宽带连接"EndSub为什么运行的...
Private Sub Form_Load()
Shell"C:\Documents and Settings\Administrator\桌面\宽带连接"
End Sub
为什么运行的时候说“文件未找到”呢。我想让桌面上的“宽带连接”运行,要怎么办?
不用shell也行,只要能运行“宽带连接”,各位大虾帮帮忙 展开
Shell"C:\Documents and Settings\Administrator\桌面\宽带连接"
End Sub
为什么运行的时候说“文件未找到”呢。我想让桌面上的“宽带连接”运行,要怎么办?
不用shell也行,只要能运行“宽带连接”,各位大虾帮帮忙 展开
3个回答
展开全部
'这样就行。
Dim wshshell
Set wshshell = CreateObject("WScript.Shell") '创建脚本对象
wshshell.run Chr(34) & "C:\Documents and Settings\Administrator\桌面\宽带连接.lnk" & Chr(34) '运行此文件
Set wshshell = Nothing '释放内存
Dim wshshell
Set wshshell = CreateObject("WScript.Shell") '创建脚本对象
wshshell.run Chr(34) & "C:\Documents and Settings\Administrator\桌面\宽带连接.lnk" & Chr(34) '运行此文件
Set wshshell = Nothing '释放内存
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
建一个Command1。
代码如下。
===============
Private Sub Command1_Click()
Shell "rasphone -d 宽带连接", vbNormalFocus
End Sub
代码如下。
===============
Private Sub Command1_Click()
Shell "rasphone -d 宽带连接", vbNormalFocus
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Shell "rasphone -d 宽带连接", vbNormalFocus
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询