|
留言讨论
郝韦娟
1
conn.asp:
<% dim conn,connstr,db,rs db="db.mdb" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"") conn.Open connstr %> index.asp: <!--#include file="conn.asp"--> <% set rs=Server.CreateObject ("adodb.recordset") rs.open "select * from productinf",conn,1,1 response.write("<table align='center'><tr><th>商品编号</th><th>商品名称</th><th>商品价格</th><th>商品库存量</th><th>商品售出量</th><th>操作</th></tr>") Do While Not rs.Eof %> <tr> <td><%=rs("id")%></td> <td><%=rs("proname")%></td> <td><%=rs("proprice")%></td> <td><%=rs("prosto")%></td> <td><%=rs("prosale")%></td> <td><a href=buy.asp?id=<%=rs("id")%>>购买</a></td> </tr> </table> <% rs.movenext loop rs.close set rs=nothing conn.close set conn=nothing %> 在地址栏输入localhost时,显示localstart.asp有错误 请尝试执行下列操作: HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
|
帖子搜索
一月最受支持
暂时没有相应新闻
一周回复最多
暂时没有相应新闻
|