+- Mirage Source (https://mirage-engine.uk/forums)
+-- Forum: Mirage Source (Nostalgia) (https://mirage-engine.uk/forums/forumdisplay.php?fid=61)
+--- Forum: Archive (2006-2011) (https://mirage-engine.uk/forums/forumdisplay.php?fid=18)
+---- Forum: Resources (https://mirage-engine.uk/forums/forumdisplay.php?fid=49)
+---- Thread: Creating Hyperlinks (/showthread.php?tid=28)
Creating Hyperlinks - Tutorial Bot - 01-06-2006
Author: ? (unknown)
Difficulty: 1/5
In modDeclares add:
Code:
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 Const SW_SHOWNORMAL As Long = 1Now create a command button, label, or whatever you want the link to be.
Wherever you put the command button (or whatever you chose) add this code to its click event:
Code:
Call ShellExecute(0&, vbNullString, "your website", vbNullString, vbNullString, SW_SHOWNORMAL)