Visual Basic - Como Ejecuto archivo

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 4
Ha aumentado su posición en 27 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Como Ejecuto archivo

Publicado por J@m (195 intervenciones) el 28/02/2003 19:24:51
como ejecuto un archivo ya sea de Word, Excel, PowerPoint, etc.
No la aplicacion si no un documento especifico Ej: mis_notas.doc

Gracias.
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:Como Ejecuto archivo

Publicado por Danny (4 intervenciones) el 28/02/2003 20:02:02
Si aun no sabes como, envíame un e-mail. Yo te daré 3 ejemplos. Chao loco, buena suerte.
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

RE:Como Ejecuto archivo

Publicado por fernando.gomez (143 intervenciones) el 28/02/2003 20:09:33
Con shell. El estandard de una aplicacion documento / vista, segun las especificaciones de Microsoft, es que cuando pasas algun argumento al programa, este es la especificacion del archivo que se ha de cargar. Asi, supongamos que quieres abrir el archivo C:\mi_archivo.doc.

Const WINWORD = "C:\Program Files\Microsoft" & _
"Office\Office\WINWORD.exe"
Shell(WINWORD & " C:\mi_archivo.doc")

Si concatenas ambas cadenas, tienes:
C:\Program Files\Microsoft Office\Office\WINWORD.exe C:\mi_archivo.doc

Suerte.

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

RE:Como Ejecuto archivo

Publicado por Pedro (150 intervenciones) el 28/02/2003 21:10:32
En un módulo .bas declaras:

' EJECUTA CUALQUIER ARCHIVO
Public 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

y dónde te interese:

Dim Res as Long, destino$

destino = "C:\MiArchivo.doc"

RES = ShellExecute(Me.hwnd, "Open", destino, "", "", 0)

La diferencia entre Shell y ShellExecute es que a la primera le tienes que pasar forzosamente el nombre del .exe y a la segunda no (se supone que tienes el .exe en tu máquina)
Te aseguro que funciona.

Saludos.

Pedro

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