Newsgroup: it.comp.appl.access
Titolo: Aggiornare Valori in Maschera da Query

Buongiorno a tutti, spero che qualcuno possa aiutarmi. 
Sto creando un file Access per gestire un grande database di catalogazione macchine da cucire Singer e vorrei che al momento della digitazione del numero di serie (composto da massimo 2 lettere e un numero) mi dia in automatico il modello, l' anno e lo stabilimento di produzione.
Il database fornito dalla Singer ha i seguenti campi: ID(chiave primaria) ,Lettere , Da Numero , A Numero , Anno , Modello , Stabilimento.
La maschera associata alla tabella con lo stesso nome ("Macchine da cucire") ha tra gli altri i campi: Lettere Matricola, Numero Matricola , Anno , Modello , Stabilimento.
Immettendo i valori di testo nel campo "Lettere Matricola" e i valori numerici nel campo "Numero Matricola" della maschera "macchina da cucire" all' uscita dalla digitazione va ad aprire una query che trova i valori tra "Da Numero" ad "A Numero" e mi visualizza in automatico l' anno, il modello e lo stabilimento. 
Ora, questi valori vorrei trasferirli alla maschera, non essendo esperto in programmazione speravo di poterlo fare senza codici ma a quanto pare risulta impossibile. 
Un idea per risolvere la situazione?
Grazie

Nell'intestazione maschera inserisci due controlli testo, dove inserirai i due valori da ricercare, poi nella query imposti sui due campi relativi come criterio il riferimento al relativo controllo.
Forse se linchi il file è più semplice aiutarti.

 Forse se linchi il file è più semplice aiutarti.
 
Buongiorno,
 
Dato che l’ intero file contiene dati sensibili che per questioni di privacy non posso linkare, mando l’ immagine della maschera associata alla tabella con lo stesso nome “Macchine da Cucire” e della tabella “Database ISMACS”:
 
https://smallpdf.com/it/file#s=12521786-fb0c-47af-8b8d-ec67b2c6faff
 
 
Alla digitazione del “Numero matricola:” composto da massimo 2 lettere che compilo in “Lettere” e un numero che compilo in “Numero Matricola” vorrei che mi dia in automatico “Anno” , “Modello” e “Stabilimento” (al momento sono 3 caselle combinate perché fino ad ora le compilavo a mano).
Per fare ciò mi baso sulla tabella “Database ISMACS”.
 
 
Spero ora sia più semplice aiutarmi, grazie.


io farei una maschera
con una casella di testo chiamata "TrovaMatricola"
sull'evento dopo aggiornamento
 
 
Private Sub TrovaMatricola_AfterUpdate()
Dim lettere As String
Dim numero As String
 
lettere = Left(Me.TrovaMatricola, 2)
numero = Mid(Me.TrovaMatricola, 3)
 
Dim matricole As ADODB.Recordset
matricole.Open "select * from [Database ISMACS] where left(lettere,2)='" 
& lettere & "' and '" & numero & "' between [da numero] and [a numero] 
", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If matricole.RecordCount <> 0 Then
     MsgBox "Anno : " & matricole.Fields("anno")
     MsgBox "Stabilimento : " & matricole.Fields("stabilimento")
     MsgBox "Modello : " & matricole.Fields("modello")
Else
     MsgBox "Matricola insesistente"
End If
matricole.Close
 
End Sub
 
BFS
 

Basta che il file abbia :
    - la tabella fornita dalla Singer con i seguenti campi: ID(chiave primaria) ,Lettere , Da Numero , A Numero , Anno , Modello , Stabilimento. 
    - la tabella Macchine da cucire dove cancelli tutti i dati o solo quelli sensibili
in modo da poter utilizzare la struttura.

Grazie per il codice, ma ho provato e pultroppo non mi aggiorna i campi.
 


Ho cancellato tutti i dati e lasciato le tabelle "Macchine da cucire" , "Database ISMACS" e la maschera "Macchine da cucire". Vediamo se in questo modo si riesce ad utilizzare la struttura. 
 
http://sendanywhe.re/BIK22R6I
 
 
Nel caso non si riesca grazie comunque per averci provato.
 
Massimo

 
 
 
il codice che ti ho scritto non serve per aggiornare i campi ma per 
farti capire come recuperare la riga dalla tabella che ti serve e i 
valori dei relativi campi.
 
da capire se il tuo affermare "non essendo esperto in programmazione " 
significa che per te è arabo quello che ho scritto o meno.
 
BFS

Qui puoi vedere un esempio: 
https://www.dropbox.com/s/8ur9x27u2khh485/MacchineDaCucire.rar?dl=0
 

 Qui puoi vedere un esempio: 
https://www.dropbox.com/s/8ur9x27u2khh485/MacchineDaCucire.rar?dl=0
 
 
Bruno, grazie infinite 😊😊