Newsgroup: it.comp.appl.access
Titolo: Visualizzare da form cartella e stampare il contenuto.

Ciao a tutti sono Dino.
Come avete potuto gia' leggere dall'oggetto avrei questa necessita',
Associata ad  un determinato campo (Es codice articolo) dovrei
direttamente da form potere svolgere due operazioni :
Aprile relativa cartella associata a quel prodotto.
Stampare contenuto cartella associata quel prodotto.
Ho gia' guardato sul sito comune ma non ho trovato entrambe le
soluzioni
Garazie in anticipo e buon 2008.
Saluti Dino.

 Stampare contenuto cartella associata quel prodotto.
se sono documenti office si può fare


Grazie Silver per la risposta.
Per quanto riguarda i file da stampare sono per lo piu' immagini in
JPG.
si puo' fare lo stesso???
Ciao e grazie ancora.
Saluti Dino

 si puo' fare lo stesso???
dipende dal programma con cui lo apri; per comodità io, invece che scriv 
ere righe di codice per riuscire a farlo con office, cercherei un 
programma free per gestione immagini che permetta di stampare da riga di 
comando. In questo modo userei solo la funzione executefile richiamando 
la stampa


Ciao Silver sono Dino
ho dato una sbirciata al link che mi hai fornito.
Di seguito di riporto le funzioni (che da quanto ho visto) per
realizzare il tutto.:
Public Function FillListFiles(ctl As Access.ListBox, Startpath As
string)
    Dim MyPath As String
    Dim MyName As String
    ctl .RowSource = ""
    MyPath = Startpath
    MyName = Dir(MyPath)
    Do While MyName <> ""
        With ctl
            .RowSource = .RowSource & MyName & ";"
        End With
        MyName = Dir
    Loop
    ctl.RowSource = Left(ctl.RowSource, Len(ctl.RowSource) - 1)
End Function
Per lanciarli su Evento DBL_CLICK:
Chiama la funzione sotto passando il contenuto della ListBox.
Public Sub ExecuteFile(FilePath As String)
    'Esegue file
    On Error GoTo error
    Dim ret As Integer
    ret = Shell("rundll32.exe url.dll,FileProtocolHandler " &
(FilePath))
    Exit Sub
error:
    MsgBox Err.Description, vbExclamation, "Error"
End Sub
Public Function FillListFiles(ctl As Access.ListBox, Startpath As
string)
    Dim MyPath As String
    Dim MyName As String
    ctl .RowSource = ""
    MyPath = Startpath
    MyName = Dir(MyPath)
    Do While MyName <> ""
        With ctl
            .RowSource = .RowSource & MyName & ";"
        End With
        MyName = Dir
    Loop
    ctl.RowSource = Left(ctl.RowSource, Len(ctl.RowSource) - 1)
End Function
Per lanciarli su Evento DBL_CLICK:
Chiama la funzione sotto passando il contenuto della ListBox.
Public Sub ExecuteFile(FilePath As String)
    'Esegue file
    On Error GoTo error
    Dim ret As Integer
    ret = Shell("rundll32.exe url.dll,FileProtocolHandler " &
(FilePath))
    Exit Sub
error:
    MsgBox Err.Description, vbExclamation, "Error"
End Sub
Private Sub Form_Load()
         Call FillListFiles(Me!Elenco0, "C:\Documenti\")
End Sub
Quello che non vedo e' il riferimento ad un campo ben preciso(forse
sbaglio).
Esempio se il campo articolo ha valore 10 il path deve essere uno
mentre se l'articolo e' 12 il path deve essere un altro.
Non so' se sono stato chiaro.Forse ho interpretato male il codice??
poi l'eseguibile del sw per la gestione delle immagini ha che punto
del codice lo devo inserire?
Ciao grazie in anticipo e scusa le domande probabilmente banali.
Saluti Dino

 Ciao grazie in anticipo e scusa le domande probabilmente banali.
L'importante č sapere cosa uno sta facendo e anche se cosě non fosse il 
web abbonda di informazioni (oltre alla guida in linea)