se está como Money tens de converter para Money tambem...
INSERT INTO (...)
VALUES
( ..., convert(Money, '123.32'), )
não te esqueças de usar o replace( valor, ",", ".") que vai mudar virgulas
para pontos, afim de não te dar erro no INSERT
--
Bruno Alexandre
"a Portuguese in Københav, Danmark"
"Ruhan Medeiros Martins"
yahoo.com.br> escreveu na mensagem
news:%%23qbzk3UvGHA.1808@TK2MSFTNGP06.phx.gbl...> Pessoal,
> Estou criando um formulário para que possa inserir no banco de dados.
> Mas está dando erro.
> Através de testes, consegui identificar o erro, mas não sei como corrigir.
> Segue abaixo o código:
> <%%@LANGUAGE="VBSCRIPT"%%>
> <%%
> Option Explicit
> %%>
>
> <%%
> DIM conexaoDataBase
> DIM strIns, rsLivros
> DIM varCodigo, varCodCategoria, varTitulo, varAutor, varNPaginas,
> varFormato, varPreco, varResenha, varLancamento, varDataPub
> varCodigo=TRIM(Request.Form("txtCodigo"))
> varCodCategoria=TRIM(Request.Form("txtcodCategoria"))
> varTitulo=TRIM(Request.Form("txtTitulo"))
> varAutor=TRIM(Request.Form("txtAutor"))
> varNPaginas=TRIM(Request.Form("txtNPaginas"))
> varFormato=TRIM(Request.Form("txtFormato"))
> varPreco=TRIM(Request.Form("txtPreco"))
> varResenha=TRIM(Request.Form("txtResenha"))
> varLancamento=TRIM(Request.Form("txtLancamento"))
> varDataPub=TRIM(Request.Form("txtDataPub"))
> varTitulo = REPLACE(varTitulo, "'"," ")
> varAutor = REPLACE(varAutor, "'"," ")
> varFormato = REPLACE(varFormato, "'"," ")
> varResenha = REPLACE(varResenha, "'"," ")
> varPreco = REPLACE(varPreco, "'",".")
> Call abreconexao
> strINS = "INSERT into Livros"
> strINS=strINS & "(codLivro, Categoria, titulo, autor, npaginas, formato)"
> 'preco, resenha, lancamento, dataPub)"
> strINS=strINS& "VALUES
> ('"&varCodigo&"','"&varCodCategoria&"','"&varTitulo&"','"&varAutor&"',"&varNPaginas&",'"&varFormato&"')"
> ',"&varPreco&")"
> 'strINS=strINS+"'"&varResenha&"',"
> 'strINS=strINS+"'"&varLancamento&"',"
> 'strINS=strINS+"'"& varDataPub&"')"
>
> Set rsLivros=conexaoDataBase.Execute(strIns)
> %%>
>
>
Resultado da Inserção
>
>
> O Livro: "<%%=varTitulo%%>" foi cadastrado com sucesso
>
>
> <%%
> Call fechaConexao
> Set rsLivros = Nothing
> %%>
>
> Obs: Do jeito que o codigo está, ele cadastra normalmente, mas se eu tirar
> o preco e a varPreco do comentário e colocá-lo dentro do codigo em si, ele
> dá erro.
> No banco de dados, o preço está como tipo: unidade monetária.
> Como eu corrigo esse problema??
> Obrigado.
>
> Ruhan Medeiros
