tu sql segunda
Anexos
Cita: strSql="select filename, description1, filesize from anexo_memoria"
tendría que llevar un where
Cita: strSql="select filename, description1, filesize from anexo_memoria where id_tabla1 = " & mAdo("Id")
dado que no le indicas cuales anexos mostrar
tienes que tener un campo para hacer la unión de ambas tablas y ese colocar en el where
suerte