How to Shell out to default web browser

Kita dapat Memanggil default browser kemudian menjalankan Url yang kita inginkan.
Cara menjalankan code:

‘Paste code ini pada Module
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
Public Const conSwNormal = 1

‘Paste code ini pada CommanButton
ShellExecute hwnd, “open”, “http://oom-vb.blogspot.com”, vbNullString, vbNullString, conSwNormal

Leave a Reply

Please log in using one of these methods to post your comment:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s


%d bloggers like this: