ERRO EM CONSULTA

XXXANGELSXXX 02/12/2010 17:23:51
#358653 Resposta escolhida

db.Execute ([Ô]DELETE Tbl_Eap_Emp.Emp_data FROM Tbl_Eap_Emp WHERE Tbl_Eap_Emp.Emp_data= [ô][Ô] & format(nomecomponente.text,[Ô]mm/dd/yyyy[Ô]) & [Ô][ô];[Ô])

isso sendo acess
para cada banco vai modificar a forma

MARCELO.TREZE 02/12/2010 17:25:15
#358654

qual o banco de dados?

JONATASBM 02/12/2010 17:38:50
#358656

Estou trabalhando com o Acess

JONATASBM 02/12/2010 18:00:41
#358657

XXXANGELSXXX

Desta Forma que vc volocou tambem deu erro eu fiz o seguinte

Dim Tdata As String

Tdata = [Ô][Ô]
Tdata = [Ô]#[Ô]
Tdata = Tdata & Format(datas, [Ô]mm/dd/yyyy[Ô])
Tdata = Tdata & [Ô]#[Ô]

db.Execute ([Ô]DELETE Tbl_Eap_Emp.Emp_data, Tbl_Eap_Emp.Emp_Hora FROM Tbl_Eap_Emp WHERE Tbl_Eap_Emp.Emp_data= [Ô] & Tdata & [Ô] ;[Ô])

Funcionou porem acho que não é a forma correta de se fazer