Olá a todos,
Estou a fazer um site em ASP para um jogo online e estou com um problema a escrever os dados de registo do utilizador para a base de dados.
O código que tenho é o seguinte:
<%
Login=Request("login")
Nome=Request("nome")
Email=Request("email")
Password=Request("pass")
Endereco=Request("morada")
Telefone=Request("telefone")
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.provider = "Microsoft.Jet.OLEDB.4.0"
conn.Open Server.MapPath("db/clube.mdb")
Dim rsRegisto, rs, sqlreg
sqlrs = "select * from Utilizadores where Login ='" & login & "'"
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs=conn.execute(sqlrs)
if rs.EOF then
sqlreg="INSERT INTO Utilizadores(Login, Nome, E-mail, Password, Endereço, Telefone)"
sqlreg=sqlreg & " VALUES('"&Login&"','"&Nome&"','"&Email&"','"&Password&"','"&Endereco&"','"&Telefone&"')"
Set rsRegisto = Server.CreateObject("ADODB.Recordset")
Response.write sqlreg
Set rsRegisto = conn.execute(sqlreg)
Response.write "Os seus dados foram enviados com sucesso"
else
Response.write "Esse Login já existe"
end if
conn.close()
%>
Dá erro exactamente na linha: Set rsRegisto = conn.execute(sqlreg)
Obrigado,
Carlos Furriel.