prasadalone
Programmer
- Aug 15, 2002
- 87
Dear sir
How to find one date exsist between two dates
Following is the few lines of codes
slot1=cstr(Date())+" 8:00:00 AM"
slot2=cstr(Date())+" 11:59:00 AM"
slot3=cstr(Date())+" 12:00:00 PM"
slot4=cstr(Date())+" 4:29:00 PM"
slot5=cstr(Date())+" 4:30:00 PM"
slot6=cstr(Date())+" 8:59:00 PM"
slot7=cstr(Date())+" 9:30:00 PM"
slot8=cstr(Date())+" 7:59:00 AM"
tdate= formatdatetime(now(),3)
slot1=formatdatetime(slot1,3)
slot2=formatdatetime(slot2,3)
slot3=formatdatetime(slot3,3)
slot4=formatdatetime(slot4,3)
slot5=formatdatetime(slot5,3)
slot6=formatdatetime(slot6,3)
slot7=formatdatetime(slot7,3)
slot8=formatdatetime(slot8,3)
if tdate => slot1 and slot2 <= tdate then
slot="I"
end if
if tdate => slot3 and slot4 <= tdate then
slot="II"
end if
if tdate => slot5 and slot6 <= tdate then
slot="III"
end if
if tdate => slot7 and slot8 <= tdate then
slot="IV"
end if
this code is not working
How to find one date exsist between two dates
Following is the few lines of codes
slot1=cstr(Date())+" 8:00:00 AM"
slot2=cstr(Date())+" 11:59:00 AM"
slot3=cstr(Date())+" 12:00:00 PM"
slot4=cstr(Date())+" 4:29:00 PM"
slot5=cstr(Date())+" 4:30:00 PM"
slot6=cstr(Date())+" 8:59:00 PM"
slot7=cstr(Date())+" 9:30:00 PM"
slot8=cstr(Date())+" 7:59:00 AM"
tdate= formatdatetime(now(),3)
slot1=formatdatetime(slot1,3)
slot2=formatdatetime(slot2,3)
slot3=formatdatetime(slot3,3)
slot4=formatdatetime(slot4,3)
slot5=formatdatetime(slot5,3)
slot6=formatdatetime(slot6,3)
slot7=formatdatetime(slot7,3)
slot8=formatdatetime(slot8,3)
if tdate => slot1 and slot2 <= tdate then
slot="I"
end if
if tdate => slot3 and slot4 <= tdate then
slot="II"
end if
if tdate => slot5 and slot6 <= tdate then
slot="III"
end if
if tdate => slot7 and slot8 <= tdate then
slot="IV"
end if
this code is not working