INSERT e SELECT juntos

[feasso 0]

Como dou um INSERT na tabela e ainda na mesma página dou um SELECT ???

[Descoisado 0]

Amigo,

você faz assim:

 

Sql = "Insert Into tabela(campo) Values ('"&dado&"')"
conn.Execute(Sql)

Sql2 = "Select * From tabela"
Set rs = conn.Execute(Sql)

[feasso 0]

Foi o que fiz... mas ele não encontra o registro que acabou de ser inserido.

[hargon 64]

Para pegar o último registro o SELECT deve ser:

"Select TOP 1 codigo From tabela ORDER BY codigo DESC"

[Mário Monteiro 179]

é bom tambem usar no WHERE alguns dados usados na inserção