pra vc acumular as informações, faz assim:
rsAutos("historico") = rsAutos("historico") & Trim(...
pra incluir uma quebra de linha entre os registros, eu faria assim:
rsAutos("historico") = rsAutos("historico") & vbcrlf & Trim(...
mas tem outras formas... assim eu acho mais comodo...
Flw!