chkadd.asp

来自「很好的财务系统」· ASP 代码 · 共 18 行

<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<% 
function OpenDB(sdbname)
{
    var connstr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+Server.MapPath(sdbname);
    var conn = Server.CreateObject("ADODB.Connection");
    conn.Open(connstr);
    return conn;
}
var oConn = OpenDB("data.mdb");
var sql = "select * from users where userid='"+unescape(Request("userid"))+"'";
var rs = oConn.Execute(sql);
if(!rs.eof){
var str="ERROR! 编号:"+unescape(Request("userid"))+" 已经存在!";
Response.write(escape(str));
}
rs.Close
 %>