UC知道这段js调用怎么改成asp的,可以内容直接显示!
来源：百度知道 编辑：UC知道 时间：2024/09/22 18:44:42
<!--#include file="conn.asp"-->
<!--#include file="inc/refresh.asp"-->
<%
strtmp = "http://" & request.servervariables("SERVER_NAME") & _
left(request.servervariables("SCRIPT_NAME"),len(request.servervariables("SCRIPT_NAME"))-len("/js.asp"))
dim js,top,num
js=(request.querystring("js"))
num=int(request.querystring("num"))
lum=int(request.querystring("lum"))
if js="1" then
set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from [IisIce_Board_Disp] order by BoardID desc"
num=num
set rs=conn.execute(sql)
for i=1 to num
if rs.eof then exit for
if len(rs(4))>lum then
BoardName=left(rs(4),lum)&".."
else
BoardName=rs(4)
end if
bgcolor="#ffffff"
if i mod 2 = 0 then
bgcolor=&q
<!--#include file="inc/refresh.asp"-->
<%
strtmp = "http://" & request.servervariables("SERVER_NAME") & _
left(request.servervariables("SCRIPT_NAME"),len(request.servervariables("SCRIPT_NAME"))-len("/js.asp"))
dim js,top,num
js=(request.querystring("js"))
num=int(request.querystring("num"))
lum=int(request.querystring("lum"))
if js="1" then
set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from [IisIce_Board_Disp] order by BoardID desc"
num=num
set rs=conn.execute(sql)
for i=1 to num
if rs.eof then exit for
if len(rs(4))>lum then
BoardName=left(rs(4),lum)&".."
else
BoardName=rs(4)
end if
bgcolor="#ffffff"
if i mod 2 = 0 then
bgcolor=&q
前面......
<script type="text/javascript">
document.write('<span style="font-size: 12px; line-height: 150%"><div style="float:left"><img src="skin/<%=HOST_TBBJ%>/li.gif"></img><a href="<%=strtmp%>/bar.asp?Id=<%=rs(0)%>" target="_blank" title="<%=showstring(rs("BoardName"))%>"><%=showstring(BoardName)%></a></div><div style="color:#666666" align="right"><%=year(rs(7))%>年<%=month(rs(7))%>月<%=day(rs(7))%>日 </div></span>')
</script>
后面.....