Visual Basic - EJECUTABLE...

Life is soft - evento anual de software empresarial
   
Vista:

EJECUTABLE...

Publicado por me (1 intervención) el 17/12/2007 20:22:00
Hola que tal tengo una pregunta, cual es la intruccion para ejecutar un programa externo en visual basic. es decir por ejemplo si quiero ejecutar la calculadora de windows.

O por decir quier abrir word, pero con el parametro de que abra un archivo determinado de word.

1000 gracias. de antemano les agradesco por su atencion, y ojala me puedan ayudar =)
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:EJECUTABLE...

Publicado por gustavo (218 intervenciones) el 17/12/2007 21:00:34
para abrir un programa shell, pero para word o excel es diferente ejemplo
Dim oex As Object
Dim obook As Object
Dim osheet As Object
Dim a As Integer, x As Integer
Dim i As Long
obook.Application.DisplayAlerts = False
Set oex = CreateObject("excel.application")
Set obook = oex.Workbooks.Add(App.Path & "informe.xls")
obook.Worksheets(1).Select
oex.Visible = True

Set osheet = obook.Worksheets(1)


Set oex = Nothing
Set obook = Nothing
Set osheet = Nothing
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:EJECUTABLE...

Publicado por nesti (29 intervenciones) el 17/12/2007 23:44:18
Inserta esto en declaraciones generales del formulario

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

inserta esto en un command

Private Sub Command1_Click()
stArchivo = "C:informe.doc" ' Según la ruta y nombre de tu archivo.
Call ShellExecute(Me.hwnd, vbNullString, stArchivo, vbNullString, App.Path, 3)

End Sub

Adaptalo atus necesidades.
puedes abrir cualquier archivo, colocando el nombre y la extension.

Puedes poner la ruta directa o el App.Path

Espero te sirva,
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