مشکل کدهای من چیست؟!

[mand1404]

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If text1.Text = text2.Text Then
WebBrowser1.Url = "yahoo.com"
ElseIf WebBrowser1.Url = "google.com" Then
errortext.Text = "کد اشتباه هست"
End If
End Sub


ElseIf WebBrowser1.Url = "google.com" Then
این قسمت با مشکل مواجهه :(

[shahryari]

سلام
کد شما دوتا اشکال داره
1 - آدرس ها باید کامل وارد شون مثال: http://www.google.com
2 - نیازی به elseif نیست، else به تنهایی کفایت میکند

[mand1404]

سلام
مشکل من مورد اول نبود
من else هم دارم یادم رفت اینجا بذارمش.
کلا این بخش رو با خطا اجرا میکنه WebBrowser1.Url = "google.com" میگه نمیشه string قرار داده بشه یه چیزی تو همین مایه ها. حتی واسه nagetive هم همین مشکل رو دارم
میخوام بگم اگر داخل این صفحه بود مرورگر برو فلان کار بکن
که اینجوری با خطا مواجه میشه:(
نمیدونم چرا

[مهرداد صفا]

با سلام.
لطفا متن خطا؟
ولی در کل Url با String مقایسه شده که میتوانید قبل از مقایسه به رشته تبدی کنید:

if Browser.URI.ToString="..."
'or
if Browser.URL.OrigenalString="..

[mand1404]

مشکل شد دوتا داداش


If WebBrowser1.Url.ToString() = "google.com" Then
WebBrowser1.Navigate("yahoo.com/")
End If



میخوام وقتی webbrowser سایت گوگل بود به سایت یاهو تبدیل بشه. به Then گیر میده. این خطاش:
Object reference not set to an instance of an object.
NullReference Exception occured

[erfan_urchin]

دوست عزیز شما کدتو داری اشتباه مینویسی. شما باید از راه زیر استفاده کنی

If webBrowser1.Url = New Uri("http://www.google.com") Then
webBrowser1.Url = New Uri("http://www.yahoo.com")
End If

موفق باشی

[erfan_urchin]

راستی اگرم میخوای از راه Navigate کدتو بنویسی باید از این کد استفاده کنی
webBrowser1.Navigate(New Uri("http://www.yahoo.com"))
در ضمن حتما باید //:http رو بنویسی وگرنه ارور میگیره
موفق باشی

[mand1404]

سلام
من کدهای شما رو جایگزین کردم اما با پیغام زیر مواجه شدم
The requested resource is in use. (Exception from HRESULT: 0x800700AA)

:(

[mand1404]

سلام
مشکل من حل نشد...
کسی میتونه کمکم کنه؟!:ناراحت:

[erfan_urchin]

عزیز من شما کل کدهایی رو که نوشتیو (از اون اول تا اون آخر) بزار ببینیم مشکل چیه؟؟؟

[mand1404]

سلام

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If webBrowser1.Url = New Uri("http://www.google.com") Then
webBrowser1.Url = New Uri("http://www.yahoo.com")
End If


End Sub



کدهای من اینه!

[erfan_urchin]

سلام

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If webBrowser1.Url = New Uri("http://www.google.com") Then
webBrowser1.Url = New Uri("http://www.yahoo.com")
End If


End Sub



کدهای من اینه!

:متعجب::متعجب::متعجب::متعجب::� �تعجب:
دوست عزیز شما اگه میخوای کدهای خودتو بنویسی پس دگه چرا سوال میپرسی؟؟؟؟!!!!!:متعجب::لبخند:
من گفتم چی بنویس شما چی نوشتی!! :لبخند:
من گفتم این کدهارو بنویس
If webBrowser1.Url = New Uri("http://www.google.com") Then
webBrowser1.Url = New Uri("http://www.yahoo.com")
End If
بعد یه نکته دیگه. شما چون داری از تایمر استفاده میکنی و میخوای بعد این که URL عوض شد همون سایت مورد نظر رو بیاره باید آخر کدهات webbrowser رو آپدیت کنی. یعنی یه همچین چیزی
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If WebBrowser1.Url = New Uri("http://www.google.com") Then
WebBrowser1.Url = New Uri("http://www.yahoo.com")
WebBrowser1.Update()
End If
End Sub