Perk
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 27/08/2007 16:51 hs
Tenho um Maskedbox formatado com máscara 99/99/9999, porém se a data não estiver preenchida, campo = " / / ", no SQL abaixo dá o erro "Tipo de dados incompatível na expressão de critério". SQL = "INSERT INTO Func (Nome, Nome_Conhecido, Data_Nasc) VALUES ('" & Txt_Nome & "', '" & Txt_Nome_Conhecido & "', '" & Txt_Data_Nasc & "')"
ConexaoBD.Execute SQL Já tentei jogar vazio nele e também não deu certo.
<<<< Vivendo e aprendendo >>>>
|
|
|
|
|
|
kerplunk
|
SÃO PAULO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 27/08/2007 17:33 hs
if not isdate(txt_data_nasc.text) then SQL = "INSERT INTO Func (Nome, Nome_Conhecido, Data_Nasc) VALUES ('" & Txt_Nome & "', '" & Txt_Nome_Conhecido & "', Null)"
elseSQL = "INSERT INTO Func (Nome, Nome_Conhecido, Data_Nasc) VALUES ('" & Txt_Nome & "', '" & Txt_Nome_Conhecido & "', '" & Txt_Data_Nasc & "')"
end if ConexaoBD.Execute SQL |
|
|
|
|
