¿que estoy haciendo mal?
Publicado por miau (2 intervenciones) el 31/08/2004 19:29:41
estoy haciendo una pequeña aplicacion que sirve como menu para abrir archivos .doc y .ppt/pps, pero al hacer funcionar me da el error que no encuentra la ruta. Que estoy haciendo mal???
Private Sub Comando30_Click()
On Error GoTo Err_Comando30_Click
Dim stAppName As String
stAppName = "Powerpnt.exe G:\pro\ejemplo.pps"
Call Shell(stAppName, 1)
Exit_Comando30_Click:
Exit Sub
Err_Comando30_Click:
MsgBox Err.Description
Resume Exit_Comando30_Click
End Sub
gracias
Private Sub Comando30_Click()
On Error GoTo Err_Comando30_Click
Dim stAppName As String
stAppName = "Powerpnt.exe G:\pro\ejemplo.pps"
Call Shell(stAppName, 1)
Exit_Comando30_Click:
Exit Sub
Err_Comando30_Click:
MsgBox Err.Description
Resume Exit_Comando30_Click
End Sub
gracias
Valora esta pregunta


0