Visual Basic - Quiero trabajar con 2 archivos de texto

Lo que pasa es que cierta informacion que saco de un recordset la quiero meter en 2 archivos de text es decir uno de encabezado y otro de movimientos, pero necesito estar trabajando con los 2 abiertos al mismo tiempo ya que saco el encabezado y lo inserto en el preimer archivo de text y si tiene movimientos los quiero grabar en el segundo archivo de texto...

de antemano muchas gracias....

Puedes usar lo siguiente

Dim intArchivo1 As Integer
Dim intArchivo2 As Integer

intArchivo1 = FreeFile
intArchivo2 = intArchivo2 + 1

De esta manera obtienes los dos "handles" para los archivos y los abres asi

Open "PrimerArchivo" for Output As #intArchivo1
Open "SegundoArchivo" For Output As #intArchivo2

Para escribir en un archivo usas Print #intArchivo, strLinea

y los cierras asi Close(intArchivo)

Otra alternativa es usar el FileSystemObject

Saludos