hi I’m new(wow, cool forum lol)
I’m here to ask something
<%
Dim oRS, oConn
Set oRS = Server.CreateObject(“ADODB.Recordset”)
Set oConn = Server.CreateObject(“ADODB.Connection”)
oConn.ConnectionString=“Driver={Microsoft Access Driver (*.mdb)};DBQ=” & Server.MapPath(“charinfo.mdb”)
dim charusername,charpassword,charemail
charusername=Request.QueryString(“charusername”)
charpassword=Request.QueryString(“charpassword”)
charemail=Request.QueryString(“charemail”)
oRS.Open “SELECT * FROM char”,oConn,2,3
oRS.Find “name=’”&charusername&"’"
if oRS.EOF Then
oRS.addnew
oRS(“name”)=charusername
oRS(“password”)=charpassword
oRS(“email”)=charemail
oRS.update
Response.Write “success=yes”
Else
Response.Write “success=sorry, your name has already been taked”
end if
oRS.Close
Set oRS = Nothing
oConn.Close
Set oConn = Nothing
%>
it doesn’t work, why???
please help me!!!
