IF.Then.else语句解决方案

IF....Then...else语句
我想用IF....Then...else实现下面的例子,请大家来帮帮忙看看错了什么.
<%
if   rs.EOF   then
response.write( "不存在,可能已经被删除 ")
else
While   NOT   rs.EOF
%>
                <%=(rs.Fields.Item( "MemberID ").Value)%> <BR>
                <%=(rs.Fields.Item( "Announce_Time ").Value)%> <BR>
                <%=(rs.Fields.Item( "contents ").Value)%> <BR>
<%
rs.MoveNext()
Wend
end   if
%>

------解决方案--------------------
<%
if rs.EOF then
response.write( "不存在,可能已经被删除 ")
else
While NOT rs.EOF
%>
<%=rs( "MemberID ")%> <BR>
<%=rs( "Announce_Time ")%> <BR>
<%=rs( "contents ")%> <BR>
<%
rs.MoveNext()
Wend
end if
%>
这样就可以了
------解决方案--------------------
楼主的这段代码是没有问题的.
如果出现以下的错误有可能就是列名没有写对...

错误类型：
ADODB.Fields (0x800A0CC1)
在对应所需名称或序数的集合中，未找到项目。

检查一下这里的列名是否写错了 <%=(rs.Fields.Item( "MemberID ").Value)%> <BR>
<%=(rs.Fields.Item( "Announce_Time ").Value)%> <BR>
<%=(rs.Fields.Item( "contents ").Value)%> <BR>