<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
' This callback form is provided freeware by D2 Computing Ltd and is the property of P.Durbar
' You may use these scripts on any commercial or non commercial application free of charge
' providing this text is not removed
' for more scripts, check http://www.d2computing.co.uk
dim today
dim todaystring
today = date()
todaystring = WeekDayName(WeekDay(today),true) & " " & day(today) & " " & MonthName(Month(today),true)
dim tomorrow
dim tomorrowstring
tomorrow = DateAdd("d",1,date())
tomorrowstring = WeekDayName(WeekDay(tomorrow),true) & " " & day(tomorrow) & " " & MonthName(Month(tomorrow),true)
dim daythree
dim daythreestring
daythree = DateAdd("d",2,date())
daythreestring = WeekDayName(WeekDay(daythree),true) & " " & day(daythree) & " " & MonthName(Month(daythree),true)
dim dayfour
dim dayfourstring
dayfour = DateAdd("d",3,date())
dayfourstring = WeekDayName(WeekDay(dayfour),true) & " " & day(dayfour) & " " & MonthName(Month(dayfour),true)
dim dayfive
dim dayfivestring
dayfive = DateAdd("d",4,date())
dayfivestring = WeekDayName(WeekDay(dayfive),true) & " " & day(dayfive) & " " & MonthName(Month(dayfive),true)
%>
iletişim formu