Erro INSET INTO

[Roronoa Manolo 0]

Eaee pessoal, blzz ??

 

Eu sou novo no forum e nessa Área também, vim aqui porque estou com problemas na minha Loja Virtual e já estou enlouquecendo =/

 

O Erro que ocorre é o seguinte:

 

Script error detected at line 138.

Source line: cmdSQL.Execute()

Description: Erro de sintaxe na instrução INSERT INTO.

No acces está

 

codigo_usuario = numero

nome_usuario texto

senha_usuario = texto

senha_usuario = texto

 

 

No Dreamweaver está:

 

<%
response.Buffer = true

Dim rsCodigos
Dim rsCodigos_cmd
Dim rsCodigos_numRows

Set rsCodigos_cmd = Server.CreateObject ("ADODB.Command")
rsCodigos_cmd.ActiveConnection = MM_bdSisLoja_STRING
rsCodigos_cmd.CommandText = "SELECT * FROM tabCodigos" 
rsCodigos_cmd.Prepared = true

Set rsCodigos = rsCodigos_cmd.Execute
rsCodigos_numRows = 0



'2º passo: ajustar o código do produto para cadastrar um novo produto
dim codigo_cli
codigo_cli = rsCodigos.Fields.Item("codigo_cli").Value + 1

rsCodigos.Close()
Set rsCodigos = Nothing


[b]'3º passo: comando sql de inclusão de um novo produto
Set cmdSQL = Server.CreateObject ("ADODB.Command")
cmdSQL.ActiveConnection = MM_bdSisLoja_STRING
cmdSQL.CommandText ="INSERT INTO tabUsuarios(codigo_usuario, nome_usuario, senha_usuario, nivel_usuario)  VALUES ( " &_
						codigo_usuario & "," &_
						chr(34) & request("edtNome") & chr(34) & "," &_
						chr(34) & request("edtSenhaUsuario") & chr(34) & "," &_
						request("cmbNivel") &_
						" ) "
cmdSQL.CommandType = 1
cmdSQL.CommandTimeout = 0
cmdSQL.Prepared = true
cmdSQL.Execute()[/b]


'4º passo: gravar o novo código do último produto cadastrado
Set cmdSQL = Server.CreateObject ("ADODB.Command")
cmdSQL.ActiveConnection = MM_bdSisLoja_STRING
cmdSQL.CommandText = "UPDATE tabCodigos SET " &_
					" codigo_cli = " & codigo_cli
cmdSQL.CommandType = 1
cmdSQL.CommandTimeout = 0
cmdSQL.Prepared = true
cmdSQL.Execute()




response.redirect("cadUsuario_restrito_sql.asp?codigo_cli=" & codigo_cli)
%>

Por favor me ajudem, é urgente =S

[xanburzum 169]

Antes de executar verifique o valor da instrução sql :

 

response.write sql
response.end()