shell问题

通过   shell   "c:\windows\destop\快捷方式       163.lnk"语句不能模拟点击桌面上的“快捷方式     163.lnk”来连接因特网。会提示“找不到文件”，可能是因为那不是exe文件的缘故吧。那么如何才能模拟点击桌面上的“快捷方式     163.lnk”来连接因特网呢？ 问题点数：40、回复次数：8Top

1 楼NiceFeather（EDA Router）回复于 2000-10-07 00:30:00 得分 10

如果你在win98:  
  Dim   rtn   'declare   the   needed   variables  
   
  rtn   =   Shell("rundll32.exe   rnaui.dll,RnaDial   "   &   Connection.Text,   0)   'show   the   Connect   dialogTop

2 楼freeboy（好好学习,天天向上）回复于 2000-10-07 00:35:00 得分 0

Shell   "start   "   &   """c:\windows\destop\快捷方式     163.lnk""",   vbHideTop

3 楼ericyin（安红，我想你）回复于 2000-10-07 01:08:00 得分 0

我正在制作一个用快捷键来开启程序和连接因特网的程序。我不能使用NiceFeather朋友提供的方法，因为同样的语句不可能开启其它程序。  
  Freeboy朋友提供的方法也不行，不知道为什么。除了desktop字样打错了以外，还有说明地方错了吗？Top

4 楼freeboy（好好学习,天天向上）回复于 2000-10-07 02:15:00 得分 0

ericyin，请把你的要求说详细一点Top

5 楼ericyin（安红，我想你）回复于 2000-10-07 02:47:00 得分 0

我正在制作一个软件，可以让用户自定义快捷键来控制程序的运行以及连接互联网。比如Ctrl+E是打开Internet   Explorer；Ctrl+Shift+I是连接163网（相当于点击桌面上的“快捷方式     163”）；Alt+B是打开eBookMark，等等。  
  对于运行软件，没有问题，可以用shell语句。但是对于连接互联网，由于“拨号网络”中的项目其实都不是一般的exe文件，所以shell语句就无效了。如果用rundll32.exe的方法又不能正常启动其它软件。所以，我希望有一个语句，既有运行软件的功能，又可以连接互联网。有吗？Top

6 楼freeboy（好好学习,天天向上）回复于 2000-10-07 05:41:00 得分 30

Option   Explicit  
   
  Private   Declare   Function   ShellExecute   Lib   "shell32.dll"   Alias   "ShellExecuteA"   _  
          (ByVal   hwnd   As   Long,   ByVal   lpOperation   As   String,   ByVal   lpFile   As   String,   _  
          ByVal   lpParameters   As   String,   ByVal   lpDirectory   As   String,   _  
          ByVal   nShowCmd   As   Long)   As   Long  
   
  Private   Sub   Command1_Click()  
          '打开App  
          ShellExecute   0&,   vbNullString,   "C:\WIN98\NOTEPAD.EXE",   _  
                  vbNullString,   vbNullString,   vbNormalFocus  
  End   Sub  
   
  Private   Sub   Command2_Click()  
          '打开URL  
          ShellExecute   0&,   vbNullString,   "http://www.quanqiu.com",   _  
                  vbNullString,   vbNullString,   vbNormalFocus  
  End   Sub  
  Top

7 楼gameboy999（-'_'-）回复于 2000-10-07 13:52:00 得分 0

我看你就别做这个软件了,君不见桌面的快捷方式及菜单上的lnk都可以定义快捷键吗??哈哈Top

8 楼ericyin（安红，我想你）回复于 2000-10-07 16:04:00 得分 0

谢谢freeboy.大家还有其它方法吗？没有的话我就给分了。Top

相关问题

• win98
• 语句
• 连接
• 桌面
• 因特网
• shell
• 软件
• 文件
• 互联网
• 快捷方式163

• 帖主：ericyin
• NiceFeather
• freeboy

• Visual Basic类图书
• Visual Basic类源码下载