📄 include_fl.asp

📁 好！由此可以引申出另一快速恢复多系统启动选单的方法：就是利用Ghost克隆工具

💻 ASP

字号:

<script>
function fade_in(which){
theobject=which
highlighting=setInterval("highlightit(theobject)",50)
}

function fade_out(which){
clearInterval(highlighting)
which.filters.alpha.opacity=40
}

function highlightit(cur){
if (cur.filters.alpha.opacity<100)
cur.filters.alpha.opacity+=20
else if (window.highlighting)
clearInterval(highlighting)
}

</script>
</head>
<body leftmargin=0 topmargin=0 bgcolor=#999999>
<table width=390 cellspacing=0 cellpadding=5 align=center>
<%
i=1
sql="select * from type"
set rs=conn.execute(sql)
if rs.eof and rs.bof then
 response.write "数据丢失!"
else
do while not rs.eof 
%>
<%if i mod 2<>0 then%><tr><td>
<table cellspacing=0 cellpadding=5>
<tr><td rowspan=2><a href="cylb.asp?type=<%=rs("type")%>" target="_top"><img border=0 src="pic/<%=rs("type")%>.gif" onMouseOver="fade_in(this);" onMouseOut="fade_out(this);" style="filter:alpha(opacity=40)"></a></td><td><font color=#ffffff>--></font>&nbsp;<a href="cylb.asp?type=<%=rs("type")%>" style="color:#000000" target="_top"><%=rs("typename")%></a></td></tr>
<tr><td>
<%
sql="select count(*) from lm where pass=true and type=" & rs("type")
set nrs=conn.execute(sql)
if nrs.eof and nrs.bof then
 count=0
else
 count=nrs(0) 
end if
nrs.close
%>
[现有成员<%=count%>个]
</td></tr></table>
</td><td width=40></td>
<%else%><td>
<table cellspacing=0 cellpadding=5>
<tr><td rowspan=2><a href="cylb.asp?type=<%=rs("type")%>" target="_top"><img border=0 src="pic/<%=rs("type")%>.gif" onMouseOver="fade_in(this);" onMouseOut="fade_out(this);" style="filter:alpha(opacity=40)"></a><td><font color=#ffffff>--></font>&nbsp;<a href="cylb.asp?type=<%=rs("type")%>" style="color:#000000" target="_top"><%=rs("typename")%></a></td></tr>
<tr><td>
<%
sql="select count(*) from lm where pass=true and type=" & rs("type")
set nrs=conn.execute(sql)
if nrs.eof and nrs.bof then
 count=0
else
 count=nrs(0) 
end if
nrs.close
%>
[现有成员<%=count%>个]
</td></tr>
</table>
</td></tr><%end if%>
<%
i=i+1
rs.movenext
loop
end if
rs.close
%>
</table>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -