Duvida deletar registro do banco de dados Acces

[Moonfall]

Galera seguinte.. surgiu 1 duvida que penso ser simples..

tenho 1 banco de dados em ACCESS onde meu programa se conecta faco a pesquisa de tudo que eu quero e preencho numa flexgride

agora e para deletar? como posso fazer?

gostaria de selecionar na grid e clicar no botao deletar

a tabela e a "PRINCIPAL"

e a conexcao chamo de CON

recordset de RS

pensei em algo do tipo:

rs!delete from Clientes where Cadastro = "'& msflexgrid1.rowsel & '"

pois para adicionar é rs!addnew

mas não funcionaa :\

desde já agradeco

[kuroi]

sendo q, no codigo abaixo, cn é o seu objeto Connection, faca assim:

cn.Execute "delete from Clientes where Cadastro = '" & msflexgrid1.rowsel & "'"

depois disso você tera q fazer o select de novo pra atualizar o grid.

[Moonfall]

boaa cara valeu.. funcionou.. so teve 1 probleminha que ele pega o numero da celula clicada.. eu tive que passar o numero da celula que ele pegava pra 1 string ai foi que foi =D

agora aproveitando uma outra coisa..

If Format(Now, "mm/dd/yyyy") & " " & Format(Right(Now, 8), "hh:mm:ss") > Format(rs!DIA_HORA, "dd/mm/yyyy") & " " & Format(Right(rs!DIA_HORA, 8), "hh:mm:ss") Then
    mSg = "Executada"
Else
    mSg = "Agendada!"
end if

ele não cai em executada nuncaaa parece que ele não consegue ver quem e o maior e quem e o menor.. porque sera?

[kuroi]

tente converter pra data. assim:

If CDate(Format(Now, "mm/dd/yyyy") & " " & Format(Right(Now, 8), "hh:mm:ss")) > CDate(Format(rs!DIA_HORA, "dd/mm/yyyy") & " " & Format(Right(rs!DIA_HORA, 8), "hh:mm:ss")) Then

[Moonfall]

lindo lindo! rodou lindo!

vlw!