Newsgroup: it.comp.appl.access
Titolo: usare 1 maschera sola priva di Origine Record per scopi simili

ciao a tutti,
come da oggetto, vorrei usare 1 unica maschera per eseguire operazioni
simili su una tabella: questo per evitare di avere n maschere identiche x
svolgere n compiti simili ma non uguali: per fare ciň ho fatto come segue:
1. la tabella in questione ha i segg campi:
ID
ID_dip
ID_az
notif_A_IDbook
notif_B_IDbook
notif_C_IDbook
notif_A_STATUS
notif_B_STATUS
notif_C_STATUS
2. esistono poi 3 queries, ciascune della quali č cosě formata:
ID
ID_dip
ID_az
notif_A_IDbook
notif_A_STATUS
ID
ID_dip
ID_az
notif_A_IDbook
notif_A_STATUS

ops.. mi è scappato il dito! dicevo:
ciao a tutti,
come da oggetto, vorrei usare 1 unica maschera per eseguire operazioni
simili su una tabella: questo per evitare di avere n maschere MOLTO simili x
svolgere n compiti MOLTO simili, ma non uguali. per fare ciò ho fatto come
segue:
1. la tabella in questione ha i segg campi:
ID
ID_dip
ID_az
notif_A_IDbook
notif_B_IDbook
notif_C_IDbook
notif_A_STATUS
notif_B_STATUS
notif_C_STATUS
2. esistono poi 3 queries, ciascune della quali è così formata:
"q_AGENDA_SelA"
ID
ID_dip
ID_az
notif_A_IDbook
notif_A_STATUS
"q_AGENDA_SelB"
ID
ID_dip
ID_az
notif_B_IDbook
notif_B_STATUS
"q_AGENDA_SelC"
ID
ID_dip
ID_az
notif_C_IDbook
notif_C_STATUS
3. infine ho una maschera con 3 sottomaschere, ciascuna delle quali possiede
1 bottone che mi apre la maschera *unica*, ad esempio nel modo seguente:
Private Sub Comando68_Click()
    DoCmd.Requery
    DoCmd.OpenForm "AGENDA_SEL_A", , , , acFormEdit, , "daA"
End Sub
4. all'apertura della maschera ho messo la seguente routine, e qui sta il
problema:
Private Sub Form_Open(Cancel As Integer)
    If Me.OpenArgs = "daA" Then
        Me.RecordSource = "q_AGENDA_SelA"
 
Me.notif_X_STATUS.Name
 = "notif_A_STATUS"
 
Me.notif_X_IDbook.Name
 = "notif_A_IDbook"
        Me.Requery
    ElseIf Me.OpenArgs = "daB" Then
        'ecc
        'ecc
    End If
End Sub
Il problema è riuscire ad indicare che i controlli della maschera comune
chiamati notif_X_STATUS e notif_X_IDbook devono "diventare"  notif_A_STATUS
e notif_A_IDbook, oppure notif_B_STATUS  e notif_B_IDbook, ecc.
quale sintassi devo usare?
spero di essermi spiegato.. :-)
grazie
em.an

 em.an
Cicla i Controlli o se sono pochi accedi direttamente
cambiando il ControlSource come hai evidenziato.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 em.an
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
---------------------------------------------------- 

 Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
ciao Alessandro, anzitutto grazie per la tua risposta di sabato mattina!
non sapendo come procedere per ciclare i controlli (per la cronaca sono 7),
ho usato il tuo secondo consiglio, modificando la sub:
Private Sub Form_Open(Cancel As Integer)
    If Me.OpenArgs = "daA" Then
        Me.RecordSource = "q_AGENDA_SelA"
 
Me.notif_X_STATUS.Name
 = "notif_A_STATUS"
 
Me.notif_X_IDbook.Name
 = "notif_A_IDbook"
        Me.Requery
    ElseIf Me.OpenArgs = "daB" Then
'    ecc
'    ecc
    End If
End Sub
con:
Private Sub Form_Open(Cancel As Integer)
    If Me.OpenArgs = "daA" Then
        Me.RecordSource = "q_AGENDA_SelA"
        Me!notif_X_STATUS.ControlSource = "notif_A_STATUS"
        Me!notif_X_IDbook.ControlSource = "notif_A_IDbook"
        Me.Requery
    ElseIf Me.OpenArgs = "daB" Then
'   ecc
'   ecc
    End If
End Sub
il tutto sembrerebbe funzionare a dovere.
grazie ancora per l'imbeccata!
em.an

 em.an
Con l'autocomposizione creati una query a campi incrociati (vedi help).


 ha scritto nel
messaggio news:0sSWe.5725$Jr.9...@twister2.libero.it...

ciao roberto, trovo che la tua soluzione sia molto utile.
forse per il mio caso, in cui conosco con certezza a priori quali saranno le
informazioni che desidero trattare, venga bene usare il metodo precedente.
ps: mi sono scaricato cmq l'esempio in questione, che sicuramente potrò
tornarmi utile..
adesso me lo studio con calma.
ciao e grazie!
em.an

ciao a tutti
Avendo la mia tabella di partenza cosě strutturata:
ID                            (contatore)
ID_dip                     (numerico)
notif_A_STATUS    (numerico)
notif_B_STATUS    (numerico)
notif_C_STATUS    (numerico)
vorrei produrre un report che elenchi in una sola riga un riferimento a
ciascun dipendente (ID_dip), ed filtri i campi notif_A_STATUS,
notif_B_STATUS, notif_C_STATUS nel caso assumano valore uguale a 1, nel modo
seguente:
ID    ID_dip   notif_A_STATUS   notif_B_ST    notif_C_ST
..      1            1                            1                    0
..      2            0                            1                    1
il problema č il seguente: se esistono piu campi ID relativi ad uno stesso
dipendente (cosa necessaria) le righe prodotte saranno piů di una:
ID    ID_dip   notif_A_STATUS   notif_B_ST    notif_C_ST
..      1            1                            0                    0
..      1            0                            1                    0
..      2            0                            1                    0
..      2            0                            0                    1
ho provato con diversi tipi di query, anche concatenandone piů di una, ma
