hasanr
شنبه 11 تیر 1390, 15:45 عصر
سلام
یک فرم جستجو درست کرده ام حاوی چند تا تکست باکس است و یک دکمه جستجو
با کلیک روی دکمه جستجو مراحل زیر انجام می شود
رشته جستجوی خالی StrSql تعریف می شود
در صورت خالی نبودن تکست باکس اول دستور بررسی آن به رشته جستجو اضافه می شود
در صورت خالی نبودن تکست باکس دوم دستور بررسی آن به رشته جستجو اضافه می شود
....
در انتهای کار عبارت AND از انتهای رشته جستجو حذف می گردد و رشته به دست آمده به عنوان فیلتر ساب فرم که حاوی نتایج جستجوست عمل می کند
تمامی مراحل بالا درست هستند و برنامه درست کار می کند اما در اتصال رشته و متغیر دو تا مشکل دارم :ناراحت:
1- می خواهم برخی از نتایج دقیقا برابر مقدار باکس باشد یعنی Like را حذف کنم لطفا کد را اصلاح بفرمایید
StrStr = StrStr & "[NameKala] like'" & "*" & Me.TextBox1 & "*' AND"
2- برای جستجو در محدوده تاریخ ( مثلا فاکتورهایی که تاریخ صدور آنها از تاریخ 1 تا تاریخ 2 است) کد زیر را نوشته ام که در Syntax ایراد دارد :ناراحت:
StrStr = StrStr & "[Date] Between " & Me.textbox1 & " And " & Me.textbox2 & AND"
3- در صورت امکان یکی از دوستان لطف کنند و در بحث اتصال رشته ها ، نحوه استفاده از علامت (( ' )) رو بیان کنن
فرم جستجوی تکمیل شده جهت استفاده بقیه دوستان در سایت قرار خواهد گرفت
یک فرم جستجو درست کرده ام حاوی چند تا تکست باکس است و یک دکمه جستجو
با کلیک روی دکمه جستجو مراحل زیر انجام می شود
رشته جستجوی خالی StrSql تعریف می شود
در صورت خالی نبودن تکست باکس اول دستور بررسی آن به رشته جستجو اضافه می شود
در صورت خالی نبودن تکست باکس دوم دستور بررسی آن به رشته جستجو اضافه می شود
....
در انتهای کار عبارت AND از انتهای رشته جستجو حذف می گردد و رشته به دست آمده به عنوان فیلتر ساب فرم که حاوی نتایج جستجوست عمل می کند
تمامی مراحل بالا درست هستند و برنامه درست کار می کند اما در اتصال رشته و متغیر دو تا مشکل دارم :ناراحت:
1- می خواهم برخی از نتایج دقیقا برابر مقدار باکس باشد یعنی Like را حذف کنم لطفا کد را اصلاح بفرمایید
StrStr = StrStr & "[NameKala] like'" & "*" & Me.TextBox1 & "*' AND"
2- برای جستجو در محدوده تاریخ ( مثلا فاکتورهایی که تاریخ صدور آنها از تاریخ 1 تا تاریخ 2 است) کد زیر را نوشته ام که در Syntax ایراد دارد :ناراحت:
StrStr = StrStr & "[Date] Between " & Me.textbox1 & " And " & Me.textbox2 & AND"
3- در صورت امکان یکی از دوستان لطف کنند و در بحث اتصال رشته ها ، نحوه استفاده از علامت (( ' )) رو بیان کنن
فرم جستجوی تکمیل شده جهت استفاده بقیه دوستان در سایت قرار خواهد گرفت