Nuevas NORMAS para el foro

Curso Hacker
Bienvenido(a), Visitante. Favor de ingresar o registrarse.
¿Perdiste tu email de activación? - Julio 09, 2008, 05:27:43
Boton Buscar
Inicio Ayuda Ingresar Registrarse
Visita: Articulos - Juegos Gratis - Da Foros

Comunidad Underground Hispana  |  Programacion  |  Programación  |  Visual Basic y Net (Moderador: ANYD00M)  |  Tema: Como crear un "Abrir Archivo"?? 0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: [1] Ir Abajo Imprimir
Autor Tema: Como crear un "Abrir Archivo"??  (Leído 379 veces)
..::Zodiac::..
Habitual
*****
Desconectado Desconectado

Mensajes: 354


Hacking Departament


Ver Perfil WWW
« en: Agosto 27, 2005, 10:40:12 »
la verdad de las cosas me gustaria saber como crear un "abrir archivo".

se utiliza algun api del windows?

por lo menos por el form lo quiero hacer, me refiero a q tengo el form y le agrego un dirbox, 2 botones de comando, un textbox, combobox, y otro mas para hacerlo, por favor necesito ayuda!!!
En línea
..::Zodiac::..
Habitual
*****
Desconectado Desconectado

Mensajes: 354


Hacking Departament


Ver Perfil WWW
« Respuesta #1 en: Agosto 28, 2005, 11:34:56 »
ya descubri como hacerlo!!!
En línea
Gabhardy
Habitual
*****
Desconectado Desconectado

Mensajes: 151


GaBhArDy, UnA LuChA pOr El TiTuLo


Ver Perfil Email
« Respuesta #2 en: Agosto 29, 2005, 09:54:41 »
Entons ayuda a los que no entendemos
uy dinos el codigo
En línea
Modus
Visitante
« Respuesta #3 en: Agosto 30, 2005, 05:42:37 »
Si por favor dinos el codigo a lo mejor me sirve para mi program
En línea
[LHwZ]
Miembro
*****
Desconectado Desconectado

Mensajes: 37



Ver Perfil
« Respuesta #4 en: Agosto 31, 2005, 08:28:07 »
Yo les explico:
-crean un commondialog y 2 commandbuttom (suficiente, si kieren le ponen un label, ya van a ver para que  Wink)
-el CB1 es el que ejecuta, y el CB2 es el que busca el archivo.
- el codigo va asi
Citar
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Command1_Click() 'Boton ejecutar
 Dim res As Long
 res = ShellExecute(Me.hwnd, "Open", Label1.Caption, "", "", 1)
End Sub

Private Sub Command2_Click() 'Boton examinar
    Command1.Enabled = False
    Label1.Caption = ""
    CommonD.DialogTitle = "Buscar archivo..."
    CommonD.FileName = ""
    CommonD.Filter = "Todos los archivos|*.*"
    CommonD.ShowOpen
    If CommonD.FileName <> "" Then
     Label1.Caption = CommonD.FileName
     Command1.Enabled = True
    End If
End Sub
En línea
Prosutch
Visitante
« Respuesta #5 en: Agosto 31, 2005, 10:49:35 »
Ja ja ja, ese ejemplo lo he visto en un libro de VB 3.0.
  Wink
En línea
Sh4k4
Colaborador
*****
Desconectado Desconectado

Mensajes: 552


SHAKA


Ver Perfil WWW
« Respuesta #6 en: ſeptiembre 01, 2005, 07:59:24 »
el comondialog es una ocx! y como toda ocx es dependiente de tu EXE o programa asi que recomiendan y yo tambien que busquen el code del modulo de clase que sustituye el comandialog asi su programa vive sin la ocx y se vuelve independiente! suerrt! chiao!
En línea
Arayashiki
Páginas: [1] Ir Arriba Imprimir 
Comunidad Underground Hispana  |  Programacion  |  Programación  |  Visual Basic y Net (Moderador: ANYD00M)  |  Tema: Como crear un "Abrir Archivo"?? « anterior próximo »
Ir a:  


Ranking-Hits
Powered by SMF 1.1.5 | SMF © 2006-2007, Simple Machines LLC