css.asp

来自「Lirong网络办公系统」· ASP 代码 · 共 34 行

<%
	'on error resume next
	Dim temptime,fromYear,fromMonth,fromSecond,fromDay,fromMinute,fromHour,nowdate,k,rs,LeftMenuWidth
	dim mBackImage 
	LeftMenuWidth=160
	'Response.Expires =0
	'判断是否已经登录

	

	
	'获得格式化的当前时间
	temptime  = now()
	fromYear  = year(temptime)
	fromMonth = fmt(month(temptime),2)
	fromDay   = fmt(day(temptime),2)
	fromMinute= fmt(Minute(Time()),2)
	fromHour  = fmt(Hour(Time()),2)
	fromSecond=	fmt(Second(Time()),2)
	nowdate   = "" & fromYear & "-" & fromMonth & "-" & fromDay & " " & fromHour & ":" & fromMinute


%>
<!-- #include file="../main/functions.asp" -->

<script language=javascript>
var hotcolor='<%=Session("vhotcolor")%>';
var vcolcolor='<%=Session("vcolcolor")%>';

</script>
<script language=JScript  src="../js/common.js"> </script>

<link rel="stylesheet" href="../main/realcss.asp" type="text/css">