weno pos estoy haciendo unos ejercicios y uno de ellos se trata de meter un texto en un documento de texto que la funcion Open debe de crear.
yo hago lo siguiente:
Open ("archivo.txt") For Output As #1
Print #1, "Me as escrito desde VB"
Close #1
pero no se por que no me crea el archivo , o por lo menos en la carpeta del proyecto no esta.
Que hago masl??
aver si me ayudais
THXs
EDIT:
_________________________________________
Weno me acabo de dar cuanta de una cosa.
Si que crea el archivo, pero en vez de crearlo en la carpeta del proyecto me lo crea en:
C:\Archivos de programa\Microsoft Visual Studio\VB98
Por que lo crea hay en vez de en la carpeta del proyecto?
o en su defecto como puedo poner una ruta para qu elo cree ay ?
THXAS
Hola amigo, aqui te dejo un codigo que crea el archivo de texto (.txt) y ecribe lo que quieras dentro...
Dim fso, tf
Set fso = CreateObject("Scripting.FileSystemObject")
Set tf = fso.CreateTextFile("c:\Pkn.txt", True)
'Escribir una línea con un carácter nueva línea.
tf.WriteLine("hola holita!!!")
' Escribir tres caracteres de nueva línea al archivo.
tf.WriteBlankLines(3)
' Escribir una línea.
tf.Write ("Esto es una prueba.")
tf.Close
Espero que te sirva...
Salu2
Ranslsad
weno yo no pedia una segunda opccion para cerlo, aunque gracias de todas formas.
toy aprendiendo VB y es bueno conocer mas formas de hacerlo, pero yo aora mismo queiro saber por que me crea el archivo en esa carpeta y no en la del proyecto.
Gracias de todas formas, abia leido esa opcion en el manual pero de momento no la explicaban, primer explicaban la opcion Openm que es la que queiro aprender a usar ya que estoy un poco colgado, ya que despues ese archivo lo tengo que enviar a un ftp y no me lo manda.
Citartoy aprendiendo VB y es bueno conocer mas formas de hacerlo, pero yo aora mismo queiro saber por que me crea el archivo en esa carpeta y no en la del proyecto.
Lo crea donde en la carpeta del VB
Para que t lo cree en la carpeta del proyecto podrias poner
Open app.path &"\Archivo.txt" For Output As #1
Print #1, "Me as escrito desde VB"
Close #1
hay muchas formas de escribir un fichero.
esta forma lo que hace es crear un fichero y si existe lo remplaza:
Open "C:\txt.txt" For Binary Access Write As #1
Put #1, , "Texto"
Close #1
para escribir al final de un fichero:
Open "C:\txt.txt"For Append As #1
Print #1, "Texto"
Close #1
Hay mas formas de abrir un fichero solo es cuestion de buscar.
yo lo que buscaba era la respuesta de SheKel_C$
Gracias, eso me a ayudado muxo.
tambien gracias a wargosth por mostrarme mas opciones sobr eel comando Open.
La informacion es poder:
gracias a todos por contestar.
Aora tengo otra duda al enviar el archivo al ftp.
uso este comando:
Inet1.Execute "ftp://usuario:pass@ftp.usuarios.lycos.es", "PUT app.path & prueba.txt" & Winsock1.LocalHostName & ".txt"
con esto lo que deberia acer(creo) es conectarse al ftp,(en eso no ay problema ya que no me aparece ningun error) y subir el archivo prueba.txt renombrado al nombre del pc.
pero no lo sube, y no se lo que ago mal.
a tambien me e dado cuenta que en : C:\Pruebas VB\
me a creado un archivo llamado proyecto1prueba.txt.
proyecto1 es una carpeta en la que tengo metido el programa que trato de acer.
que ago mal para que me cree ese archivo y no lo suba al ftp??