PDA

View Full Version : جستجوی حرف در d.b



sajjad1365
شنبه 15 دی 1386, 16:39 عصر
بسم الله. سلام
دوستان ' من میخوام در یک دیتابیس بر اساس یک حرف یا جند حرف جستجو کنم.
از دوستان اگه راهنمای کنن ممنون میشم.
یا علی

sajjad1365
شنبه 15 دی 1386, 18:30 عصر
سلام.
پس چی شد؟ راهنمایی نمیکنید؟

ƒxmahdi
شنبه 15 دی 1386, 19:16 عصر
من چندین بار این کار را کرده امبرای این کار ابتدا دیتابیس را به اول ببرید بعد با دستور left یک رشته یا چند رشته را استخراج نمایید بعد با مقدار مورد نظر مقایسه کنید بعد دیتابیس را به رکورد بعدی ببرید بهتره که از دستور for تا به پایان رسیدن دیتابیس استفاده نمایید اگر نمی توانید این کار را با دستورات وی بی به خوبی انجام دهید تا کد ها را برایتان بگذارم

sajjad1365
یک شنبه 16 دی 1386, 00:28 صبح
بسم الله.باسلام
ممنون از دوست عزیز fxmahdi . منظورت رو فهمیدم.اگه کد رو هم بزاری ممنون میشم.

SeyedMoosavi
یک شنبه 16 دی 1386, 00:49 صبح
سلام
اگه منظورتون رو ردست متوجه شده باشم این کد برنامه

ƒxmahdi
یک شنبه 16 دی 1386, 10:59 صبح
دوست عزیز من دیروز منتظر جوابتون بودم ولی شما دیر پاسخ دادید به هر حال دوست خوبمون آقای موسوی برنامه ای را هم گذاشته اند من کد ها را با توضیح کامل برایتان می گذارم
If Tsearch.Text <> "" Then
Data1.Recordset.MoveFirst
Tsearch.Text کادر جستجو برای یافتن در دیتابیس است
For i = 1 To Data1.Recordset.RecordCount - 1
nums = Trim(Tsearch.Text)
nums = Len(nums)
nums تعداد کارکتر ها برای جستجو را بدست می آورد
nums = Left(Text1.Text, nums)
مثلا text1 کادر نام است و شما بر اساس نام دارید جستجو می کنید سپس به تعداد مورد نظر کارکتر از کادر نام جدا شده و باز در nums ذخیره می شود
if nums = Tsearch.Text Then
Form2.TN(1).Text = Text1.Text
Form2.TF(1).Text = Text2.Text
Form2.TT(1).Text = Text3.Text
Form2.TM(1).Text = Text4.Text
end if
Form2.TN(1).Text مثلا شما در فرم دوم تکست هایی برای اضافه شدن مشخصات را دارید
در اینجا چهار مشخصه برنامه دارد (نام نام خانوادگی تلفن موبایل)
Data1.Recordset.MoveNext
next i
در صورتی که از ADO استفاده می کنید می توانید همین کار را انجام دهید
موفق باشید

sajjad1365
یک شنبه 16 دی 1386, 22:54 عصر
بسم الله .سلام
با تشکر ازدوست عزیزم که این برنامه رو گذاشتند واستفاده کردیم.
ولی ' این برنامه فقط هر اسمی که اولش اون حرف باشه برمیگردونه
ولی من میخواستم مثلا اگر چند تا اسم "محمد یا محمدعلی یا محمد پور و... در d.b " باشه
وقتی در جستجو "محمد" مینویسیم همه این گزینه ها رو نشان بده.
اگر منظورم رو نتونستم بروسونم باز بگین بیشت توضیح بدم.
در هر صورت از برنامت تشکر میکنم.

Mbt925
دوشنبه 17 دی 1386, 00:41 صبح
از دستور زیر استفاده کنید :



Select * From Table1 Where Name Like '%محمد%'



Name اسم فیلد موردنظرتونه
اینجا محمد رو مثال زدم ، خودتون می تونین تعمیمش بدین .

اگه مثال واضح نیست ، نمونه قرار داده میشه.