اساتيد Sql اين كد چه مشگلي داره ؟؟

من يكي از اعضاي جديد دوست دام اينجا فعاليت كنم ممنون ميشم اين سوال منو جواب بديد

کد:

---

dIff = DateDiff("d", date1, date2)

If DateDiff("d", date1, date2) < 0 Then
w = MsgBox("")
Exit Sub
End If

  a = "Select * From Table3 Where DateDiff(""" & "d" & """,""" & date1 & """, MDate )<= """ & dIff & """  "

Adodc1.RecordSource = a
  Adodc1.Refresh

---

اين كدو من براي پبدا كردن تاريخ( كه در داخل فيلد MDate ديتابيس هست) بين دو تاريخ ديگه كه داخل دو متغيير date1 و date2 هست نوشتم
مشگلش اينه كه بگير نگير داره يك دفعه كار ميكنه يك دفعه نميكنه ؟؟

مثلا اگه تاريخ داخل ديتابس(البته يكيش ) باشه 01/07/2006 و date1 هم باشه 28/06/2006 وdate2 هم باشه 31/07/2006 تابع چيزي رو بر نميگردونه ولي اگه همين date1 بشه 20/06/2006 جواب مبده اين يك موردشه
لطفا كمك كنيد

:sad: :sad: :sad: :sad: :sad: :sad: :sad: :sad: :sad:
جواب بديد