<%
Set Conn=Server.Createobject("ADODB.Connection")
Conn.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("db/cai.mdb"),"" , ""
sql ="Select * From member where username like '"&Request.Form("user")&"'"
Set RS =Server.CreateObject("ADODB.Recordset")
RS.open Sql,Conn,1,3
if NOT(RS.EOF) then
response.write("รหัสนี้มีอยู่แล้ว")
else
Rs.AddNew
Rs("Username")= request.Form("user")
Rs("Password") = Request.Form("pass")
Rs("Name") = Request.Form("name")
Rs("LName") = Request.Form("Lname")
Rs("Address") = Request.Form("add")
Rs("Telephone") = Request.Form("tell")
Rs.Update
Conn.Close
response.Redirect("register.asp")
end if
%>
มันฟ้อง error ว่า
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E2F)
[Microsoft][ODBC Microsoft Access Driver]Error in row
/register_0.asp, line 17
อยากทราบว่าเป็นเพราะอะไรอะคับ