Simulazione lancio applicazioni Windows in Access

[silv66]

Ciao a tutti, mi sono appena registrato perchè ho dato un'occhiata e ritengo sia un forum serio e con persone competenti.
Ho un grosso problema. Ho bisogno di simulare, a partire dall'estensione, il lancio di applicazioni windows in un programma access.
Ad esempio se il file contenuto in una tabella ha estenzione xls, cliccandoci sopra depe aprirlo con excel; se invece ha estensione doc, cliccandoci sopra deve aprirlo con word.
Qualcuno può aiutarmi? Non sono espertissimo e eavrei bisogno di dettagli, grazie infinite.

[parsifal]

Devi avere il viewer access. Guarda se questo ti è utile.
parsifal

[Matty90]

quotone a parsifal!!!

[silv66]

Grazie mille. L'ho scaricato. Purtroppo non riesco a capire come farlo funzionare. Mi dai una dritta? Grazieeeeeee.....

[Matty90]

semplice....

quando apri i vari file, lui ti permette di leggere ma non di modificare!!!

[silv66]

Grazie a chi mi ha dato una mano. Ho risolto il problema, ma non con lo snapshot viewer, ma semplicemente utilizzando gli hyperlink.
Pubblico questa risposta in modo che se altri hanno il mio stesso problema, possano risoverlo.
Forse non sono stato chiaro nell'esporre il problema. Avevo bisogno di rendere accessibili, visualizzandoli, file di applicazioni varie (Excel, Word, Mediaplayer, ecc.) i cui path erano memorizzati in una tabella access. Il programma che doveva fare questo è scritto anch'esso in access. Inizialmente avevo creato una routine che, asseconda dell'estenzione, lanciava una shell con il lancio del programma relativo, ma ho avuto problemi con le versioni. Ovviamente se lanciavo la versione 6 di adobe reader su un pc, non mi funzionava con la versione 7 su un altro.
Utilizzando gli hyperlink invece ho risolto tutto. Semplicemente attraverso i comandi :
Dim ctl as variant
Set ctl = Me.Comando1
With ctl
.HyperlinkAddress = Me.NomePath
.Hyperlink.Follow
End With

ho risolto il problema. Comando1 è il pulsante sotto il quale mettere questo script; NomePath contiene il path completo del file a cui voglio accedere. Premendo il pulsante si apre il file word, excel, mp3 ecc.
Ciao a tutti.

[silv66]

Rettifico:

[silv66]

Rettifico:
è sufficiente

Dim ctl As Variant
Set ctl = Comando1
With ctl
.Hyperlink.NomePath
End With

[AirJ]

Grazie a te per averci fornito la soluzione, puo' essere di aiuto ad altri utenti.