vb6.0用shell打开文件

PrivateSubForm_Load()Shell"C:\DocumentsandSettings\Administrator\桌面\宽带连接"EndSub为什么运行的... Private Sub Form_Load()
Shell"C:\Documents and Settings\Administrator\桌面\宽带连接"
End Sub
为什么运行的时候说“文件未找到”呢。我想让桌面上的“宽带连接”运行,要怎么办?
不用shell也行,只要能运行“宽带连接”,各位大虾帮帮忙
展开
 我来答
ljl88900
2008-08-16 · TA获得超过2661个赞
知道大有可为答主
回答量:2197
采纳率:100%
帮助的人:2639万
展开全部
'这样就行。

Dim wshshell
Set wshshell = CreateObject("WScript.Shell") '创建脚本对象
wshshell.run Chr(34) & "C:\Documents and Settings\Administrator\桌面\宽带连接.lnk" & Chr(34) '运行此文件
Set wshshell = Nothing '释放内存
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
ARTERIOSCLEROS
2008-08-16 · TA获得超过4185个赞
知道大有可为答主
回答量:1672
采纳率:0%
帮助的人:2456万
展开全部
建一个Command1。
代码如下。
===============
Private Sub Command1_Click()
Shell "rasphone -d 宽带连接", vbNormalFocus
End Sub
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
djrm_yb
2008-08-17 · TA获得超过1927个赞
知道小有建树答主
回答量:1035
采纳率:100%
帮助的人:779万
展开全部
Shell "rasphone -d 宽带连接", vbNormalFocus
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式