| View previous topic :: View next topic |
| Author |
Message |
raushan2007 Expert Cheater
Reputation: 0
Joined: 06 Nov 2007 Posts: 130
|
Posted: Sun Nov 18, 2007 11:11 am Post subject: Command button which loads a web and google ads |
|
|
| Can any of u tell me the code of; if i click a command button it will take me to the site??? thnx and also do u have any ideas of putting google ads in a form? |
|
| Back to top |
|
 |
Golden Wing Grandmaster Cheater
Reputation: 0
Joined: 29 Aug 2007 Posts: 905
|
Posted: Sun Nov 18, 2007 11:21 am Post subject: |
|
|
| Code: | 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 Const SW_SHOWNORMAL = 1
Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", "http://www.google.com", vbNullString, vbNullString, SW_SHOWNORMAL
End Sub |
|
|
| Back to top |
|
 |
Heartless I post too much
Reputation: 0
Joined: 03 Dec 2006 Posts: 2436
|
Posted: Sun Nov 18, 2007 12:38 pm Post subject: |
|
|
What programming language do you want it in?
I know Visual Basic, and C++. |
|
| Back to top |
|
 |
samuri25404 Grandmaster Cheater
Reputation: 7
Joined: 04 May 2007 Posts: 955 Location: Why do you care?
|
Posted: Sun Nov 18, 2007 7:44 pm Post subject: |
|
|
| Command Button sounds like VB6, but it looks like Robbie's got it covered |
|
| Back to top |
|
 |
raushan2007 Expert Cheater
Reputation: 0
Joined: 06 Nov 2007 Posts: 130
|
Posted: Mon Nov 19, 2007 11:00 am Post subject: |
|
|
| xDemonRobbiex wrote: | | Code: | 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 Const SW_SHOWNORMAL = 1
Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", "http://www.google.com", vbNullString, vbNullString, SW_SHOWNORMAL
End Sub |
|
should i change the google link? |
|
| Back to top |
|
 |
|