IDC资讯中心
recieve.asp
<html>
<% kname=request.form("usname")
kpassword=request.form("uspassword")
dbpath = server.mappath("chat.mdb")
set conn = server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq=" & dbpath
set rs=conn.execute("select name,password from chat") where name="&kname)
if rs.eof then
conn.execute("insert into chat (name,password) values("&kname&","&kpassword&")")
else if rs.fields("password")<>kpassword then
response.write"wrong password"
end if
end if
%>
<frameset rows="70%,30%" >
<frame src="forum.asp" name="main"
marginwidth="1" marginheight="1" noresize >
<frame src="frft.asp?kname=
" name="footnotes" marginwidth="1"
marginheight="1" noresize >
</frameset >
</html>
