这是一个加入分页符号将长文章分页显示的程序，
代码如下：
<% dim ming,sql12,rs12
ming=request.QueryString("mingid")
sql12="select * from article where id="&ming&""
set  rs12=server.createobject("adodb.recordset")
rs12.Open sql12,conn,1,3
%>

<table width="85%" border="1" align="center" cellpadding="3" cellspacing="0">
          <tr> <td >
<%
If Request("page")="" Then
pageNum=0
Else
pageNum=Request("page")
End if
Dim strCont
    strCont=rs12("Content") '这是从数据库中输出文本内容
    strCont=Replace(strCont,vbcrlf,"<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"&vbcrlf)
strCont=Replace(strCont,"|||","｜｜｜")
ContentStr=split(strCont,"｜｜｜")
For i=pageNum to pageNum
%>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<% =ContentStr(i)%>
<% Next %>
            </td>
          </tr>
<%if ubound(ContentStr)>=1 then%>
          <tr>
            <td height="30" >第
<%
For p = 0 to ubound(ContentStr)
if p+1= Request("page")+1 then
a="<font color=red>"
aa="</font>"
else
a=""
aa=""
end if
%>
              <a href="testfy3.asp?id=<%=request("id")%>&page=<%=p%>"><%=a%><%=p+1%><%=aa%></a>
              <% Next %>
              页 </td>
          </tr>
          </table>
          <%end if%>


问题是：
当代码第三行中sql12中的"&ming&"改为一个确定值，如13时，分页显示是正常的。如果是一个从上一页传过来的值，分页显示就不正常了，就会出现错误提示信息：
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
错误类型：
Microsoft JET Database Engine (0x80040E14)
语法错误 (操作符丢失) 在查询表达式 'id=' 中。
错误所在行：rs12.Open sql12,conn,1,3

请问问题出在哪里？如何修改? 怀疑是href="testfy3.asp?id=<%=request("id")%>中的=request("id")有问题，请高手指点。

mingid的值是从上一级文章列表页传过来的

改了，不行，跟没改时一样。

问题解决了，是我自己没小心，将<a href="testfy3.asp?id=<%=request("id")%>这一句没有写对。我一再观察正确显示的网页发现，？后面应该是mingid,所以将<a href="testfy3.asp?id=<%=request("id")%>改成<a href="testfy3.asp?mingid=<%=request("mingid")%>,问题彻底解决。