Newsgroup: it.comp.appl.access
Titolo: Gestire l'assistente come interfaccia utente al posto dei msgBox

Cari ragazzi, graziea voi innanzitutto e alle 2/300.000 spese piu' o meno
bene sono riuscito a creare un
Db veramente fantastico, non solo in termini di utilita' ma anche a livello
grafico.
Essendo vagamente disgustato dalle msgBox di Access un giorno mi imbatto in
un capitoletto che spiega
(male) come utilizzare l'assistente di Office (clip) come interfaccia
utente.Non è il massimo ma almeno è
piu' simpatico di quelle msgBox orribili.
Sono arrivato a gestire negli eventi IF l'attivazione delll'Assistente e dei
relativi Ballon (i messaggini di testo)
Non riesco pero' a fare in modo che l'assistente quando si apre si posizioni
in alto a sinistra, tanto per fare
un esempio, dell'oggetto (maschera,Bottone,ecc)
Qualcuno di voi si è mai cimentato con l'assistente come interfaccia??
IO uso questo codice:
Me.Attach.Enabled = True
    If IsNull(Me.TO) Or Me.TO = "" Then
          With Application.Assistant
               .On = True
               .Visible = True
               End With
    Dim balBalloon As Balloon
    Dim strMessage As String
    strMessage = "Hai dimenticato di inserire l'indirizzo E-mail del
cliente!!"
    With Application.Assistant
        Set balBalloon = .NewBalloon
        End With
        With balBalloon
            .Text = strMessage
            .Show
         End With
        End If
ma non riesco a gestire il posizionamento.
Grazie a chi sa darmi qualche suggerimento...e sempre complimenti.
Eddie

 Essendo vagamente disgustato dalle msgBox di Access un giorno mi
imbatto...
[CUT]
Perché non adoperi, al posto delle "disgustose" msgBox o della finestra
dell'assistente, le maschere popup a scelta obbligatoria, con lo stile bordo
dialogo e te le piazzi dove ti pare?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Ed ecco che il grande Roberto riesce sempre a darmi  un'idea...non ci avevo
assolutamente pensato.
Ci posso mettere quello che voglio, le faccio nello stile del Db, e
sopratutto le metto dove voglio....
....mi ero fatto prendere  da un esempio riportato nel " Office 2000 manuale
dellla programmazione
VBA" e devo dire la cosa mi aveva intrigato non poco...e poi per ogni
ostacolo in piu' impari qualcosa di diverso.
La tua soluzione č decisamente piu' semplice...ma giusto per
curiosita'......tu lo sai fare quello che ho chiesto???
Grazie ancora Rob...e cosa posso dire....quando ci sara' il raduno degli
accessisti mi sa che qualche bottiglia di
Champagne mi tocca portarla..:-)
Ciao
Eddie


 assolutamente pensato.
[CUT]


 Eddie
Scusate se mi intrometto...
su apertura della maschera potresti inserire questo codice:
Dim risp
risp = apisndPlaySound("C:\WINDOWS\MEDIA\DING.WAV", 2)
dopo aver inserito in un modulo
Declare Function apisndPlaySound Lib "winmm" Alias "sndPlaySoundA" _
   (ByVal fnome As String, ByVal sndasync As Long) As Long
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 Eddie
--


 Ricorda, ogni promessa è un debito.
Sono per metà Sardo e per l'altra Marchigiano...una promessa per me è peggio
di un contratto scritto  :-))


    (ByVal fnome As String, ByVal sndasync As Long) As Long
Ma che dici Silvio, non era mica un dialogo a due...grazie del
suggerimento...ma non capisco una cosa ..non devi effettuare la chiamata al
modulo???
Grazie e ciao
Eddie


 modulo?
in che senso?
Quando hai una funzione in un modulo, la usi come se fosse una funzione di
Access, non hai la necessità di specificare il modulo di appartenenza.
