% If session("admin")="admin" Then %> <% set rs=server.CreateObject("adodb.recordset") sql="select * from contents where id="&request("id") rem request("id")是传递过来的参数 rs.Open sql,conn,1,1 name = rs("name") content = rs("content") id = rs("id") %>
<% conn.close Set conn = Nothing else response.write ("") End If %>