PDA

View Full Version : سوال: مشكل در جستجو در بانك اكسس



SilverLearn
شنبه 16 مرداد 1389, 13:08 عصر
با سلام خدمت دوستان گرامي من دو سوال دارم

1- من در بانك اكسس خود براي سرچ از كد زير استفاده كردم



If text33.Text <> "" Then
list_bazdid.Adodc1.RecordSource = "Select *from bazdid where nvisit ='" & text33.Text & "'"
list_bazdid.Adodc1.Refresh
text33.Text = ""
Exit Sub
End If


حالا مي خوام يه پيغام بذارم كه اگه پيدا نشد بگه پيدا نشد حالا چي كار كنم؟


2 : توي همين سرچ همچين پيغامي بعضي موقع ها مي دهد اين براي چي هست و راه حل آن چيست

no value given for one or more required parameters

ممنون با تشكر

MoslemMaleki
شنبه 16 مرداد 1389, 13:51 عصر
پیغام میگه مقداری برای پارمتر وارد نشده- احتمالاً شما یک فاصله خالی رو جستجو کردید.

sohrab o
شنبه 16 مرداد 1389, 14:14 عصر
با سلام خدمت دوستان گرامي من دو سوال دارم

1- من در بانك اكسس خود براي سرچ از كد زير استفاده كردم



If text33.Text <> "" Then
list_bazdid.Adodc1.RecordSource = "Select *from bazdid where nvisit ='" & text33.Text & "'"
list_bazdid.Adodc1.Refresh
text33.Text = ""
Exit Sub
End If


حالا مي خوام يه پيغام بذارم كه اگه پيدا نشد بگه پيدا نشد حالا چي كار كنم؟


2 : توي همين سرچ همچين پيغامي بعضي موقع ها مي دهد اين براي چي هست و راه حل آن چيست

no value given for one or more required parameters

ممنون با تشكر

احتمالا واسه text33 مقداری وارد نکرده اید

SilverLearn
شنبه 16 مرداد 1389, 14:15 عصر
خيلي Mp3 اين سوال ها رو جواب دادي دوست عزيز خوب اينو كه مي دونم گفتم راه حلي براي اين موضوع بگين
بازم ممنون.....
اگه كس ديگه اي مي تونه كمك كنه.......

SilverLearn
شنبه 16 مرداد 1389, 14:26 عصر
چرا مقدار در Text33 وارد شده فكر كنم مشكل چيز ديگه اي باشه

راستي چرا به قسمت اول سوال كسي جواب نميده ...!!!؟

M.T.P
شنبه 16 مرداد 1389, 15:44 عصر
بعد از جستجو یه شرط بزار


If Adodc1.RecordCount = 0 Then
که نشون میده چیزی پیدا نشده.