Jump to content
Fórum Script Brasil
  • 0

Inserir Registros Numa Tabela


Thaís Mesquita
 Share

Question

Bom dia pessoal!

Já postei no fórum como fazer a conexão com um banco sql server...Mas estou tentando inserir dados na tabela e esta dando o seguinte erro:

ADODB.Recordset (0x800A0BB9)

Os argumentos são incorretos, estão fora do intervalo aceitável ou estão em conflito.

Meu código:

<%
<!--#include virtual="/conecta.inc"--> 
nome=request.form("txtNome")
login=request.form("txtLogin")
senha=request.form("pwdSenha")
confirmaSenha=request.form("pwdConfirmaSenha")

Set RS = Server.CreateObject("ADODB.RecordSet") 'para abrir um recordset
RS.CursorLocation = 3
RS.CursorType = 3
RS.Open SQL, Conn

SQL = "select * from Usuario()"


Set bd = Server.CreateObject("ADODB.Connection") 'para abrir uma conexão
bd.Open Conn

RS.AddNew


set nome = request.form("nome")
set login=request.form("login")
set senha=request.form("senha")
set confirmaSenha=request.form("confirmaSenha")
Set rsQuery = conexao.Execute("insert into Usuario(Nome,Login,Senha,ConfirmaSenha) values('"+nome+";"+login+";"+senha+";"+confirmaSenha+"')")

%>

O que posso estar fazendo de errado?

Link to comment
Share on other sites

9 answers to this question

Recommended Posts

  • 0

tenta assim

<%
<!--#include virtual="/conecta.inc"-->
nome = Request.Form("txtNome")
login = Request.Form("txtLogin")
senha = Request.Form("pwdSenha")
confirmaSenha = Request.Form("pwdConfirmaSenha")

sql = "insert into Usuario (Nome, Login, Senha, ConfirmaSenha) values ('" & nome & "','" & login & "','" & senha & "','" & confirmaSenha & "')"
conexao.Execute(sql)
%>

Link to comment
Share on other sites

  • 0
Tenta tirando o RS.AddNew

Já testei sem ele... ficou assim:

<!--#include virtual="/conecta.inc"-->

nome=request.form("txtNome")

login=request.form("txtLogin")

senha=request.form("pwdSenha")

confirmaSenha=request.form("pwdConfirmaSenha")

Set RS = Server.CreateObject("ADODB.RecordSet") 'para abrir um recordset

RS.CursorLocation = 3

RS.CursorType = 3

RS.Open SQL, Conn

SQL = "select * from Usuario()"

Set bd = Server.CreateObject("ADODB.Connection") 'para abrir uma conexão

bd.Open Conn

SQL = "insert into Usuario(Nome,Login,Senha,ConfirmaSenha) values('" & nome & "','" & login & "','"& senha &"','" & confirmaSenha &"')"

Conn.Execute(SQL)

%>

Edited by Thaís Mesquita
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share



  • Forum Statistics

    • Total Topics
      150.1k
    • Total Posts
      647.1k
×
×
  • Create New...