程序代码:
,连接数据库 '创建记录集 select xm form tabel1 if rs.eof next 暂无数据 end if do while not rs.eof ’输出表格行 <%=rs("id")%> <%=rs("xm")%> <a harf="xiangqing.asp?id=<%=rs("id")%>>查看详情</a> rs.movenext loop rs close() set rs=nothing 详情网页(xiangqing.asp) dim id id=request.querystring("id") ,连接数据库 '创建记录集 select * form tabel1 id="'id'" 【查询数据库的sql语句不同!】 if rs.eof next 参数错误 end if ’输出表格 <%=rs("xm")%> <%=rs("nl")%> <%=rs("xb")%> rs close() set rs=nothing
纯手打,提供一个思路以及关键处代码,仅供参考