怎麽 用delphi做壹個圖書館管理系統啊，急啊，呵呵

admin_name=request("admin_name")

admin_pass=request("admin_pass")

%>

<!--#include file="conn.asp"-->

<%

set rs=server.createobject("adodb.recordset")

sql="select * from admin where admin_name='"&admin_name&"' and

admin_pass='"&admin_pass&"'"

rs.open sql,conn,3,3

if rs.eof then