AYUDA CON CONSULTA A TABLA

BERA
14 de Mayo del 2003
tengo un formulario con los campos enlazados a un adodc. Este lo tengo enlazado con una tabla. el adodc lo tengo oculto para que el usuario no pueda moverse por los registros y solo pueda ver el registro que esta dando de alta. en el Form_load tengo el siguiente codigo:
sql = "SELECT * FROM SINIESTROS_RRGG WHERE NUMSTRORRGG='0'"
adodcDatos.CommandType = adCmdText
adodcDatos.RecordSource = sql
adodcDatos.Refresh

con este codigo lo que hago es que me presente un registro en blanco para insertar uno nuevo.
en el boton que tengo para guardar tengo el siguiente codigo:

adodcDatos.Recordset.AddNew

sql = "SELECT * FROM SINIESTROS_RRGG WHERE NUMSTRORRGG='" & num & "'"

'num es el ultimo numero de siniestro insertado

adodcDatos.CommandType = adCmdText
adodcDatos.RecordSource = sql
adodcDatos.Refresh

esto ultimo lo hago porque al hacer addNew me borra todos los datos de los campos,para que me vuelva a presentar los datos que he guardado.
El problema esta en que parece como si hiciera la consulta antes que la tabla se actualice con el registro que inserte porque no me recupera ningun dato.
Que puedo hacer para que antes de hacer la consulta le de tiempo a la tabla a actualizarse????