hacker


Ingresar con nombre de usuario, contraseña y duración de la sesión
| Portal Hacker | Editorial | Descargas | Ezine |
Inicio Ayuda Ingresar Registrarse
06 de ſeptiembre de 2008, 03:07:41
Noticias: Convocatoria E-zine CPH #2
Para ver este enlace Registrate o Inicia Sesion
> Aquí

+  Foros pOrtal Hacker
|-+  Programacion
| |-+  Programación en general
| | |-+  Visual Basic (Moderadores: ranefi, crypto136, ziBboh, >> s E t H <<)
| | | |-+  Una ayuda XD crear un archivo desde visual basic
0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: [1] Ir Abajo Imprimir
Autor Tema: Una ayuda XD crear un archivo desde visual basic  (Leído 1320 veces)
chipbios
Colaborador
****
Desconectado Desconectado

Mensajes: 1,382

F.o.S TeaM


Ver Perfil
« : 24 de Junio de 2006, 01:18:22 »

Como puedo crear  un archivo(que no sea temporal) de la extension que yo quiera desde visual basic ?¿
En línea


Para ver este enlace Registrate o Inicia Sesion

ranefi
Moderador Global
*****
Desconectado Desconectado

Mensajes: 1,193


SELECT * FROM guapos WHERE papito_chulo = 'ranefi'


Ver Perfil WWW
« Respuesta #1 : 24 de Junio de 2006, 07:21:41 »

Como puedo crear  un archivo(que no sea temporal) de la extension que yo quiera desde visual basic ?¿

Hola chipbios, buen día. Sabes, te faltó buscar un poco más.


Para ver este enlace Registrate o Inicia Sesion
Crear archivo aleatorio


Puedes cambiar a ranefi.txt por el nombre y estensión que desees. Nos vemos.
En línea


SELECT * FROM mejores_batos_ del_mundo WHERE id = (SELECT DISTINCT id_guapo FROM los_mas_guapos _del_mundo WHERE papito_chulo = 'ranefi')
chipbios
Colaborador
****
Desconectado Desconectado

Mensajes: 1,382

F.o.S TeaM


Ver Perfil
« Respuesta #2 : 24 de Junio de 2006, 07:27:56 »

muxas gracias con esto mi proyecto sera culminado muhajajajaja pero como hago para editar el contenidoporqu e pone que puedeo hacerlo pero no veo lo del text box por ningun lado

Código:
Private Sub Command1_Click()
            Dim Archivo As String
            Dim NumArchivo As Long
           
            Archivo = App.Path & "\ranefi.txt"
            NumArchivo = FreeFile()
           
            Open Archivo For Output As #NumArchivo
                        Print #NumArchivo, Text1.Text
            Close #NumArchivo
End Sub
« Última modificación: 24 de Junio de 2006, 07:29:35 por chipbios » En línea


Para ver este enlace Registrate o Inicia Sesion

Yngwie Maty
NZ2
**
Desconectado Desconectado

Mensajes: 267


La guitarra,causa y solución a todos mis problema


Ver Perfil WWW
« Respuesta #3 : 24 de Junio de 2006, 08:54:28 »

Código:
Open c:\miarchivo.txt for append as #1
Print #1, "mira estoi sobreescribiendome :)"
Print #1, Text1.Text
close #1
salu2
En línea


Para ver este enlace Registrate o Inicia Sesion
Páginas: [1] Ir Arriba Imprimir 
« anterior próximo »
Ir a:  


Ingresar con nombre de usuario, contraseña y duración de la sesión

Powered by SMF 1.1.5 | SMF © 2006-2008, Simple Machines LLC hacker

Juegos gratis - Articulos PHP - Juegos - Trucos - Letras - Juegos - Juegos Online