Stránka: 1 z 1
| [ Príspevkov: 13 ] | |
| Autor | Správa |
|---|
Registrovaný: 14.01.09
Prihlásený: 22.09.13
Príspevky: 78
Témy: 20 | 20 |
ahojte potreboval by som spravit vo vb : Bud ked kliknem na button aky code aby sa po kliknuti napojil na Counter strike server. Alebo ako spravit button ktory ta presmeruje na nejaku page
|
|
Registrovaný: 16.01.08
Prihlásený: 27.03.13
Príspevky: 641
Témy: 144 | 144
Bydlisko: Žilina |
toto by malo frcat:
Kód: Private Sub cmdOpen_Click()
ShellExecute 0, vbNullString, "http://www.vbweb.co.uk/", vbNullString, vbNullString, vbNormalFocus
End Sub
_________________
Mac Book Pro 15.4", CPU: Intel Core 2 Duo 2.8 GHz, RAM: 4GB DDR3, HDD: 500 GB, VGA: 512MB GDDR3, OS: Mac OS X Lion; Mobil: HTC ONE S |
|
Registrovaný: 14.01.09
Prihlásený: 22.09.13
Príspevky: 78
Témy: 20 | 20 |
Error 1 Name 'ShellExecute' is not declared. C:\Documents and Settings\Miko\Local Settings\Application Data\Temporary Projects\WindowsApplication1\Form1.vb 4 9 WindowsApplication1
|
|
Registrovaný: 16.01.08
Prihlásený: 27.03.13
Príspevky: 641
Témy: 144 | 144
Bydlisko: Žilina |
treba deklarovat:
Kód: 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
_________________
Mac Book Pro 15.4", CPU: Intel Core 2 Duo 2.8 GHz, RAM: 4GB DDR3, HDD: 500 GB, VGA: 512MB GDDR3, OS: Mac OS X Lion; Mobil: HTC ONE S |
|
Registrovaný: 14.01.09
Prihlásený: 22.09.13
Príspevky: 78
Témy: 20 | 20 |
cele to bude takto
Kód: Public Class Form1
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 Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ShellExecute(0, vbNullString, "http://www.vbweb.co.uk/", vbNullString, vbNullString, vbNormalFocus)
End Sub
End Class
ale nefunguje
ako ono ukaze ale neotvori mi prehliadac
|
|
Registrovaný: 16.01.08
Prihlásený: 27.03.13
Príspevky: 641
Témy: 144 | 144
Bydlisko: Žilina |
tak skus takto:
Kód: Public Class Form1
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 Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ShellExecute (0, "open", "http://www.vbcodesource.info", vbNullString, vbNullString, 1)
End Sub
End Class
_________________
Mac Book Pro 15.4", CPU: Intel Core 2 Duo 2.8 GHz, RAM: 4GB DDR3, HDD: 500 GB, VGA: 512MB GDDR3, OS: Mac OS X Lion; Mobil: HTC ONE S |
|
Registrovaný: 14.01.09
Prihlásený: 22.09.13
Príspevky: 78
Témy: 20 | 20 | |
Registrovaný: 16.01.08
Prihlásený: 27.03.13
Príspevky: 641
Témy: 144 | 144
Bydlisko: Žilina |
tak este takto:
Kód: Public Class Form1
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 Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ExecLink "http://google.com", vbNormalFocus
End Sub
Private Sub ExecLink(Url As String, style As VbAppWinStyle)
Shell "explorer.exe " & Url & "", stlye
End Sub
End Class
_________________
Mac Book Pro 15.4", CPU: Intel Core 2 Duo 2.8 GHz, RAM: 4GB DDR3, HDD: 500 GB, VGA: 512MB GDDR3, OS: Mac OS X Lion; Mobil: HTC ONE S |
|
Registrovaný: 14.01.09
Prihlásený: 22.09.13
Príspevky: 78
Témy: 20 | 20 |
nic nespravi kokos sak neni nieco jednoduche ako spravit button a otvori sa ti nejaka stranka
|
|
Registrovaný: 16.01.08
Prihlásený: 27.03.13
Príspevky: 641
Témy: 144 | 144
Bydlisko: Žilina |
aky mas VB?
_________________
Mac Book Pro 15.4", CPU: Intel Core 2 Duo 2.8 GHz, RAM: 4GB DDR3, HDD: 500 GB, VGA: 512MB GDDR3, OS: Mac OS X Lion; Mobil: HTC ONE S |
|
Registrovaný: 14.01.09
Prihlásený: 22.09.13
Príspevky: 78
Témy: 20 | 20 | |
Registrovaný: 02.11.08
Prihlásený: 10.08.12
Príspevky: 85
Témy: 1 | 1 |
Kód: System.Diagnostics.Process.Start("http://www.google.com")
|
|
Registrovaný: 14.01.09
Prihlásený: 22.09.13
Príspevky: 78
Témy: 20 | 20 |
fuu konecne nieco spravne vdaka ti moc
|
|
Stránka: 1 z 1
| [ Príspevkov: 13 ] | |
|
