index_paper.asp

<1> 优化了部分代码及一些BUG.提高了浏览速度 <2> 可以通过会员助手自由管理各种信息 <3> 修正了反馈信息及询价订单错误 <4>

<%
dim bt,image,tttt
function paper(bt,image,tttt)
response.write "<table width=""295"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
response.write "<tr align=""left"" valign=""top"">"
response.write "<td width=""8""><img src=""images/index3_r1_c1.gif"" width=""8"" height=""20""></td>"
response.write "<td width=""282"" background=""images/index3_r1_c3.gif"" valign=""bottom"" class=""smallfont""><font color=""#FF6600""><b>" & bt & "</b></font></td>"
response.write "<td width=""10""><img src=""images/index3_r1_c14.gif"" width=""8"" height=""20""></td>"
response.write "</tr>"
response.write "</table>"
response.write "<table width=""295"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
response.write "<tr>"
response.write "<td width=""184"" align=""right"" height=""4""><img src=""images/index_r20_c15.gif"" width=""180"" height=""3""></td>"
response.write "<td width=""109"" align=""right"" valign=""top"" height=""4""><img src=""images/index3_r2_c12.gif"" width=""112"" height=""7""></td>"
response.write "</tr>"
response.write "</table>"
response.write "<table width=""295"" border=""0"" cellspacing=""0"" cellpadding=""0"">"

	strSql="select top 6 * from [paper] where type='" & tttt & "' order by id desc"
	set rs=Server.CreateObject("ADODB.RecordSet")
	rs.open strSql,conn,3,3
response.write "<tr>" 
response.write "<td height=""118"" align=""left"" valign=""top"" width=""208"">"
    do while not rs.eof
response.write "<font color=""#FF6600"" class=""smallfont"">·</font><a href=" & "nei/sub_paper.asp?id=" & rs("id") & "&amp;type=" & tttt & " target=""_blank"" class=""linkfont""><font color=" & rs("color") & ">" & left(rs("title"),16) & "</font></a>"
		rs.movenext
	if not rs.eof then 
	response.write "<br>"
	end if
		loop
response.write "</td>"
response.write "<td align=""center"" valign=""middle"" width=""86"" height=""118""><img src=" & "images/index3_image" & image & ".jpg width=""67"" height=""67""><br>"
response.write "<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
response.write "<tr>"
response.write "<td align=""center"" valign=""middle"" height=""21""><a href=" & "nei/view_paper.asp?type=" & tttt & " class=""ffbyfont2"">[更多信息]</a></td>"
response.write "</tr>"
response.write "</table>"
response.write "</td>"
response.write "</tr>"
response.write "</table>"
end function
%>