Visual Basic - Llamar un archivo desde VB

Life is soft - evento anual de software empresarial
 
Vista:

Llamar un archivo desde VB

Publicado por Rafael García (1 intervención) el 10/05/2002 03:16:30
Hola a todos estoy creando una form muy simple, donde coloque un objeto IMAGE, que contiene una Imagen que simula un botón, la cuestión es que al hacer clic sobre esta imagen, se llame un archivo como si realizaramos un doble clic desde el explorador, para que este llame a su vez a la aplicación que le corresponde y se ejecute.

Coloque este código, utilizado para llamar aplicaciones, pero con un archivo AVI causa error.

Private Sub Image1_Click()

Dim stAppName As String
stAppName = "C:\Pelicula.avi"

Call Shell(stAppName, 0)

End Sub

Podrian decirme cual es el error o que otro metodo puedo usar para realizar esto.

Gracias anticipadas.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Llamar un archivo desde VB

Publicado por david (22 intervenciones) el 10/05/2002 13:46:09
Esto lo he sacado de la pagina del guille(http://guille.costasol.net/indice.asp):

'12.- Ejecutar cualquier archivo, incluso accesos
'directos (LNK) (13/Mar)

'Esta pregunta me había surgido antes y no encontraba
'la "puñetera" respuesta. Probé con el Explorer.exe,
'al estilo del truco anterior, pero nada...
'De estas cosas que miras la ayuda y "de casualidad"
'lees que con start se pueden ejecutar aplicaciones
'desde la línea de comando... y si se pueden ejecutar
'aplicaciones... ¿se podrán ejecutar accesos directos?
'PUES SI !
'Y no sólo accesos directos, sino TODO lo que le eches:
'archivos de cualquier extensión; el START se encarga
'de llamar a la aplicación correspondiente... lo que
'uno se ha complicado haciendo DDE y todo el rollo
'para esta tarea tan fácil!

'¿Cómo se hace?

Private Sub Form_Load()

Dim ret As Long
puedes poner la ruta o
'ret=shell("c:\windows\notepad.exe")
'Si Quieres que no se muestre la ventana:
ret = Shell(start & "notepad.exe", 6)
'sFile será "lo que queramos" ejecutar. CUALQUIER COSA!

End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar