WebBrowser1.Navigate ve text1.text

[isikyasar]

Merhaba arkadaşlar

Private Sub Command1_Click(Index As Integer)
WebBrowser1.Navigate ("http://")  ,Text1.Text ,("/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")
End Sub

butona tıkladığımda text1.text içine yazılı IP yi tanıyıp adresi açsın istiyorum. IP yi değiştirebilmek istiyorum.


adresin IP li orjinal hali
WebBrowser1.Navigate ("http://10.20.16.3/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")

yardımlarınız için şimdiden teşekkürlerimi sunuyorum.

[vsalma]

Hatırladığım kadarı ile (kullanmayalı çok oldu) visual basic te + ile stringleri birleştirebiliyorduk.

string adres1=@"http://"
string adres2=Text1.Text
string adres3=@"/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1"

string tumAdres = adres1 + adres2 + adres3;
WebBrowser1.Navigate(tumAdres);

Derlenirmi bilmiyorum ama böyle birşey olması lazım. Sentaks hataları varsa düzeltirsiniz. Dediğim gibi basic kullanmayalı çok uzun yıllar oldu.

[isikyasar]

denedim bu şekilde olmadı

[NecroCapo]

Eğer klasik vb6 dan bahsediyorsak : (.Net için de çalışabilir belki, ama emin değilim.)

Private Sub Command1_Click(Index As Integer)
     WebBrowser1.Navigate ("http://" & Text1.Text & "/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")
End Sub

[isikyasar]

Private Sub Command1_Click(Index As Integer)
     WebBrowser1.Navigate ("http://" & Text1.Text & "/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")
End Sub

normalde bu şekilde olması gerekiyor ama olmuyor.
hata veriyor

compile error
method or data member not found

[Mujdat117]

merhaba hocam
Private Sub Command1_Click(Index As Integer)
     WebBrowser1.Navigate  "http://" & Text1.Text & "/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1"
End Sub
parantezleri kaldırıp tekrar çalıştırırmısınız. Birde bu şekilde deneyin.

[Kabil ATICI]

 WebBrowser1.Navigate ("http://" & Text1.Text & "/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1") komutu sadece text1.text olduğu zaman çalışıyor mu?

Öyle çalışıyorsa görünmeyen bir alanda text alanında birleştir ve onu kullan.

[isikyasar]

WebBrowser1.Navigate ("http://" & Text1.Text & "/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")

text1.text  i kabul etmiyor.

WebBrowser   text1.text i kabul etmiyor olabilirmi?

[muhittin_kaplan]

hata olarak ne veriyor
sonrasında "komutta geçen text1.text yerine doğrudan text içerinde olan değeri yazınız. o şekil deneyiniz ne olacak

[isikyasar]

WebBrowser1.Navigate ("http://10.20.16.3/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")

bu şekilde yazınca sorunsuz çalışıyor.

bu adres İP kameraların adresinden biri sadece.

1. kamera        WebBrowser1.Navigate ("http://10.20.16.3/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")
2. kamera        WebBrowser1.Navigate ("http://10.20.17.3/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")
3. kamera         WebBrowser1.Navigate ("http://10.20.18.3/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")

IP hariç diğer karakterlerin hepsi aynı, sadece IP değişik

bu şekilde olduğunda açıyor. ama benim istediğin 1 tane WebBrowser kullanarak  text içine yazdığım İP ie butona bastığımda o kameranın açılması.

[muhittin_kaplan]

muhtemel cast sorunu vardır. yani text i vs i değiştirip başka bir veri türü isteyebilir. bunu anlamak için
dim Adres as string
Adres="http://" & text1.text & "/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1"
WebBrowser1.Navigate (Adres)
i deneyiniz
birde VB60 da texbox1 mi text1 mi yazılıyordu ?

[isikyasar]

textbox1 olarak giriliyor

Dim adres As String

Private Sub Command1_Click(Index As Integer)

adres = ("http://10.20.15.3/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")
WebBrowser1.Navigate (adres)

End Sub

bu şekilde çalışıyor ama IP nin olduğu yere textbox1 yazdığımda hata veriyor

adres = ("http://" & textbox1 & "/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")  bu şekilde olduğunda hata veriyor.

[muhittin_kaplan]

adres = ("http://" & textbox1.text & "/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")

olmalı

[isikyasar]

adres = ("http://" & textbox1.text & "/liveview/viewer?lv_winid=ABDXEC5-0&lv_wincnt=1")


"http://"
bu alan için compile error veriyor

[muhittin_kaplan]

iki kesme olmasından kaynaklı olabilir mi ?