程序出现以下错误？

程序代码：<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver  
(*.mdb)};dbq="&server.mappath("example3.mdb")
%>

<%
exec="select * from guestbook"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
<table width="100%" border="0" cellspacing="0"  
cellpadding="0">
<%do while not rs.eof%><tr>
<td><%=rs("name")%></td>
<td><%=rs("tel")%></td>
<td><%=rs("message")%></td>
<td><%=rs("time")%></td>
</tr><%
rs.movenext
loop
%>
</table>




怎么改了？