USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Data com valor null
Carlos
não registrado
Postada em 29/08/2006 08:24 hs   
Olá, eu estou precisando limpar uma campo do tipo Data/Hora, mas ele n está aceitando valor nulo (null / ""), estou usando bd access 2000 e vb6, conexão por ADO com consultas usando query SQL, alguem sabe como eu faço para limpar este campo?
     
Cardoso G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
Postada em 29/08/2006 08:36 hs            
coloque ai sua linha de comando
 
mas, normalmente é assim
rs("campo")="null"
     
Carlos
não registrado
Postada em 29/08/2006 08:57 hs   
isso é só um teste q eu estou fazendo... se eu dexo em branco co campo de texto ele da erro, se eu coloco 'Data' ao inves do #Data# até funciona, + se eu for tentar deixar em branco tb da erro, se eu coloco VbNullString tb da erro, se eu coloco Null tb da erro. Alguem sabe o q eu posso fazer? no caso da inserção dos dados, se n tiver a data td bem, eu escolho os campo q vo fazer a inserção e passo pelo problema, mas eu preciso saber como limpra o campo, p/ q funcione na alteração dos dados (instrução "UPDATE"). vlw

Private Sub Command1_Click()
__Dim bd As New ADODB.Connection
__Set bd = New ADODB.Connection
__bd.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security __Info=False;Data Source=" & App.Path & "db1.mdb"
__bd.Open
__bd.Execute ("insert into Tabela1 values(#" & Text1.Text & "#);")
__bd.Close
End Sub
     
Cardoso G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
Postada em 29/08/2006 09:59 hs            
Carlos faça do jeito que te indiquei ai em cima que da certo, passa o null entre aspas duplas ok.
     
wncruz
RIO DE JANEIRO
RJ - BRASIL
Postada em 29/08/2006 11:44 hs            
Vc tb pode ver no proprio ACCESS.
Tem uma propriedade do campo que aceita "NULL" ou não aceita.
OK
 
SDs
Watson

Sds,

"O segredo é quebrar os problemas em pequenos pedaços administráveis. Se você lidar com eles, termina antes de saber disso."

Watson Gomes da Cruz
     
Ivo
BARRETOS
SP - BRASIL
Postada em 29/08/2006 12:09 hs            
Ola Carlos
Uns tempos atrás quebrei a cabeça com isso.
A solução que encontrei foi essa.
No evento de gravar...
 If TX(8).Text = "" Then
 .Fields(8) = Null
 Else
 .Fields(8) = TX(8).Text
 End If
 
Tente isso....boa sorte
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página