menu.asp

来自「实现一定上传功能」· ASP 代码 · 共 27 行

javastr="<style>A.menu2{text-decoration: none;color:#000099;line-height: 25pt;font-size:9pt} A.menu2:hover {text-decoration: none;line-height: 25pt;font-size:9pt;color: #ffffff}A.menu2:visited {color:#FF66cFF;line-height: 25pt;font-size:9pt}</style>"
javastr=javastr+"<table width=\"100%\" border=\"0\">"
<!--#include file="articleconn.asp"-->
<%tjnews=request("tjnews")
if tjnews=""  then
sql="select * from type order by typetime desc"
set rs=conn.execute(sql)%>
<% 
while not rs.eof
%>

javastr=javastr+" <font color=\"#000000\" size=\"2\"> - </font><span style=\"font-size:9pt;line-height: 15pt\"><a href=\"more.asp?ttt=<%=rs("typeid")%>&sss=<%=rs("type")%>\")><%=rs("type")%></span></a>"
<%rs.movenext
wend
rs.close   
set rs=nothing   
conn.close   
set conn=nothing %> 
javastr=javastr+"</table>" 
document.write (javastr)
<%else%>
document.write ("对不起，暂时没有任何内容。")
<%end if%>