PDA

View Full Version : فيلتر كردن adodc با دو شرط



سيد محمد علي رحيمي
یک شنبه 28 مهر 1387, 12:57 عصر
سلام دوستان
يك سوال در مورد adodc داشتم
چه جوري ميشه از قابليت فيلتر كردن adodc استفاده كرد كه بطور مثال از تاريخي كه در تكست باكس اولي نوشتيم فيلتر را شورع كنه وو در تكس باكس دومي فيلتر تموم بشه
يعني فيلتر را بين اين دو مقدار قرار بده.
خيلي احتياجه لطفاً كمكمم كنيد.
تشكرم.

mpmsoft
یک شنبه 28 مهر 1387, 13:08 عصر
دوست عزیز خدایی قبلش جستجو زدی

ورودتو تبریک می گم و جستجو قبل از تاپیک قانون سایت


Select * FROM Table WHERE OrderID Between 1 and 100

سيد محمد علي رحيمي
چهارشنبه 01 آبان 1387, 15:14 عصر
خيلي ممنون از جواب شما
ولي وقتي در vb6 ازش استفاده مي كني eror مي ده به نظر شما من از هر روشي استفاده كردم نشد.
x=val(text1.text) y=val(text2.text)

Adodc2.RecordSource = "select id , name from tabet1 WHERE id betwheen x and y"
ولي باز پيام خطا ميده
syntax error (missing operator)...........
شما بگين راه چاره چيه

majjjj
پنج شنبه 02 آبان 1387, 11:23 صبح
شما اين اطلاعات رو بايد بدين تا بشه بحث كرد
1 نوع بانك اطلاعاتي
2 ديتا تايپ فيلد تاريخ(ازنوع استرينگ يا نامبر يا نوع زمان و تاريخ)
البته تو سايت ميگشتين حتما چيزهايي پيداميكردين شما (دستورbetween)رو تو سايت جستجو كنيد مشكلتون حل ميشه

سيد محمد علي رحيمي
یک شنبه 05 آبان 1387, 12:44 عصر
با سلام
دوستان مشكل را توسط يكي از پستاه درهمين سايت برطرف كردم فقط يك مشكل كوچولو دارام اونم اينكه وقتي قيلتر انجام ميشه بين عدد 1 و عدد11 الي 19 فرقي نميزاره مثلا آدي ما از يك تا 15 است وققتي مي خواهي بين عدد 1 الي 5 رو برايت فيلتر كنه از عدد يك شروع مي كنه تا عدد 15 رو برام ليست مي كنه البته نميدونم شايد بخاطر اينكه من فيلد آي دي رو از نوع تكس انتخاب كردم باشه

mpmsoft
یک شنبه 05 آبان 1387, 14:27 عصر
دوست عزیز این به این دلیل هست که دیتا تایپ شما باید عدد باشه

ظاهرا دیتا تایپ فیلد شما تکست هست

ویا اگر تکست به عدد در زمان select تبدیل کنید

Select Int(F1) FROM Tbl WHERE F1 Between 1, 10

samkoper
سه شنبه 21 آبان 1387, 16:04 عصر
با سلام خدمت شما با استفاده از این دستور میتوانید به خواسته خود برسید.




Dim SQLS As String]




SQLS = "SELECT * FROM your table WHERE your fild>='" & Text1(0) & "' AND your fild<='" & Text1(1) & "' order by your fild"


Adodc1.RecordSource = SQLS

Adodc1.refresh







موفق باشید