Holas.
Amigos me pueden ayudar esta vez???
como puedo solucionar el problema del salto de linea
de este codigo:
Do While Not rs.EOF
' nombre de archivo
nombre_sp = rs.Fields.Item("object_name") & ".sql"
'Ejecuto sp_helptext para rescatar sp
salida = " EXEC sp_helptext " & rs.Fields.Item("object_name")
Set results = vlcnn.Execute(salida)
'guardo en archivo de salida
SalidaArchivo = results.GetString
Open "c:\Sp\" & nombre_sp For Append As #1
Print #1, SalidaArchivo
Close #1
loop
esto funciona perfecto salvo que en el archivo queda
con una linea en blanco por el salto de linea me parece que puede ser???
slds
amigos este es el problema quien me puede ayudar
http://dl.dropbox.com/u/41930610/Dibujo.JPG