asp 转 sqlserver 问题

来源:百度知道 编辑:UC知道 时间:2024/05/16 20:16:06
<%
dim strSql,rs,i,PageNo
strSql="select * from [paper] where type='" & request("type") & "'order by id desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
rs.PageSize=20
PageNo=request("PageNo")
if PageNo<1 or not isnumeric(PageNo) then
PageNo=1
end if
if cint(PageNo)>rs.PageCount then
PageNo=rs.PageCount
end if
%>
<tr>
<td>添加日期</td>
<td>标题</td>
<td 点击</td>
<td>删除</td>
<td>详细资料</td>
</tr>
<%
if rs.recordcount>0 then
rs.AbsolutePage =PageNo
for i=1 to rs.pageSize
if rs.eof then exit for
%>
<tr>
<td><%=replace(rs("date"),right(rs("date"),8),"")%>

strSql="select * from [paper] where type='" & request("type") & "'order by id desc"

不知道你的Type这个字段什么类型的?
如果是int 的话就换成下面的语句
strSql="select * from [paper] where type=" & request("type") & " order by id desc"

代码是没有错误的,你SQL链接数据库那里弄错了没有\rs.open strSql,conn,3,3 改成rs.open strSql,conn,1,3

Response.write strSql一下,看一下。

不知道是不是百度的问题,order 之前的空格没有。