Newsgroup: it.comp.appl.access
Titolo: [AIUTO] Ancora campi tabella che diventano record in altra tabell

Scusate se riposto il mio messaggio ma ho veramente bisogno del Vostro
aiuto.................
Ho una tabella anagrafica articoli con diversi campi ( molti ) es:
Codice
Descrizione
AliquotaIVA
NomeBotanico
TitoloDiRiferimento
Umidità
Ceneri
Pesticidi
MetalliPesanti
DescrizioneInglese
ecc.
ecc.
Devo implementare una gestione di schede prodotto che visualizzino solo
alcuni campi in base alla tipologia di utente che visualizza i dati.
Vorrei creare una tabella che abbia come campi le tre tipologie di
utilizzatori e come record il nome dei campi della tabella anagrafica in
modo che io possa gestirne la visibilità con dei flags , ad esempio
Campo    !    Agente    !    Cliente    !    Responsabile !
-------------------------------------------------------------
Codice    !       X        !        X         !            X            !
Descriz.  !       X        !                    !            X            !
Aliquot   !                  !                    !            X
!
NomeBot!       X        !        X         !                           !
TitoloRi !                  !                    !             X           !
Umidità  !                  !                    !             X           !
Ceneri    !                  !                    !             X
!
Ovviamente i campi dell'anagrafica sono di piu' e potranno in futuro
aumentare o diminuire.
Come posso risolvere questo problema, cioè accodare i nomi di tutti i campi
di una determinata tabella in un'amtra già pronta????
Ringrazio tutti anticipatamente del tempo dedicatomi e Vi prego ancora di
darmi qualche idea perchè ne ho veramente la necessità.


Non aprire nuovi 3d e continua quelli precedenti.
Creati una maschera con controlli non associati e 3 query diverse. A seconda
di come si logga l'utente fai un rowsource dei controlli.
Ah, aver aggiunto [Aiuto] al subject, ha fatto più danni che aggiungere
benefici.
MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:aayKa.121028$Ny5.3...@twister2.libero.it...

Questa funzione legge i nomi dei campi di qualsiasi tabella e li scrive in
una tabella chiamata "tabellaDiProva"...
Function LeggiStrutturaTabella(nomeTabella As String)
Dim tbDefs As TableDefs, flds  As Fields, fld As Field
Dim rst As Recordset
Set tbDefs = CurrentDb.TableDefs
Set flds = tbDefs(nomeTabella).Fields
Set rst = CurrentDb.OpenRecordset("tabellaDiProva")
For Each fld In flds
     rst.AddNew
     rst!codice = fld.Name
      rst.Update
Next
rst.Close
Set rst = Nothing
Set fld = Nothing
Set flds = Nothing
Set tbDefs = Nothing
End Function
Ciao.
--
Sergio MAZZA

 Sergio MAZZA
Prima di tutto ti ringrazio sinceramente perchè è esattamente quello che mi
serve , ho solo ancora un piccolo problemino.
In una maschera ho creato un pulsante che su click fa:
    nomeTabella = "ARTICOLI"
    Call LeggiStruttutaTabella
Se non ho cappellato attribuisco alla variabile nomeTabella il nome della
tabella da cui estrarre i nomi dei campi e poi richiamo la funzione che mi
hai scritto.
Il programmino si bianta e il debug mi restituisce il seguente messaggio:
Errore di compilazione
Tipo definito dall'utente non definito
e mi evidenzia
Dim tbDefs As TableDefs
Mi secca disturbarti ancora ma cosa posso farci???
Sei molto gentile e ti ringrazio...
Ciao
Dim rst As Recordset

 Dim rst As Recordset
Ciao.
--
Sergio MAZZA

Non so sinceramente come ringraziarti per la tua pazienza e disponibilità.
Funziona tutto alla perfezione ed era esattamente quello che volevo
realizzare.
Sei stato precisissimo e tempestivo.
Ancora 1000 grazie.
SILVIO

 ha scritto nel messaggio
news:WPUKa.124705$Ny5.3...@twister2.libero.it...

Prego.
Ciao...
--
Sergio MAZZA