Aê, Tarkan valeu pela dica anterior ( foi o woz que digitou errado...hehe, mas valeu), já corrigi e funcionou legal.
Agora meu probleminha é na instrução SQL Insert Into. É ela que uso para gravar dados numa tabela, certo?
Se eu estiver certo onde está o erro no meu código?
<%
if Request.Form("senha") <> Request.Form("senha2") then
Response.Write("Senha não confirmada")
else
vbase=Request.Form("base")
vcnpj=Request.Form("cnpj")
vrazaosocial=Request.Form("razaosocial")
vendereco=Request.Form("endereco")
vnumero=Request.Form("numero")
vcomplemento=Request.Form("complemento")
vbairro=Request.Form("bairro")
vcidade=Request.Form("cidade")
vestado=Request.Form("estado")
vcep=Request.Form("cep")
vresponsavel=Request.Form("responsavel")
vemail=Request.Form("email")
vsenha=Request.Form("senha")
Dim conObj
Set conObj = Server.CreateObject("ADODB.Connection")
conObj.Open = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("DBMAX/DBMAX.mdb") & ";"
conObj.execute("INSERT INTO CADASTRO(BASE,CNPJ,RAZAOSOCIAL,ENDERECO,NUMERO,COMPLEMENTO,BAIRRO,CIDADE,ESTADO,CEP,RESPONSAVEL,EMAIL,PASSWORD)values('"&vbase&"','"&vcnpj&"','"&vrazaosocial&"','"&vendereco&"',
'"&vnumero&"','"&vcomplemento&"','"&vbairro&"','"&vcidade&"','"&vestado&"',
'"&vcep&"','"&vresponsavel&"','"&vemail&"','"&vsenha&"')")
end if
%>
Erro APONTADO
Microsoft JET Database Engine (0x80040E14)
Erro de sintaxe na instrução INSERT INTO.
/web/dbmaxloggrcs/cadastrar.asp, line 33
Obrigado por enquanto pela ajuda de todos vc's.
Edição feita por: wozniak, 23/04/2004, 10:15.