Instruccion Shell

Nacho
19 de Diciembre del 2003
Necesito saber como puedo hacer para que cuando pulse un commandbutton, me aparezca un bloc de notas con los datos que habia guardado previamente.
Lo unico que he conseguido es abrir un bloc de notas desde Viusal pero vacio sin los datos que yo quiero:
shell ( "C:\windows\notepad.exe")
lo que quiero es que me habra un bloc de notas concreto C:\nachodatos.txt
Gracias

Domingo
19 de Diciembre del 2003
Hola a ver aqui tienes el shellexecute con el cual dandole la ruta de un archivo sea cual sea su extension (.exe, .txt,.doc,etc..) lo abrira.

Copia esto en el codigo en "General"

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

Aqui va el codigo del boton

Private Sub Command1_Click()
Dim res As String

Res = ShellExecute(Me.hwnd, "Open", ruta_del_archivo, " ", " ", 1)

' en tu caso seria asi
'Res = ShellExecute(Me.hwnd, "Open", "C:\nachodatos.txt", " ", " ", 1)

End sub


Espero haberte sido de ayuda


Suerte y saludos.

Nacho
19 de Diciembre del 2003
Muchas gracias ya lo he probado y funciona perfectamente.

Saludos y Felices Fiestas