Newsgroup: it.comp.appl.access
Titolo: come poter sfruttare i dati di una sottomaschera?

Cia a tutti,
ho creato un db con 2 tabelle: una contenete dati anagrafici (angraf) e
l'altra con svariati campi contenenti la data, il tipo di spesa ed altri
campi (spesa). Grazie alla lettura di molti msg della lista sono riuscito a
risolvere molti problemi per la maschera di input dei dati.
Ora ho bisogno di risolvere il seguente problema:
ho una maschera con relativa sottomaschera con i seguenti campi:
maschera:        sottomaschera     relazione
IDscheda        IDscheda           1 a molti
cognome        data_spesa
nome              tipo_spesa
......                ........
con una casella combinata riesco, per ogni cognome a evidenziare, nella
sottomaschera, tutte le varie spese sostenute dal cognome relativo.
PROBLEMA: nella sottomaschera vorrei ottenere, cliccando sul campo
data_spesa, l'apertura della maschera relativa (spesa) in modo da poter
vedere e stampare tutti i campi relativi a quel record.
Spero di essere stato chiaro.
Grazie per l'aiuto

Nella sottomaschera (Suppongo a maschere continue) crea un pulsante
denominato es. SPESA, e ponilo alla fine di ogni record.
Nella proprietà del tasto SPESA/Eventi/su CLICK, inserisci la seguente
routine :
Private Sub SPESA_Click()
'Salva il record e tutta la tabella con le eventuali variazioni fatte al
momento
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
On Error GoTo Err_SPESA_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "MASCHERA SPESA"
    stLinkCriteria = "[ID]=" & "'" & Me![[ID] & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_SPESA_Click:
    Exit Sub
Err_SPESA_Click:
    MsgBox "Non c'è nessuna spesa con il codice : "&[IDSpesa]
    Resume Exit_SPESA_Click
End Sub
Nella maschera principale, visualizza la sottomaschera non come foglio dati
ma come Maschera.
"nella sottomaschera vorrei ottenere, cliccando sul campo
data_spesa, l'apertura della maschera relativa (spesa) in modo da poter
vedere e stampare tutti i campi relativi a quel record."
Ho posto come "maschera relativa (spesa)" quella con un nome simbolico
"MASCHERA SPESA" all'interno della routine (tu metti il nome della tua), e
ho ben pensato che la stessa avesse un "ID" per il record oltre all'IDSpesa
con l'origine dati da una tabella correlata con le altre. (Se non è così,
fallo)
PS : Il risultato l'otterrai cliccando sul tasto e non sulla data.
SPERO NELLA MIA CHIAREZZA...... FAMMI SAPERE CIAO (Maurizio)
--
Posted from 
smtp2.libero.it
 [193.70.192.52] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


   OK                ID Sottomaschera
                         IDscheda
                         data_spesa
                          ecc.
Nella 2 tabella manca ID Sottomaschera con chiave primaria
Saluti

 wrote in message
news:000301bff010$aa3e0f00$2800a8c0@mauro...
ho scritto la procedura indicatami da Maurizio ma mi compare l'errore:
"Comando o azione SlavaRecord non disponibile"
che faccio!!!???


Cancella dalla routine creata:
'Salva il record e tutta la tabella con le eventuali variazioni fatte al
momento
 DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
funziona?
Fammi sapere.


 wrote in message
news:000301bff1a0$8f35eac0$2800a8c0@mauro...
OK!! funziona
ti ringrazio.
ciao
