VB使用ShellExecute调用其他程序

2007-12-24 14:06:30

字体变小 字体变大
VB使用ShellExecute调用其他程序

ShellExecute APi是功能强大的函数调用接口,它不仅可以调用不带参数的可执行文件,还可以执行带参数的文件,如cmd ping 127.0.0.1,还有可以打开指定的网页和收发邮件的功能.
声明:
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
原型:
HINSTANCE ShellExecute(
  HWND hwnd,          //父窗口句柄
  LPCTSTR lpOperation,     //操作,"open","print","explore"
  LPCTSTR lpFile,       //文件名,前面可加路径
  LPCTSTR lpParameters,    //参数
  LPCTSTR lpDirectory,     //默认文件夹
  INT nShowCmd         //显示方式
);

打开一个应用程序
ShellExecute(this- 或
ShellExecute(this-

打开一个同系统程序相关连的文档
ShellExecute(this-

激活相关程序,发送EMAIL
ShellExecute(this- mailto:huolf@tom.com","","", SW_SHOW );

打开文件夹

ShellExecute(handle, "open", path_to_folder, NULL, NULL, SW_SHOWNORMAL)

用系统打印机打印文档
ShellExecute(this-

VB6中使用Shellexecute函数打开指定的谷歌浏览器,可以通过以下方式实现: 首先,我们需要在VB6的代码中引用Shell32.dll库文件,在项目中选择“工具”->“引用”,然后勾选“Shell32”。这样我们就可以使用ShellExecute函数。 接下来,在代码中使用ShellExecute函数来打开指定的谷歌浏览器,方法如下: ``` 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 Sub OpenGoogleChrome() Dim chromePath As String Dim url As String Dim ret As Long chromePath = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe" '指定谷歌浏览器的路径 url = "https://www.google.com" '指定要打开的网址 ret = ShellExecute(0, "open", chromePath, url, "", 1) '调用ShellExecute函数打开谷歌浏览器 If ret > 32 Then MsgBox "谷歌浏览器已成功打开" Else MsgBox "打开谷歌浏览器失败" End If End Sub ``` 以上代码中,我们将Chrome浏览器的路径指定为chromePath变量,将要打开的网址指定为url变量。然后,使用ShellExecute函数,指定打开方式为“open”,传递谷歌浏览器路径和网址作为参数,再传递空字符串表示当前目录,最后传递1表示最大化窗口显示。 最后,根据ShellExecute函数的返回值,判断是否成功打开谷歌浏览器,并通过消息框显示相应的提示信息。 这样,我们就可以使用VB6中的Shellexecute函数来指定打开谷歌浏览器了。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值