Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 18

Inserimento automatico dei dati in delle txt box

  1. #1
    L'avatar di brontolo77
    brontolo77 non è in linea Novello
    Salve a tutti ho un problemino con una maschera di access.
    Ho 3 tabelle, una che ha dei campi tipo
    pippo, pluto, paperino e biancaneve(questa contiene già dei dati)
    1000 Ciao bello Donna
    2000 hello trillo Daffy

    Poi ho l'altra (la chiamerò ANA) che contiene nome cognome etc, ed a questa c'è un'altra tabella che contiene gli stessi campi della prima ma è vuota e che ha la relazioni 1 a N con la tabella ANA.
    Ho creato una maschera ed una sottomaschera, e nella sottomaschera la prima combo ha il nome pippo e le altre sono delle txtbox.
    A questo punto io vorrei che quando nella comboPippo seleziono ad esempio il valore "1000" le altre txtbox vengono automaticamente popolate "Ciao", "Bello" e "Donna".
    Una volta fatto ciò passo all'inserimento di altri record oppure esco e salva nella nuova tabella.
    Sicuramente devo creare una macro ma non so bene come...
    Spero di essere stato chiaro e cmq grazie a tutti in anticipo
    ℹ️ Leggi di più su brontolo77 ...

  2. #2
    L'avatar di dragone bianco
    dragone bianco non è in linea Amanuense
    devi usare VBA sull'evento SU Modifica della tua casella combinata

    E scrivere il seguente codice

    comboPippo é il nome della combobox
    txt1,txt2,txt3 sono le tue 3 caselle di testo

    txt1.value=dlookup("[Nomecampo]","Nome maschera","Filtro")
    txt2.value=dlookup("[Nomecampo]","Nome maschera","Filtro")
    txt3.value=dlookup("[Nomecampo]","Nome maschera","Filtro")
    
    Nomecampo (il campo di cui si vuole inserire il dato)
    Nome maschera é il nome della maschera di cui fa parte il campo)
    Filtro (filtro per ricerca del dato nella tabella)

    per ulteriori aiuti vedi Guida

    Ciao
    ℹ️ Leggi di più su dragone bianco ...

  3. #3
    L'avatar di brontolo77
    brontolo77 non è in linea Novello
    Grazie 1000 Dragone, il sistema funziona, però avrei un'altro piccolo problemino, in pratica il valore che mi deve comparire nelle varie txt dipende dalla scelta che ho fatto nelle prime 2 esempio:
    ho 3 cmb e una txt

    cmb pippo
    cmb pluto
    cmb paperino
    txt Bbunny

    seleziono un valore nella cmb pippo, poi nella cmb pluto ho la sola possibilità di selezionare i valori in base alla scelta fatta nella cmb pippo e la stessa cosa vale per la cmb paperino, ed alla fine la txt bunny mi visualizza il solo valore che è univoco in base alle scelte fatte nelle varie comboBox.
    In pratica devo applicare dei filtri.....intanto io ci provo, se avete qualche suggerimento o soluzione va benissimo....
    Grazie!
    ℹ️ Leggi di più su brontolo77 ...

  4. #4
    L'avatar di dragone bianco
    dragone bianco non è in linea Amanuense
    nella guida c'è questo esempio

    Tratto dalla guida
    Esempio
    DCount(“[Campo1]”,”Tabella1”,”Campo2=3”)
    ti mostro come filtrare con più dati
    Dlookup(“[Campo1]”,”Tabella1”,”Campo2=” &cmbpippo & " and campo3=" & cmbpluto & " and campo4='" & cmbpaperino & "'")
    
    se sono tutti filtri per campi di testo mettigli tra apici come ho fatto con cmbpaperino

    Ciao
    ℹ️ Leggi di più su dragone bianco ...

  5. #5
    L'avatar di brontolo77
    brontolo77 non è in linea Novello
    .....bene, ma mi da errore di Run-Time '13' : Tipo non corrispondente....
    uffaaaa.....sono proprio una zappa....cosa vuol dire....


    Non riesco a capire proprio perchè....ho tre campi testo ed uno numerico, ho messo gli apici come hai detto te in quelli testo, mentre per il numerico l'ho lasciato standard...

    Grazie....

    ℹ️ Leggi di più su brontolo77 ...

  6. #6
    L'avatar di dragone bianco
    dragone bianco non è in linea Amanuense
    Controlla Bene la sintassi.
    i nomi di campi se hanno devi spazi Racchiudili traparentesi Quadre

    es

    Dlookup(“[Campo1]”,”Tabella1”,”Campo2=” &cmbpippo & " and campo3=" & cmbpluto & " and [campo 4]='" & cmbpaperino & "'")

    Ciao
    ℹ️ Leggi di più su dragone bianco ...

  7. #7
    L'avatar di brontolo77
    brontolo77 non è in linea Novello
    Nulla da fare non riesco a capire dive sta il bug....

    Ti posto il codice magari riesci a trovare qualcosa che io non riesco...

    txtGiudizioComplessivo.Value = DLookup("GiudizioComplessivo", "VotoGiudCGiud1Descr", "capacita='" & cmbcapacita & "'" _
    And "voto = " & cmbvoto & "" And "[momento] ='" & cmbMomento & "'")
    
    il campo voto è numerico....cosa è che sbaglio?
    Grazie
    ℹ️ Leggi di più su brontolo77 ...

  8. #8
    L'avatar di brontolo77
    brontolo77 non è in linea Novello
    Bug trovato, in pratica sbagliavo a digitare il nome di una comboBox nel codice
    Ora il codice non mi da nessun errore, ma sulle txt non mi restituisce nulla.....

    ecco il codice:
    txtGiudizioComplessivo.Value = DLookup("GiudizioComplessivo", "VotoGiudCGiud1Descr", _
    "capacita='" & cboCapacita & "'" And "momento ='" & cboMomento & "'" And "voto =" & cboVoto & "")
    

    Grazie
    ℹ️ Leggi di più su brontolo77 ...

  9. #9
    L'avatar di dragone bianco
    dragone bianco non è in linea Amanuense
    il Filtro è una stringa di testo le AND devono stare tra le virgolette.

    Soluzione

    txtGiudizioComplessivo.Value = DLookup("GiudizioComplessivo", "VotoGiudCGiud1Descr", _
    "capacita='" & cboCapacita & "'  And momento ='" & cboMomento & "' And voto =" & cboVoto & "")
    
    Prova
    ℹ️ Leggi di più su dragone bianco ...

  10. #10
    L'avatar di brontolo77
    brontolo77 non è in linea Novello
    Carissimo Dragone ok funziona, avevo fatto un pò di casini io con le proprietà delle tabelle....per fortuna trovati i mini-bug e risolti.
    Ora però ho un'altro problema in pratica il capo [voto] è di tipo numerico ed ha come proprietà : "dimensione campo" Precisione doppia perchè i valori che quel campo contiene sono: 4, 3,5, 3, 2,5 e 2.
    Ora quando uso la maschera per inserire i dati e clicco sui valori interi nessun problema il record di sposta in maniera corretta però quando seleziono o il 3,5 o il 2,5 mi compare questo messaggio
    "Errore di Run-time '3075' 
    Errore di sintassi(virgola) nell'espressione della query 
    'capacita='Programmazione' And momento='B' and voto=3,5'.
    

    Riesco a capire solamente che la query va in tilt quando deve fare il confronto con i dati con la virgola.....quindi dovrei passargli il campo voto come semplice stringa o cmq elaborare con VBA la stringa numerica, o devo impostare qualche proprietà?
    Vediamo un pò che riesco a trovare
    Grazie....
    ℹ️ Leggi di più su brontolo77 ...

+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo

Potrebbero interessarti anche ...

  1. Inserimento dati manuale e automatico
    Da Demone Nero nel forum Microsoft Access
    Risposte: 5
    Ultimo Post: 22-01-2017, 18:56
  2. Inserimento automatico dati in un campo di una tabella
    Da Ale_8791 nel forum Microsoft Access
    Risposte: 6
    Ultimo Post: 09-12-2014, 09:26
  3. Inserimento automatico dati
    Da leondoro nel forum Microsoft Access
    Risposte: 3
    Ultimo Post: 13-08-2014, 09:15
  4. Risposte: 8
    Ultimo Post: 31-01-2013, 17:56
  5. Access inserimento serie dati in automatico
    Da gondoliere nel forum Microsoft Access
    Risposte: 3
    Ultimo Post: 12-09-2008, 10:56