Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: wACtOr en 13 Septiembre 2006, 20:30 pm



Título: Duda sobre Open
Publicado por: wACtOr en 13 Septiembre 2006, 20:30 pm
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


Título: Re: Duda sobre Open
Publicado por: ranslsad en 13 Septiembre 2006, 21:06 pm
Hola amigo, aqui te dejo un codigo que crea el archivo de texto (.txt) y ecribe lo que quieras dentro...

Código:
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


Título: Re: Duda sobre Open
Publicado por: wACtOr en 13 Septiembre 2006, 21:39 pm
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.


Título: Re: Duda sobre Open
Publicado por: SheKeL_C$ en 13 Septiembre 2006, 22:10 pm
Citar
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.

Lo crea donde en la carpeta del VB

Para que t lo cree en la carpeta del proyecto podrias poner
Código:
Open app.path &"\Archivo.txt" For Output As #1
Print #1, "Me as escrito desde VB"
Close #1


Título: Re: Duda sobre Open
Publicado por: WarGhost en 13 Septiembre 2006, 22:14 pm
hay muchas formas de escribir un fichero.

esta forma lo que hace es crear un fichero y si existe lo remplaza:

Código:
Open "C:\txt.txt" For Binary Access Write As #1
 Put #1, , "Texto"
Close #1

para escribir al final de un fichero:

Código:
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.


Título: Re: Duda sobre Open
Publicado por: wACtOr en 13 Septiembre 2006, 22:19 pm
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??