مشکل دوباره در between

[mamad174]

:قلب:سلام من با کد زیر دستور between رو می نویسم اما زمان اجرا هیچ گزارشی به من نشون نمی ده و هیچ خطایی هم نمی گیره این در صورتیه که با تاریخ ثابت ذکر شده در کد به خوبی کار می کنه
لطفا کمکم کنید همه ی برنامه لنگ همین کده ممنون


Adodc1.RecordSource = "select * from sitting where tarekh BETWEEN ' " & ComboCalendar1.DateCC & " ' AND ' " & ComboCalendar1.DateCC & " ' "

[look20]

سلام دوست عزیز بجای اینکه از ComboCalendar1.DateCC استفاده کنی
از تکس باکس استفاده کن
ببین

Private Sub ComboCalendar1_ChangeDate()
txtdate.Text = ComboCalendar1.DateCC
End Subاین کد هر مقداری رو که با کمبو انتخاب کنی به تکس باکس منتقل می کنه این نمونه رو دانلود کم متوجه میشید منظورم چیه توی این فایل تکس باکس بخوبی روی کمبو قرار گرفته و اصلا معلوم نیست که یه تکس باکس روی کمبو قرار گرفته در ضمن کد رو هم به این شکل باید تغییر بدید
این کد ها باید توی فرمتون اضافه بشه

Private Sub ComboCalendar1_ChangeDate()
txtDate.Text = ComboCalendar1.DateCC
End Sub

Private Sub ComboCalendar2_ChangeDate()
txtDate1.Text = ComboCalendar2.DateCC
End Sub
و این کدهم جایگزین کد خودتون کنید

Adodc1.RecordSource = select * from sitting where tarekh Between '" & Trim(txtDate.Text) & "' and '" & Trim(txtDate1.Text) & "'"

Adodc1.Refreshدرضمن از نمونه استفاده کنید کاملا متوجه میشید
اگه مطلب بدردتون خود تشکر فراموش نشه شوخی کردم اگه دوس داشتی هر جور راحتی ولی دعا فراموش نشه

[aryasoft2872]

ببخشید میشه یکی مشکل اینو بگه دوباره براش تاپیک نزنم:

[xxxxx_xxxxx]

ببخشید میشه یکی مشکل اینو بگه دوباره براش تاپیک نزنم:
سلام،
1) Data Type فیلد تاریخ رو Text انتخاب کنید.
2) Input Mask این فیلد رو خالی کنید.