Visual Basic - Envio de Archivo Plano

Ojala alguien me pueda ayudar con el siguiente problema:
Estoy creando un archivo plano con una informacion X, no tengo problemas para crear el archivo, pero al momento de ejecutar .bat con el comando Shell, lo que hace es enviarme el archivo plano pero sin la información adentro...
Alguien me puede ayudar???. la programacion que tengo es la siguiente.

cadenacorreo = Trim("D:\Ingreso_Tickets\Versiones_Prueba\mail")
archivocorreo = FreeFile
Open cadenacorreo For Output As archivocorreo
union1 = union1 & Format(txtcorreo.Text)
Print #archivocorreo, union1
Close archivoscorreo
MsgBox "Cambio el Correo", 64, "AVISO"
Shell "D:\Ingreso_Tickets\Versiones_Prueba\envio_correo.bat", 0

el archivo mail es el que envia sin informacion
Gracias...

Probaste enviando otro archivo de texto cualquiera

Xaus....

Claro, con un archivo que esta creado por fuera del programa, lo envia completo, pero el archivo que estoy creando yo no..
tu sabrías como hacerlo...

se me ocurre otra cosa, como puedo al momento de ingresar un dato enn una text dejar eso en un archivo.....?

gracias.....

Print #archivocorreo, union1
Close archivoscorreo
en el close no tenes una s de mas o lo pusiste mal aca
y el archivo mail, lo llamas solo mail o mail.txt
fijate en el bat que estas mandando porque serian dos archivos distintos para la maquina
suerte

Lo tengo todo bien, lo ke pasa incluso es hasta me envia el archivo pero no la informacion que lleva dentro, puede ser que lo este enviando antes de cerrarlo?, lo estoy haciendo en el evento click de un boton

Atte.,
Israel Riveros.