Newsgroup: it.comp.appl.access
Titolo: visualizzare una barra di avanzamento mentre è attivo un altro processo

mi spiego meglio, da access in vba lancio delle procedure che vanno in
windows zippano un file e lo mandano per posta
oppure altre procedure vanno nella posta elettronica cercano dei messaggi in
posta in arrivo e ne prelevano gli
allegati
secondo voi riesco a visualizzare in access una barra di avanzamento che mi
rappresenta la percentuale di processo già eseguita?
la procedura è la seguente ----------------------
'dichiarazioni
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess
As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle
As Long, ByVal dwMilliseconds As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long)
As Long
Private Const SYNCHRONIZE = &H100000
Private Const INFINITE = &HFFFF
Public Sub RunAppAndWait(FileName As String, WindowsStyle As Integer)
   'Autore: AntoGal
   'avvia un'applicazione e sospende il thread chiamante finchè
   'il processo non termina
   'Accetta:
   ' FileName = nome del file eseguibile
   ' WindowsStyle = modalità di visualizzazione finestra
   ' (costante di Access, vedi la funzione Shell)
   Dim hProg As Long
   hProg = Shell(FileName, WindowsStyle)
   If hProg Then WaitOnProgram (hProg) 'chiama solo se tutto ok
End Sub
Private Sub WaitOnProgram(idProg As Long)
   'codice valido solo per Win32
   Dim hProc As Long, iret As Long
   hProc = OpenProcess(SYNCHRONIZE, False, idProg)
   If hProc <> vbNull Then
      iret = WaitForSingleObject(hProc, INFINITE)
      CloseHandle hProc
   End If
End Sub

 ha scritto nel messaggio
news:c5e5tv$4mc$1...@lacerta.tiscalinet.it...

La funzione da te inserita pe l'esecuzione di un Programma esterno con
sospensione
di Access andrebbe verificata come funzionamento su differenti tipi di File.
Io la usavo ma funzionava solo con file di Office, se gestivo file AutoCad o
PDF
no.
A prescindere da questo la tua domanda è un pò assurda.
Se stai gestendo un Processoo esterno(Indipendente) con SOSPENSIONE del
codice
di Access come potresti gestire una ProgressBar da Access che non
gira...??????
Ciao.
@Alex.


hai proprio ragione solo che siiccome il access se ne và in windows zippa un
file e lo manda per posta e poi ritorna, volevo che l'utente potesse vedere
un qualcosa del tipo "barra di avanzamento" per fargli capire se andare a
cena o stare li ad aspettare e non fargli fare un salto nel vuoto....


ciao simba! Scusa ma dalla mia poca esperienza non riesco a darti un
consiglio x il tuo problema, in compenso sfrutto la tua per chiederti come
fai a far prelevare gli allegati dalla posta in arrivo ...
Se tu potessi indicarmi qualcosa su cui lavorare mi aiuteresti a risolvere
un bel problema!
buona pasqua sebbene in netto ritardo.


faccio una cosa migliore, sviluppo un piccolo db e lo invio sul sito comune
cosi lo potete usare tutti.
ciao.


ho spedito ora l'esempio sul sito comune ora tutto dipende dalla velocità
con cui il webmaster lo meterrà a disposizione. ciao.

...

se me lo puoi mandare qui ... mi tiro un po' avanti .. non so se ci
vuole poco tempo x il sitocomune.
in...@lacollina.net

 
in...@lacollina.net
mandato ciao

 ha scritto nel messaggio
news:c5gmhg$rbo$1...@lacerta.tiscalinet.it...

da errore a te non capita?


a me no