![]() |
#2
skobezj2007-11-23 16:54
|
<SCRIPT LANGUAGE="VB" RUNAT="SErVER">
SUB PAGE_LOAD(SENDER AS OBJECT,E AS EVENTARGS)
Dim DayNumber as Byte=DataTime.Today.DayOfWeek
mybody.attributes.add("background","background"&daynumber&".ipg"
END SUB
</SCRIPT>
<html>
<body runat="server" id="mybody" scroll="no"></body>
</html>
