آزاد سازی رکوردست [بایگانی]

UpgradeVB6Code

جمعه 16 فروردین 1387, 11:42 صبح

سلام
من با این کدها یه رکوردهایی رو که میخوام فیلتر میکنم حالا اگر بخوام دوباره تمام رکورد ها رو رکوردست متصل کنم باید به جای Text1.Text مقدار "" تهی رو قرار بدم ؟

Recordset.Filter = "ID=' " + Text1.Text + " ' "
Recordset.Filter = " ID like '" & Text1.Text & "*'"

shahpari

جمعه 16 فروردین 1387, 13:44 عصر

خیر

باید از این کد استفاده کنید

Adodc1.RecordSource = "Table1"
adodc1.refresh

UpgradeVB6Code

جمعه 16 فروردین 1387, 14:31 عصر

خیر

باید از این کد استفاده کنید

Adodc1.RecordSource = "Table1"
adodc1.refresh

من از ADO استفاده میکنم اونجا دوباره باید رکوردست رو تشکیل بدم ؟

UpgradeVB6Code

جمعه 16 فروردین 1387, 15:40 عصر

من هر چی ور میرم نمیشه
الان دقیقا 5 ساعت به طور متوالی دارم سرچ میکنم و ور میرم اما نمیشه :عصبانی++:

ببینید من برای سرچ در بانک از متد فیلتر استفاده کردم به این صورت که رکورد های مورد نظر رو فیلتر میکنم و نمایش میدم حالا میخوام وقتی داخل تکست باکس جستجو خالی شد ( "" ) هیچ رکوردی فیلتر نباشه و تمام رکورد ها نمایش داده بشه ؟؟؟

اما هر کاری میکنم نمیتونم ؟

UpgradeVB6Code

جمعه 16 فروردین 1387, 18:52 عصر

آقا من سوالمو واضح تر بگم

من یه سری رکورد ها رو فیلتر کردم حالا نمیخوام دیگه فیلتر باشند یعنی میخوام دوباره تمام رکورد ها رو به رکوردست متصل کنم چی کار کنم ؟؟؟

امروز جمعه کسی اینجا نیست :چشمک:

UpgradeVB6Code

جمعه 16 فروردین 1387, 19:49 عصر

من فعلا مشکلو این جوری حل کردم
یعنی رکوردستو میبندم بعد دوباره باز میکنم توی باز کردن دوباره تمام رکوردها رو بهش متصل میکم

RecordSet.Close
RecordSet.Open

اما باید راه درست حسابی داشته
اگر کسی راهشو میدونه لطفا کمک کنه

vbhamed

جمعه 16 فروردین 1387, 20:52 عصر

سلام

if Trim$(Text1.Text) = "" Then Recordeset1.Filter = ""

UpgradeVB6Code

جمعه 16 فروردین 1387, 21:50 عصر

بابا خدا خیرت بده
البته هنوز امتحان نکردم اما مطمئنم 100 در 100 درسته
من توی این کد مقدار خالی رو میفرستادم

Recordset.Filter = "ID=' " + Text1.Text + " ' "