Yeni Sayfa Da Link Açma
-
ben formun üstünde label veya buton a tıklandığında örn http://www.google.com ya da C:\Downloads yolunu yeni sayfada açılmasını nasıl sağlayabilirim.
-
'Formun declarations kısmına:
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'Butonun click yada labelin click olayına neyse iste..
url = ShellExecute(Me.hwnd, "Open", "http://www.tahribat.com", "", "", 1)
'Tıklandıında tahribat.com u yeni ie penceresinde açar..
Eywallah..
-
teşekkür ederim,ama olmadı ya da ben yapamadım.Command1 e tıklanıldığında açılacak şekilde tekrar yazabilir misin?
-
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 LongPrivate Sub Command1_Click()
url = ShellExecute(Me.hwnd, "Open", "http://www.tahribat.com", "", "", 1)
End Sub -
buton ekleyip hepsiini yapıştırıyorum,hata veriyor.Hata da şu:
Compile error
Variable not defined
bu hata çıkıyor ve url= bölümünü gösteriyor.
Ne yapmak gerekiyor acep?
-
Senin visual basic kaç?Bide URL Yazmadan dene bakiim
ShellExecute(Me.hwnd, "Open", http://www.tahribat.com, "", "", 1)
gibi..
-
vb 6.0 kullanıyorum.url olmadan yaptım bu sefer de = işareti yok diye hata verdi.Sen denedin mi peki kodu?
-
o zaman dinamic variant deisken tanımla URL diye gitsin bitsin olmazsa yaz oraya visual basic a.ına koimm diye :)
-
Shell "explorer.exe " & "http://www.tahribat.com", 1
bu kodu butonun yormad1ma ekle sitenin ad1n1 edistir...
-
Ewt bu daha kolaymıs..
-
Hacker-T bunu yazdı:
Shell "explorer.exe " & "http://www.tahribat.com", 1
bu kodu butonun yormad1ma ekle sitenin ad1n1 edistir...
teşekkür ederim,umarım başka üyelerin de işine yarar
