Hola, dices que tienes un datagrid que muestra los datos de una tabla ,ahora :
1. Si solamente lo usas para hacer una consulta es decir no modificas ningun valor, creo que puedes llenar dicha tabla haciendo un insert de todos sus valores, o caso contrario prueba lo siguiente:
declaras variables string y de recordset.
sql= " select * from tabla"
rsaux.open sql,cnx,.....
, esto para tus datos origen , luego :
sql1= " select * from tabla1"
rsaux1.open sql1,cnx,.....
while not rsaux.EOF
rsaux1.additem
rsaux1(0)=rsaux(0)
rsaux1(0)=rsaux(0)
rsaux1(0)=rsaux(0)
wend