جمع دو عدد

[aref1364]

سلام:

بعضی وقتا چیزایی به سادگی جمع دو تا عدد یک روز تمام وقت آدمو میگیرن. مثل من!!!!
من یه صفحه asp.net با vb.net دارم که توش به جای captcha میخوام از جمع دو تا عدد استفاه کنم ولی همیشه مینیویسه جمع اعداد اشتباه هستند. هر کاریم کردم نشد که نشد.
لطفا یه نگاهی به این کد بکنید بگید ایرادش چیه:

page_load اینه:


If Not IsPostBack Then
rn1 = Int((10 * Rnd()))
lbl1.Text = rn1
rn2 = Int((10 * Rnd()))
lbl2.Text = rn2
Session(\"rnf\") = rn1 + rn2
End If

تو ساب روتین کلیک بر روی دکمه هم اینه:

If Not txtresult.Text = Session(\"rnf\") Then
lblresult.Text = \"حاصل جمع صحیح نمی باشد!\"
rn1 = Int((10 * Rnd()))
lbl1.Text = rn1
rn2 = Int((10 * Rnd()))
lbl2.Text = rn2
Session(\"rnf\") = rn1 + rn2
End If

دم همتون گرم. یکی کمک کنه که این بد جوری رفته رو اعصاب من!
خیلی ممنون

 

[balabala]

If Not IsPostBack Then
rn1 = Int((10 * Rnd()))
lbl1.Text = rn1
rn2 = Int((10 * Rnd()))
lbl2.Text = rn2
Session("rnf") = rn1 + rn2
End If
 
[COLOR=blue]If val(txtresult.Text) <> val(Session("rnf")) Then[/COLOR]
lblresult.Text = "حاصل جمع صحیح نمی باشد!"
rn1 = Int((10 * Rnd()))
lbl1.Text = rn1
rn2 = Int((10 * Rnd()))
lbl2.Text = rn2
Session("rnf") = rn1 + rn2
End If

 

[aref1364]

If Not IsPostBack Then
rn1 = Int((10 * Rnd()))
lbl1.Text = rn1
rn2 = Int((10 * Rnd()))
lbl2.Text = rn2
Session(\"rnf\") = rn1 + rn2
End If
 
[COLOR=blue]If val(txtresult.Text) <> val(Session(\"rnf\")) Then[/COLOR]
lblresult.Text = \"حاصل جمع صحیح نمی باشد!\"
rn1 = Int((10 * Rnd()))
lbl1.Text = rn1
rn2 = Int((10 * Rnd()))
lbl2.Text = rn2
Session(\"rnf\") = rn1 + rn2
End If

آقا دستت درد نکنه اما بازم جواب نداد. نکته اینکه وقتی مقدار رو به یه textbox میدم و باهاش مقایسه می کنم قشنگ کار می کنه اما روی متغیرها یا session یا cache نه!!!
شاید مربوط به viewstate باشه.

 

[aref1364]

آقا دستت درد نکنه اما بازم جواب نداد. نکته اینکه وقتی مقدار رو به یه textbox میدم و باهاش مقایسه می کنم قشنگ کار می کنه اما روی متغیرها یا session یا cache نه!!!
شاید مربوط به viewstate باشه.

آقا یک جواب بده لطفا!!!!!!!

 

[balabala]

پروژه رو اتچ کن. اینطوری نمیشه فهمید مشکل چیه!

 

[Graveworm]

ببین اینجوری جواب میده ؟

If Not CINT(txtresult.Text) = CINT(Session(\"rnf\")) Then

 

[aref1364]

با سپاس از تمامی عزیزان، مشکل بنده حل شد. جالب بود. مشکل فقط سر همین بود که من متغیرهای global رو integer تعریف کرده بودم اما موقع مقایسه string مقایسه می کردم. با تغییر integer به string مشکل حل شد.
به همین سادگی!

درود بر همه شما