Newsgroup: it.comp.appl.access
Titolo: Lancio di una Query in avvio del PC.

Per Scopi ludici (e di relazione) ho creato una query che su una tbl di 
un altro DB "di lavoro" (attraverso una tabella collegata) mi estrae le 
persone con compleanno quel giorno e i tre successivi (per il Week End) 
(questo e il sistema usato:
 ..
Nascita, (Left([Nascita],5)) AS Giorno 
 
WHERE ((((Left([Nascita],5)))=Left(Now(),5) Or ((Left([Nascita],5)))
=Left((Now()+1),5) Or ((Left([Nascita],5)))=Left((Now()+2),5) Or ((Left
([Nascita],5)))=Left((Now()-1),5)))
ORDER BY (Left([Nascita],5));)
Ora vorrei che questa query fosse lanciata in avvio del PC (strategia 
usata: Creato maschera su query; messa in avvio, messo il file comp.adb 
in esecuzione automatica di Windows) ora vorrei che questa 
query/maschera restasse in background e fosse visibile solo a mia 
richiesta.
Come fare?
E come relazionare questa query con OE per scrivere una email SOLO se 
l indirizzo EMAIL è tra i miei contatti?
Inviato da 
www.mynewsgate.net

 ha scritto nel messaggio
news:200501190...@mynewsgate.net...

L'unico modo è quello di non usare Access...!!
Non può lavorare in BackGround, ma solo abbassato o ridotto ad icona
nella TrayBar.
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 nella TrayBar.
Può andare bene lo stesso! come posso imporlgli di aprirsi iconizzato?
Inviato da 
www.mynewsgate.net

 wrote in message
news:200501200...@mynewsgate.net

Prova qualcosa del genere, poi adattala un pò tu alle
tue esigenze:
Private Type POINTAPI
  X As Long
  Y As Long
End Type
Private Type RECT
  Left As Long
  Top As Long
  Right As Long
  Bottom As Long
End Type
Private Type WINDOWPLACEMENT
  Length As Long
  flags As Long
  showCmd As Long
  ptMinPosition As POINTAPI
  ptMaxPosition As POINTAPI
  rcNormalPosition As RECT
End Type
Private Sub Minimizze()
Dim app_hwnd As Long
Dim wp As WINDOWPLACEMENT
    ' Find the target.
    app_hwnd = Access.hWndAccessApp
    ' Get the window's current placement information.
    wp.length = Len(wp)
    GetWindowPlacement app_hwnd, wp
    ' Set the appropriate action.
    If optPlacement(0).Value Then
        ' Minimize.
        wp.showCmd = SW_SHOWMINIMIZED
    'ElseIf optPlacement(1).Value Then
    '    ' Maximize.
    '    wp.showCmd = SW_SHOWMAXIMIZED
    'Else
    '    ' Restore.
    '    wp.showCmd = SW_SHOWNORMAL
    End If
    SetWindowPlacement app_hwnd, wp
End Sub
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Scusa il codice che hai indicato a quale evento è da associare ?
(per ora l'unico uso di codice che ho provato è associandolo ad un evento di 
una maschera) oppure esiste un sistema per inserire del codice come "inizio" 
dell'aperture di un file* Access?
PS* come si può chiamare una cosa che contiene dati Query macro maschere ed 
altro "applicativo" non mi sembra correto, data base neppure....
Inviato da 
www.mynewsgate.net

 Inviato da 
www.mynewsgate.net
Io lo metterei in un modulo da richiamare subito con la
Macro AutoExec.
