神奇,传到服务器上就变成了空白,拜托大神帮忙看看怎么回事

<!--#include file="conn.asp" -->
<%
set rs=server.createobject("adodb.recordset")
'""
if trim(request("index"))="" and trim(request("DataRate"))="" and trim(request("Wavelength"))="" then
sqltext="select * from products where  class='"&request("xid")&"' order by px asc"
'index
else if trim(request("index"))<>"" and trim(request("DataRate"))="" and trim(request("Wavelength"))="" then
sqltext="select * from products where index='"&request("index")&"' and class='"&request("xid")&"' order by px asc"
'DataRate
else if trim(request("index"))="" and trim(request("DataRate"))<>"" and trim(request("Wavelength"))="" then
sqltext="select * from products where DataRate='"&request("DataRate")&"' and class='"&request("xid")&"' order by px asc"
'Wavelength
else if trim(request("index"))="" and trim(request("DataRate"))="" and trim(request("Wavelength"))<>"" then
sqltext="select * from products where Wavelength='"&request("Wavelength")&"' and class='"&request("xid")&"' order by px asc"
'index and DataRate
else if trim(request("index"))<>"" and trim(request("DataRate"))<>"" and trim(request("Wavelength"))="" then
sqltext="select * from products where  DataRate='"&request("DataRate")&"' and index='"&request("index")&"' and class='"&request("xid")&"' order by px asc"
'index and DataRate and Wavelength
else if trim(request("index"))<>"" and trim(request("DataRate"))<>"" and trim(request("Wavelength"))<>"" then
sqltext="select * from products where  DataRate='"&request("DataRate")&"' and index='"&request("index")&"' and Wavelength='"&request("Wavelength")&"' and class='"&request("xid")&"' order by px asc"
'index and Wavelength
else if trim(request("index"))<>"" and trim(request("DataRate"))="" and trim(request("Wavelength"))<>"" then
sqltext="select * from products where  index='"&request("index")&"' and Wavelength='"&request("Wavelength")&"' and class='"&request("xid")&"' order by px asc"
'DataRate and Wavelength
else if trim(request("index"))="" and trim(request("DataRate"))<>"" and trim(request("Wavelength"))<>"" then
sqltext="select * from products where  DataRate='"&request("DataRate")&"' and Wavelength='"&request("Wavelength")&"' and class='"&request("xid")&"' order by px asc"

end if
end if
end if
end if
end if
end if
end if
end if
rs.open sqltext,conn,1,1


dim MaxPerPage
MaxPerPage=8

'取得页数,并判断用户输入的是否数字类型的数据,如不是将以第一页显示
dim text,checkpage
text="0123456789"
Rs.PageSize=MaxPerPage
for i=1 to len(request("page"))
checkpage=instr(1,text,mid(request("page"),i,1))
if checkpage=0 then
exit for
end if
next

If checkpage<>0 then
If NOT IsEmpty(request("page")) Then
CurrentPage=Cint(request("page"))
If CurrentPage < 1 Then CurrentPage = 1
If CurrentPage > Rs.PageCount Then CurrentPage = Rs.PageCount
Else
CurrentPage= 1
End If
If not Rs.eof Then Rs.AbsolutePage = CurrentPage end if
Else
CurrentPage=1
End if
%>
<link href="css/style.css" rel='stylesheet' type='text/css' />
          <%
'假如没有产品时
If rs.eof and rs.bof then
response.write "<td><p><font color='#ff0000'>Not Found!</font></p></td>"
End if
r_c=1
Sub list()
i=0
Do While Not rs.EOF%>
  <a class="p1" href="products_xq.asp?id=<%=rs("id")%>"  style="font-size:12px;" >
           <span>
           <%if rs("index")<>"" then%><i><%=rs("index")%></i><%end if%>
           <%if rs("PackageStyle")<>"" then%><i><%=rs("PackageStyle")%></i><%end if%>
           <%if rs("DataRate")<>"" then%><i><%=rs("DataRate")%></i><%end if%>
           <%if rs("Connector")<>"" then%><i><%=rs("Connector")%></i><%end if%>
           </span>
           <img  src="<%=rs("pic")%>" style="margin-left:10px; border:1px #CCC solid;">
           <h4 style="margin-bottom:10px;"><%=rs("name")%></h4>
   <%if rs("index")<>"" then%>
   <font <%if request("index")<>"" then%> color="#00c0fd"<%end if%>><%=rs("index")%></font>
           <%end if%>
           <%if rs("PackageStyle")<>"" then%>
   <font><%=rs("PackageStyle")%></font>
           <%end if%>
           <%if rs("DataRate")<>"" then%>
   <font <%if request("DataRate")<>"" then%> color="#00c0fd"<%end if%>><%=rs("DataRate")%></font>
           <%end if%>
           <%if rs("Wavelength")<>"" then%>
   <font <%if request("Wavelength")<>"" then%> color="#00c0fd"<%end if%>><%=rs("Wavelength")%></font>
           <%end if%>
           <%if rs("Media")<>"" then%>
   <font><%=rs("Media")%></font>
           <%end if%>
           <%if rs("Reach")<>"" then%>
   <font><%=rs("Reach")%></font>
           <%end if%>
           <%if rs("Connector")<>"" then%>
           <font><%=rs("Connector")%></font>
           <%end if%>
           <%if rs("PowerSupplyVoltage")<>"" then%>
           <font><%=rs("PowerSupplyVoltage")%></font>
           <%end if%>
           <%if rs("Awg")<>"" then%>
           <font><%=rs("Awg")%></font>
           <%end if%>
           <%if rs("Length")<>"" then%>
           <font><%=rs("Length")%></font>
           <%end if%>
           <%if rs("OperatingTemperature")<>"" then%>
           <font><%=rs("OperatingTemperature")%></font>
           <%end if%>
           <%if rs("Application")<>"" then%>
           <font><%=rs("Application")%></font>
           <%end if%>
           <%if rs("Compatiblity")<>"" then%>
           <font><%=rs("Compatiblity")%></font>
           <%end if%>
  </a>

<%
i=i+1
if i >= MaxPerpage then exit do
rs.MoveNext
r_c=r_c+1
Loop
end Sub
call list
%>

<%
pageno=request("page")
if MaxPerPage="" or isempty(MaxPerPage) or MaxPerPage<1 then
MaxPerPage=15
end if
rs.pagesize=MaxPerPage '得到每页数
mpage=rs.pagecount     '得到总页数
if isempty(pageno) or cint(pageno)<1 or cint(pageno)>mpage then
pageno=1
end if
for pno=1 to mpage
if pno=cint(pageno) then
%>
<font color="#C0C0C0">[<font color="#f77700"><b><%=pno%></b></font>]</font>
<%else%>

<font color="#C0C0C0">[<a href='?page=<%=pno%>&xid=<%=request("xid")%>&index=<%=request("index")%>&DataRate=<%=request("DataRate")%>&Wavelength=<%=request("Wavelength")%>'><%=pno%></a>]</font>

<%end if%>
<%next%>
<%if request("index")<>"" or request("DataRate")<>"" or request("Wavelength")<>"" then%>
&nbsp;&nbsp;<font color="#f77700">&nbsp;&nbsp;<%=request("index")%>&nbsp;&nbsp;<%=request("DataRate")%>&nbsp;&nbsp;<%=request("Wavelength")%></font>
<%end if%>

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值