Oversættelse af asp script
Er der en der kan oversætte følgende script til php?-- kode start --
<% EventDate = Now %>
<table cols="7" border="0" cellspacing="0" width="182" align="<%=align%>">
<tr bgcolor="#00234b" background="headingbg.jpg">
<td colspan="7" align="center">
<font color="white"><b><%=MonthName(Month(EventDate))%> '<%=Right(Year(EventDate), 2)%></b></font></td>
</tr>
<tr bgcolor="#e4d087">
<% For DayLoop = 1 to 7 %>
<td align="right"><small><%=WeekDayName(DayLoop, True, 0)%></small></td>
<% Next %>
</tr>
<%
FirstDayDate = DateSerial(Year(EventDate), Month(EventDate), 1)
FirstDay = WeekDay(FirstDayDate, 0)
CurrentDay = FirstDayDate
%>
<tr>
<% If FirstDay <> 1 Then %>
<td colspan="<%=FirstDay-1%>" background="kalbgno.jpg"></td>
<% End If %>
<%
DayCounter = FirstDay
CorrectMonth = True
Do While CorrectMonth = True
If date = CurrentDay Then
%>
<td align="right" background="kalbg_today.jpg" style="width:26px;height:26px;"><%=Day(CurrentDay)%></td>
<%
Else
%>
<td align="right" background="kalbg.jpg" style="width:26px;height:26px;"><%=Day(CurrentDay)%></td>
<%
End If
DayCounter = DayCounter+1
If DayCounter > 7 then
DayCounter = 1
%>
</tr><tr>
<%
End If
CurrentDay = DateAdd("d", 1, CurrentDay)
If Month(CurrentDay) <> Month(EventDate) then
CorrectMonth = false
End If
Loop
If DayCounter <> 1 Then
%><TD Colspan="< %=8-DayCounter%>" background="kalbgno.jpg"></TD><%
End if
%>
</tr>
</table>
-- kode slut --
Der er 200 points!
