[Resolvido] Insert não funciona no MSSQL

[d_lepera 0]

Boa Tarde Galera,

 

Estou com um problema no meu script ASP.

Tenho um bd mssql e tenho um script asp para inserir dados nesse banco.

Qndo executo esse script na minha maquina usando o IIS e o Access ele insere os dados, mas qndo passei para o MSSQL, no servidor do meu site ele não funciona.

Detalhes:

 

1- Já mudei a conexao

2- Já olhei a COLLATE e está correta tanto do bd qnto da tabela

3- Só o comando INSERT não sunciona, os outro como SELECT ou CREATE TABLE funciona normalmente

4- O usuario q uso para a conexao é Owner, ou seja ELE PODE TUDO

 

o script AUT_INSERT.ASP

 

<!--#include file = "!include.asp"-->
<%
'Não armazena em cache
response.Expires = 0

'Criando Objeto de gravação
set sqlSel = Server.CreateObject("ADODB.Recordset")
sqlSel.Open "SELECT*FROM autorizadas", conexao, 1, 3

'------------------------------------------------------------------
'Pegando as variaveis do formulário
nome = Replace(Request.Form("nome"), "'","")
estado = Replace(Request.Form("estado"), "'","")
endereco = Replace(Request.Form("endereco"), "'","")
bairro = Replace(Request.Form("bairro"), "'","")
cep = Replace(Request.Form("cep"), "'","")
cidade = Replace(Request.Form("cidade"), "'","")
dddtel1 = Replace(Request.Form("dddtel1"), "'","")
tel1 = Replace(Request.Form("tel1"), "'","")
dddtel2 = Replace(Request.Form("dddtel2"), "'","")
tel2 = Replace(Request.Form("tel2"), "'","")
email = Replace(Request.Form("email"), "'","")
site = Replace(Request.Form("site"), "'","")
obs = Replace(Request.Form("obs"), "'","")

'------------------------------------------------------------------
'validando os dados
if nome="" or endereco="" or bairro="" or cidade="" or dddtel1="" or tel1="" then
response.Write("<script>alert('Campos obrigatórios em branco.');history.go(-1);</script>")
elseif IsNumeric(cep)=False then
response.Write("<script>alert('Digite apenas números - CEP');history.go(-1);</script>")
elseif IsNumeric(dddtel1)=False then
response.Write("<script>alert('Digite apenas números - DDD');history.go(-1);</script>")
elseif IsNumeric(tel1)=False then
response.Write("<script>alert('Digite apenas números - Telefone');history.go(-1);</script>")
elseif IsNumeric(dddtel2)=False then
response.Write("<script>alert('Digite apenas números - DDD');history.go(-1);</script>")
elseif IsNumeric(tel2)=False then
response.Write("<script>alert('Digite apenas números - Telefone');history.go(-1);</script>")						
else
sqlIns = "INSERT INTO autorizadas (nome, estado, endereco, bairro, cep, cidade, dddtel1, tel1, dddtel2, tel2, email, site, obs) VALUES ('"&nome&"', '"&estado&"', '"&endereco&"', '"&bairro&"', "&cep&", '"&cidade&"', "&dddtel1&", "&tel1&", "&dddtel2&", "&tel2&", '"&email&"', '"&site&"', '"&obs&"')"
set sqlSel = conexao.Execute sqlIns

set sqlIns = nothing
sqlSel.Close
set sqlSel = nothing

response.Redirect("aut_consulta1.asp")
end if
%>

por favor isso é urgente

[Ted k' 126]

tente agora:

 

sqlIns = "INSERT INTO autorizadas (nome, estado, endereco, bairro, cep, cidade, dddtel1, tel1, dddtel2, tel2, email, site, obs) VALUES ('"&nome&"', '"&estado&"', '"&endereco&"', '"&bairro&"', '"&cep&"', '"&cidade&"', '"&dddtel1&"', '"&tel1&"', '"&dddtel2&"', '"&tel2&"', '"&email&"', '"&site&"', '"&obs&"')"
conexao.Execute(sqlIns)

e esse include de conexão com exclamação na frente, está certo?

[Salgado 4]

Exibe alguma mensagem de erro?

[d_lepera 0]

tente agora:

 

sqlIns = "INSERT INTO autorizadas (nome, estado, endereco, bairro, cep, cidade, dddtel1, tel1, dddtel2, tel2, email, site, obs) VALUES ('"&nome&"', '"&estado&"', '"&endereco&"', '"&bairro&"', '"&cep&"', '"&cidade&"', '"&dddtel1&"', '"&tel1&"', '"&dddtel2&"', '"&tel2&"', '"&email&"', '"&site&"', '"&obs&"')"
conexao.Execute(sqlIns)

e esse include de conexão com exclamação na frente, está certo?

Ted K o include está correto sim....

tentei colocar as aspas simples nos campos que faltavam, mas não deu certo, até porque são campos numéricos.

 

Salgado,

Exibe uma mensagem de erro sim, o problema é q o local de hospedagem é configurado para não exibir mensagens de erro, no lugar aparece uma página personalizada de erro.

[Ted k' 126]

testa local, você pode acessar o MSSQL do local para web, fica lento, mais funciona!

 

Assim dar para ver o erro!

[d_lepera 0]

testa local, você pode acessar o MSSQL do local para web, fica lento, mais funciona!

 

Assim dar para ver o erro!

Cara,

 

Estou tentando testa local, mas num to conseguindo está dando SQL Server inexistente ou acesso negado

 

está tudo correto: provider, uid, pwd, server.

 

o server é sql5.ntsnet.com.br será que é necessário colocar o "http://" ai fica http://sql5.ntsnet.com.br?

[d_lepera 0]

testa local, você pode acessar o MSSQL do local para web, fica lento, mais funciona!

 

Assim dar para ver o erro!

Cara,

 

Estou tentando testa local, mas num to conseguindo está dando SQL Server inexistente ou acesso negado

 

está tudo correto: provider, uid, pwd, server.

 

o server é sql5.ntsnet.com.br será que é necessário colocar o "http://" ai fica http://sql5.ntsnet.com.br?

 

 

 

RESOLVIDO!!

 

pessoal mto obrigado pela atenção e esforço de vocês. Fiz um script de tratamento de erros, que enviava a descrição do erro,erro nativo, numero do erro, etc, direto pro meu email, com isso percebi que na verdade o campo bairro na tabela estava escrito como 'bairo', por isso estava dando erro.

 

mas uma vez obrigado e até a próxima....