<%@language="vbscript"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>bbs</title>
<style type="text/css">
.....
</style>
</head>
<body>
<%dim conn,sql,rec,i
set conn=server.createobject("adodb.connection"
conn.open "driver={microsoft access driver (*.mdb)};DBQ="&server.mappath("gbook.mdb"
sql="select * from daohanglan"
set rec=conn.execute(sql)
%>
<div id="top">ddd
<ul id="new">
<li><a href="#" title="整个站点的概况"><%=rec.fields(0).name%></a></li>
<li><a href="#" title="个人才能的体现"><%=rec.fields(1).name%></a></li>
<li><a href="#" title="生活琐事"><%=rec.fields(2).name%></a> </li>
<li><a href="#" title="人生感悟"><%=rec.fields(3).name%></a> </li>
<li><a href="#" title="温馨家园"><%=rec.fields(4).name%></a> </li>
<li><a href="#" title="成长经历"><%=rec.fields(5).name%></a> </li>
<li><a href="#" title="娱乐时尚"><%=rec.fields(6).name%></a></li>
<li><a href="#" title="学习进行时" ><%=rec.fields(7).name%></a> </li>
<% rec.close
conn.close
set rec=nothing
set conn=nothing
%>
</ul>
</div>
<form class="rr" name="mynote" action="05-03-25/gform.asp" method="POST"><ul><li>姓 名:<input type="text" name="xm"
class="shuru"size="8" maxlength="10"/></li>
<li>邮 箱:<input type="text" name="yx" class="shuru" size="20" maxlength="30"/></li>
<li>主 题:<input type="text" name="zt" class="shuru" size="20" maxlength="30" /></li>
<li>留 言:<textarea name="ly" ></textarea></li>
<li style="margin-left:10px; "><input type="button" class="hao" value="提交" name="tj"/> <input type="reset"
class="hao" value="重填" name="ct"/>
<a href="05-03-25/gbook.asp">查看留言</a> </li>
</ul>
</form>
</body>
</html>
帮了忙指点下吧! 为什么第一次打开界面可以，但刷新却报错呢? 错误如下:
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft VBScript 编译器错误 错误 '800a03ea'
语法错误
/myweb/gform.asp，行66
else
^
