Newsgroup: it.comp.appl.access
Titolo: Apertura db Access 2003 con Login

Buonasera Amici del NG,
ho un db di Access 2003 nel quale ho inserito una maschera (frmLogin)
che si attiva all'apertura con una macro (AutoExec); questa maschera
in pratica chiede di inserire un nome utente (che deve essere OPEN).
Vorrei ora far in modo che la barra dei menu che gestisce le varie
applicazioni sia bloccata e quindi non utilizzabile oppure sia non
visibile se prima non si immette il nome utente corretto (cosa che
invece normalmente non avviene perchè i comandi funzionano lo stesso).
Grazie molte per il prezioso aiuto
Leo

 la barra dei menu che gestisce le varie applicazioni
?
Una barra di men� che hai creato tu o la barra delle applicazioni
di Windows o ...?
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 Access FAQ:
www.donkarl.com/it
si,
è una barra di menù che ho creato io.
grazie Karl

 grazie Karl
La Classe CommandBar ha tra i suoi membri Enabled e Visible.
Ad esempio:
Dim cmdBar as CommandBar
Set cmdBar = CommandBars!TuaBarra
cmdBar.Visible=False
Ricordati che per gestire la classe CommandBar devi mettere tra i
riferimenti la libreria MSO.dll (Nel caso di AXP si tratta della
"Microsoft Office 10.0 Object Library")
Per un'ampia panoramica sulle CommandBar vedi:
http://www.accessgroup.it/HomeArgomenti.asp?ID=99&Oggetto2=Traduzioni
 : MS
Access 2000...
In particolare il Cap 1 - Barra di Comandi: Barre Menu, Barre Strumenti e
di Scelta Rapida
--
sv
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ...
In alternativa senza oggetto e cos� senza riferimento:
Application.CommandBars("TuaBarra").Visible = False
o
DoCmd.ShowToolbar "TuaBarra", acToolbarNo
-- 
HTH


 - Mostra testo citato -
ok
grazie Karl

Newsgroup: it.comp.appl.access
Titolo: Tasto che disabilita se stesso

Come puo'  il codice associato a un bottone di comando, disabilitare il
bottone di comando stesso?
mi da' errore 2164 e dice "impossibile disattivare il controllo che ha
attualmente lo stato attivo"
Spiego - ho una tastierina (gruppo di bottoni di comando) disegnata a video,
per ogni tasto che si preme viene incrementato un contatore.  Quando il
contatore arriva a 100, disabilito tutti i tasti  (per evitare che nella
foga l'utente prosegua l'immissione) e passo a fare dei calcoli.
il codice associato alla pressione del tasto Cmd_01 e'
Private Sub cmd01_Click()
    Let TOT = TOT + 1
    If TOT >= LIM Then concludi_conteggio
End Sub
Quando il contatore TOT arriva al valore limite di LIM, viene chiamata la
routine concludi_conteggio che dapprima disabilita i tasti e poi chiama a
sua volta la routine di calcolo
Private Sub concludi_conteggio()
    Me.Cmd_01.Enabled = False
    Me.Cmd_02.Enabled = False
    ...
    Effettua_calcoli
end sub
quando il tasto Cmd_01 cerca di forzare a falso l'attributo enabled di se
stesso, da' errore. E' anche ragionevole, ma come aggiro la situazione?
grazie
VA

 ha scritto nel messaggio 
news:g076rm$qt5$1...@tdi.cu.mi.it...

Prima di disabilitare tutti i controlli sposti il fuoco su un altro 
controllo...
Ciao.
-- 
Sergio MAZZA 

 controllo...
Funziona!
grazie