Quote:
| Originally Posted by Guddu try this..
Code:
response.write((DateAdd("d",7, i)))
|
brother i still got something have to ask u,can u look at code below?
if BookingType="Once" then
for i = TimeSlot to z
sql1 = "select * from RoomBooking where RoomType = '"&Room&"' and DateOfBooking = '"&BookDate&"' and TimeSlot = '"&i&"'"
set rt = conn.execute(sql1)
if rt.eof then
'sql="insert into RoomBooking (RoomType, DateOfBooking, Hours, Purpose, TimeSlot) values ('"&Room&"', '"&BookDate&"', '"Hours"', '"&Purpose&"', '"&i&"')"
sql = "Insert into RoomBooking (RoomType, DateOfBooking, Hours, Purpose, TimeSlot, MemberID) values ('"&Room&"', '"&BookDate&"', '"&Hours&"', '"&Purpose&"', '"&i&"', '"&session("MemberID")&"')"
conn.execute(sql)
else
end if
next
elseif BookingType="Daily" then
NewPeriod=DateAdd("d", 0, (EndTime))
response.write(NewPeriod)
for i = BookDate to NewPeriod
for i = TimeSlot to z
sql1 = "select * from RoomBooking where RoomType = '"&Room&"' and DateOfBooking = '"&BookDate&"' and TimeSlot = '"&i&"'"
set rt = conn.execute(sql1)
if rt.eof then
'sql="insert into RoomBooking (RoomType, DateOfBooking, Hours, Purpose, TimeSlot) values ('"&Room&"', '"&BookDate&"', '"Hours"', '"&Purpose&"', '"&i&"')"
sql = "Insert into RoomBooking (RoomType, DateOfBooking, Hours, Purpose, TimeSlot, MemberID) values ('"&Room&"', '"&BookDate&"', '"&Hours&"', '"&Purpose&"', '"&i&"', '"&session("MemberID")&"')"
conn.execute(sql)
else
end if
next
response.write(DateAdd("d", 1, (i)))
next
end if
my coding i suppose it can based on "once" and "daily" to perform insert statement,
but the error msg i got is
Invalid 'for' loop control variable
/WoodLandSec/AddBookingAct.asp, line 38, column 6
for i = TimeSlot to z
mind to pint out me how to solve teh error?thx a million