Dsantos
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 11/04/2005 15:36 hs
Pessoal, Estou usando o código abaixo para inclusão dos valores no BD, mas só esta gravando se todos os campos estiverem preenchidos, caso tenha algum campo em branco, ignora a gravação, alguem pode dar uma luz? sql = "INSERT INTO PDP"
sql = sql & "( Prioridade, OS, Mbkp, Data, Local, Analista, Mnovo, Empresa, "
sql = sql & "AC, Patrimonio, Img, Problema, Bkp, Motivo, Diag, Modelo, "
sql = sql & "Processador, Memoria, HD, Rede, Video, Som ) values "
sql = sql & "('" & combopriori & "','" & txtos & "','" & txtMicrobkup & "','" & txtData & "','" & Combolocal & "','" & ComboAnalista & "','" & cmdNew & "','" & Empresa & "' ,"
sql = sql & "'" & txtAc & "','" & txtPat & "','" & ComboImagematual & "','" & txtProblema & "','" & Combobackuprealizado & "','" & txtMotivo & "','" & txtDiag & "','" & txtModelo & "',"
sql = sql & "'" & txtProc & "','" & txtRam & "','" & txtHd & "','" & txtrede & "','" & txtvideo & "','" & txtsom & "')"
db.Execute (sql)
|
|
|
|
|
|
Rochª
|
RIO DE JANEIRO
RJ - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 11/04/2005 17:35 hs
Verifique se voce nao esta gravando um campo numerico com null ou branco. Isso da erro e nao grava.
__________________________________________________________________________ Qualquer coisa post Rochª
|
|
|
|
Dsantos
|
RIO DE JANEIRO
RJ - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 11/04/2005 19:37 hs
não, todos os campos do meu banco são "Texto", com exeção de um que é "Memo" |
|
|
|
|
|
Postada em 12/04/2005 03:41 hs
Dica: já vi que deves ter se embananado com este código...
Tente fazer uma linha para o Insert into e outra para os Values
Possivelmente eliminarás o erro, provavelmente deva ser alguma vírgula ou apóstrofe
--------------------------------------
Screech 
"Programar é arte..."
|
|
|
|
|
|
Postada em 12/04/2005 18:09 hs
não sei se a maneira que faço é a mais certa, porem é a mais facil exemplo... faço um select para setar a tabela que vou inserir.. Depois acrescento linha a linha em cada field o valor correspondente. sql = "select * from tbl_pedido) rstPedido. open sql rstpedido.addnew rstpedido!codigo_ped = txt_codigoped rstpedido!codigocli= txt_Codigocli etc, etc... ..... rstpedido.update se der erro, para na linha que gerou o erro |
|
|
|
|
|
Postada em 14/04/2005 15:36 hs
Galera, consegui resolver de outra forma, recebi uma dica para configurar os campos no BD como permitir comprimento zero=sim, requerido = não, feito esta alteração passou a incluir sem problemas, não precisei mexer no código. mas valeu pela ajuda de todos. abs |
|
|
|
|
