[ÇóÖú]ÏòÊý¾Ý¿âÀïÌí¼ÓÊý¾ÝµÄÎÊÌâ

¡¾ä²¡î›ý¡¿

ÎÒÏòÊý¾Ý¿âÀïÌí¼ÓÊý¾Ý
Õâ¸ö´úÂë²»¿ÉÒÔ°¡
ÄÄλ°ïÎÒ¿´¿´²îµ½ÄÄÁË/£¿£¿£¿£¿
<%
uid=Request.Form("uid")
upwd=Request.Form("upwd")
email=Request.Form("email")
conn="provider=microsoft.jet.oledb.4.0;data source=C:\Inetpub\wwwroot\lb\db1.mdb;persist security info=false"
set strconn=Server.CreateObject("adodb.connection")
strconn.open conn
set objrs=Server.CreateObject("adodb.recordset")
objrs.Open "select *from lxr where uid='"&uid&"'",conn
if not objrs.eof then
addnew
objrs(0)=uid
objrs(1)=upwd
objrs(2)=email
update
Response.Write ("<script language=javascript>alert('ÓÐÏàͬÓû§Ãû');</script>")
Response.Redirect"reg.asp"
else Response.Write("<script language=javascript>alert('ÓÐÏàͬÓû§Ãû');</script>")
Response.Redirect"reg.asp"
end if
%>

Ëæchu·çliu

conn="provider=microsoft.jet.oledb.4.0;data source=C:\Inetpub\wwwroot\lb\db1.mdb;persist security info=false"
set strconn=Server.CreateObject("adodb.connection")
strconn.open conn

ÉÏÃæÕ⼸ÐУ¬°Ñstrconn¸úconn½»»»Î»ÖÃ

¤£¡îveã‘

¿ÉÎÒÔõô¸Ð¾õ½»»»Î»ÖÃÊÇ´íµÄÄØ
»¹ÓбðµÄµØ·½ÊÇ´íµÄ Âð

ýˆ2132

ÌáʾÄÄÐдíÁË£¬¾ßÌå´íÎóÐÅÏ¢ÊÇʲô£¬±¿£¡

first

if not objrs.eof then
Response.Write ("<script language=javascript>alert('ÓÐÏàͬÓû§Ãû');</script>")
Response.Redirect"reg.asp"
else
objrs.addnew
objrs(0)=uid
objrs(1)=upwd
objrs(2)=email
objrs.update
end if