Newsgroup: it.comp.appl.access
Titolo: Lanciare file esterno da maschera

Ho una maschera continua con le caselle di testo percorso e descrizione.
In percorso ci sono memorizzati percorsi assoluti di files.
E' possibile creare un comando che lanci il file (record) attualmente 
selezionato, aprendo l'applicazione associata?
Ciao e grazie,
D�vide 

D�vide ha scritto:

Ovvio:
Dim MyShell As Object
Set MyShell = CreateObject("WScript.Shell")
MyShell.Run Chr(34) & Me.TuoPercorsoFileCompletoDiFile & Chr(34)
-- 
Ciao
Pablitomf
----------------------------
http://www.accessgroup.it/
----------------------------
Non mi fido molto delle statistiche, perch� un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Dàvide
Credo basti rendere il campo collegamewnto ipertestuale e cliccarci
poi sopra...
F.


ShellExecute 
http://www.mvps.org/access/api/api0018.htm
o
<F1> FollowHyperlink
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 ha scritto nel messaggio 
news:4a0402c6$0$6828$5fc...@news.tiscali.it...

Gi� trattato in altro post....
Puoi usare tutti i suggerimenti che ti hanno postato sopra...ed anche solo..
Shell ("[percorso come stringa]", vbNormalFocus)
Ciao
-- 
Roberto da Parma 

 Shell ("[percorso come stringa]", vbNormalFocus)
Ma solo se il file � un exe.
-- 
cu


 ha scritto nel messaggio 
news:76j4ksF...@mid.individual.net...

No Karl, mi risulta funzioni anche con .doc .xls ....ecc...


 Roberto da Parma
-- 
Ciao
Geppo 

 shell(c:\...\windord.exe.... ecc

 No Karl, mi risulta funzioni anche con .doc .xls ....ecc...
Beato te. ;-)
A me non ï¿œ mai riuscito.


 ShellExecute 
http://www.mvps.org/access/api/api0018.htm
Da perfetto ignorante (io faccio il ragioniere, nemmeno programmatore...) la 
soluzione di Pablitomf l'ho capita, ma va in debug se il file � stato 
rinominato o spostato rispetto al percorso che c'� indicato nel record.
Questa funzione fHandleFile mi sembra invece pi� completa (files non 
associati, spariti, spostati, ecc.), ma non so farla funzionare!
Ho copiato il codice di Dev Ashish da "Private Declare Function" a "End 
Function" in Modulo1 del mio db.
Ora, nella maschera continua MFile, ogni record ha il campo Percorso. Su 
doppio click in tale campo dovrei far partire la funzione per il percorso 
assoluto del file indicato in quel record. Come?
Di nuovo grazie a tutti e ciao. 


Nella procedura evento di doppio click chiama la funzione con
fHandleFile Me!Percorso, 1
Se non sai come creare una procedura evento leggi:
http://groups.google.com/group/it.comp.appl.access/msg/b8087a0bc01eab46


Karl Donaubauer wrote:

Certo oltre a chiamare la funzione e lasciare la funzione mostrare
il suo messaggio di errore, puoi anche gestire il valore che ï¿œ ritornato
dalla funzione. p.e.
Dim varRet As Variant
varRet = fHandleFile(Me!Percorso, 1)
If varRet = -1 Then
    ' tutto a posto
Else
    ' c'era un problema
    ' e varRet contiene il tipo e messaggio del problema
    ' cosï¿œ puoi reagire qui come vuoi
End If


 End If
Perfetto! Con l'aggiunta della gestione del valore si pu� mandare un 
generico messaggio d'errore "File non trovato, verificare ecc. ecc.".
Altrimenti, la fHandleFile nel caso di errore si limitava a non fare nulla 
(Access 2007 su win XP).
Ciao 

 Access FAQ: 
www.donkarl.com/it
E infatti come volevasi dimostrare di devo le mie pi� sentite SCUSE!
-- 
Roberto da Parma