Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Boy Boy

Dificuldade em gravar dados com ASP e MySQL

Recommended Posts

Olá amantes da web,

 

Sempre trabalhei com bd access, mas devido as suas limitações comecei a usar recentemente MySQL com ASP, mas estou tendo um problema para gravar alguns tipos de dados, vou tentar explicar melhor o meu problema, abaixo minha tabela MySQL e meu código ASP:

 

TABELA contratos

Campo: Tipo:

cod---int(11)

cod_cliente---int(11)

data_contrato---date

primeiro_pag---date

qtd_prestacoes---int(11)

termino_prestacoes---date

valor_prestacao---decimal(9,2)

valor_total_bruto---decimal(9,2)

banco---varchar(250)

filial---int(11)

obs---text

valor_total_liq---decimal(9,2)

senha---varchar(250)

vendedor---varchar(255)

correspondente---int(11)

 

código ASP para inserir no BD MySQL:

 

call abre_banco() (chamada da funcao que conecta o BD)

If Request.ServerVariables("HTTP_METHOD") = "POST" Then
vData = request.form("data_contrato")
vNome = request.form("nome")
vPrimeiro_pag = request.form("primeiro_pag")
vQtd_prestacoes = request.form("qtd_prestacoes")
vTermino_prestacoes = request.form("termino_prestacoes")
vValor_prestacao = request.form("valor_prestacao")
vValorBruto = request.form("valor_total_bruto")
vBanco = request.form("banco")
vVendedor = request.form("vendedor")
vFilial = request.form("filial")
vObs = request.form("obs")
vValorLiq = request.form("valor_total_liq")
vSenha = request.form("senha")
vCorrespondente = request.form("correspondente")

sINS = "insert into contratos (data_contrato, cod_cliente, primeiro_pag, qtd_prestacoes, termino_prestacoes, valor_prestacao, valor_total_bruto, banco, vendedor, filial, obs, valor_total_liq, senha, correspondente) values"
sINS = sINS & "('"&vData&"','"&vNome&"','"&vPrimeiro_pag&"','"&vQtd_prestacoes&"','"&vTermino_prestacoes&"','"&vValor_prestacao&"', '"&vValor_total_bruto&"','"&vBanco&"','"&vVendedor&"','"&vFilial&"','"&vObs&"','"&vValor_total_liq&"','"&vSenha&"','"&vCorrespondente&"')"
Set rsInput = conn.Execute(sINS)

response.Redirect "index.asp"
end if

o que acontece, quando executo o codigo acima ele salva no banco de dados todos os campos, com excessão dos campos que no BD (em negrito) estao como date e decimal(9,2), que ficam em branco.

 

Acredito que o problema esteja na linha:

sINS = sINS & "('"&vData&"','"&vNome&"','"&vPrimeiro_pag&"','"&vQtd_prestacoes&"','"&vTermino_prestacoes&"','"&vValor_prestacao&"','"&vValor_total_bruto&"', '"&vBanco&"','"&vVendedor&"','"&vFilial&"','"&vObs&"','"&vValor_total_liq&"','"&vSenha&"','"&vCorrespondente&"')"

mas tentei pesquisar na net e não encontrei a forma de corrigir, se alguém puder me ajudar, eu serei muito grato.

 

Se houver alguma diferença para usar com UPDATE, por favor, respondam tb.

 

Obrigado a todos http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

Boy Boy

Compartilhar este post


Link para o post
Compartilhar em outros sites

data deve ser gravada no formato yyyy-mm-dd

decimal você tem que substituir a o ponto por nada e a virgula por ponto(nessa ordem tem que ser o replace)

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.