|
<%
function orario()
dim intOra
intOra=datepart("h", time() )
if len(intOra)="1" then
intOra="0" & intOra
end if
dim intMin
intMin=datepart("n", time() )
if len(intMin)="1" then
intMin="0" & intMin
end if
orario= intOra&":"&intMin
end function
response.write orario()
%>
|
 |