错误以下:
Microsoft VBScript 编译器错误 错误 '800a03f6 '
缺少 'End '
/iisHelp/common/500-100.asp，行242
ADODB.Field 错误 '80020009 '
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/dgkj/messenger.asp，行0
代码如下:
<!--#include file= "top.asp " -->
<%
if request( "del ") <> " " then
call del
end if
function del
sql2= "delete from messenger where messenger_id= "&request( "del ")
conn.Execute(sql2)
end function
set rs=server.createobject( "adodb.recordset ")
sql= "SELECT * FROM messenger where messenger_jieshou= ' " & Session( "user_name ") & " ' order by messenger_id desc "
rs.Open sql,conn,1,3
%>
<link href= "css/font.css " rel= "stylesheet " type= "text/css " />
<div align= "center ">
<table width= "756 " border= "0 " cellpadding= "0 " cellspacing= "0 ">
<!--DWLayoutTable-->
<tr>
<td width= "13 " height= "20 " > </td>
<td width= "180 " rowspan= "2 " valign= "top " > <table width= "100% " border= "0 " cellpadding= "0 " cellspacing= "0 ">
<!--DWLayoutTable-->
<tr>
<td width= "180 " height= "534 " valign= "top " bgcolor= "#3696e8 "> <!--#include file= "left.asp "--> </td>
</tr>
</table> </td>
<td width= "43 " align= "left " valign= "top " background= "image/main_1.gif " > <!--DWLayoutEmptyCell--> </td>
<td width= "506 " align= "left " valign= "middle " background= "image/main_2.gif " class= "biaoti " > 你的位置： <a href= "index2.asp " class= "lian "> 首页 </a> > <a href= "messenger.asp " class= "lian "> 即时信息 </a> </td>
<td width= "14 "> </td>
</tr>
<tr>
<td height= "544 " > </td>