elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Como proteger una cartera - billetera de Bitcoin


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Duda sobre Open
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Duda sobre Open  (Leído 1,936 veces)
wACtOr


Desconectado Desconectado

Mensajes: 461


Premio finalista diseño web elhacker.net


Ver Perfil
Duda sobre Open
« 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


« Última modificación: 13 Septiembre 2006, 20:39 pm por wACtOr » En línea

ranslsad


Desconectado Desconectado

Mensajes: 492


Dim Ranslsad as String * :P - Que Vicio!


Ver Perfil WWW
Re: Duda sobre Open
« Respuesta #1 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


En línea

wACtOr


Desconectado Desconectado

Mensajes: 461


Premio finalista diseño web elhacker.net


Ver Perfil
Re: Duda sobre Open
« Respuesta #2 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.
En línea

SheKeL_C$


Desconectado Desconectado

Mensajes: 549


_-=[Sh3K3L_C$]=-_


Ver Perfil
Re: Duda sobre Open
« Respuesta #3 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
En línea

WarGhost
I love basket


Desconectado Desconectado

Mensajes: 1.070



Ver Perfil WWW
Re: Duda sobre Open
« Respuesta #4 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.
En línea

wACtOr


Desconectado Desconectado

Mensajes: 461


Premio finalista diseño web elhacker.net


Ver Perfil
Re: Duda sobre Open
« Respuesta #5 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 "http://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??
« Última modificación: 13 Septiembre 2006, 22:29 pm por wACtOr » En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Duda redes open « 1 2 »
Hacking Wireless
miguelez 11 6,654 Último mensaje 18 Marzo 2013, 15:28 pm
por nestorv04
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines