<!--#include file="AdminTop.asp"-->
<!--#include file="cnOpen.asp"-->

<%
Dim rs
Set rs = Server.CreateObject("ADODB.RecordSet")
If Request("UserID") <> "" Then
Session("UserID") = Request("UserID")

rs.Open "SELECT * FROM Article WHERE UserID="&Session("UserID"),cn,2,3
%>
<%
Do While Not rs.Eof
%>
<tr>
<td width="97"><%=rs("ArticleID")%></td>
</tr>
<%
If Not rs.Eof Then rs.MoveNext
Loop
%>
<%
End If
rs.Close
set rs = Nothing
%>
<!--#include file="cnClose.asp"-->
<!--#include file="Bottom.htm"-->

运行它提示的错误是:Error Type:
Microsoft JET Database Engine (0x80040E10)
至少一个参数没有被指定值。
请问这是什么原因啊,什么参数没有被指定啊?请教各位。谢谢！！

<!--#include file="AdminTop.asp"-->
<!--#include file="cnOpen.asp"-->

<%
Dim rs
Set rs = Server.CreateObject("ADODB.RecordSet")
If Request("UserID") <> "" Then
Session("UserID") = Request("UserID")

rs.Open "SELECT * FROM Article WHERE UserID="&Session("UserID"),cn,2,3
%>
<%
Do While Not rs.Eof
%>
<tr>
<td width="97"><%=rs("ArticleID")%></td>
</tr>
<%
rs.MoveNext
Loop
%>
<%
End If
rs.Close
set rs = Nothing
%>
<!--#include file="cnClose.asp"-->
<!--#include file="Bottom.htm"-->