Newsgroup: it.comp.appl.access
Titolo: ricerca fornitore su uscita campo

in una maschera, su uscita del campio codice cliente, deve cercare su una 
tabella/query se esiste o meno tale codice, se si mi deve ritornare la 
ragione sociale del fornitore
contenuta anch'essa nella stessa tabella/query e memorizzare su un campo 
della maschera
grazie per l'aiuto

 in una maschera, su uscita del campio codice cliente*
*fornitore


Ciao
Sull'evento lost focus
a=dlookup("Cliente","TabellaClienti","Campo='" & CampoCliente & "'" )
La variabile a la puoi usare come vuoi, dipende da quello che ci devi
fare.
Es.
if not isnull(a) then
MsgBox "Il cliente è " & a
else
MsgBox "Codice non presente in tabella"
end if
Ciao
Alberto

 ha scritto nel messaggio 
news:5b4aec80-2282-4e25...@b15g2000yqd.googlegroups.com...
temo di non essermi spiegato bene, o forse non ho capito come fare. adesso 
cerco di spiegarmi meglio facendo un esempio.
ho due tabelle
'fornitori'
'scheda'
Tabella 'fornitori' contiene i seguenti campi:
fornitori_codice
fornitori_rag_soc
Mentre la tabella 'scheda' contiene:
scheda_codice
scheda_rag_soc
scheda_importo
su una maschera 'inserimento_dati' associo i campi
scheda_codice
scheda_rag_soc
scheda_importo
al momento in cui esco dal campo 'scheda_codice' mi deve cercare sulla 
tabella 'fornitori_codice' la relativa ragione sociale sul campo 
'fornitori_rag_soc' e *scrivere* il risultato su 'scheda_rag_soc'
per favore fammi un esempio su ste informazioni cos� capisco (spero) :))
ciao e grazie

 per favore fammi un esempio su ste informazioni così capisco (spero) :))
Sub Scheda_Codice.LostFocus
scheda_rag_soc=dlookup
("fornitori_rag_soc","Fornitori","scheda_codice=" &
scheda_codice)           (se scheda_codice è numerico)
oppure
scheda_rag_soc=dlookup
("fornitori_rag_soc","Fornitori","scheda_codice='" & scheda_codice
&"'")    (se scheda_codice è una stringa)
exit sub
Questa è una soluzione.
Però non capisco l'esigenza di duplicare la ragione sociale, non puoi
ottenere la scheda creando una tabella con i soli dati mancanti nella
tabella Fornitori (legandola col codice), oppure integrare in questa i
dati mancanti ?
Ciao
Alberto

dati mancanti ?
purtroppo no, perch� la tabella da cui prendo i codici non � residente sul 
mio pc e cmq contiene campi con nomi diversi
mi serve solo come appoggio per evitare di scrivere stronzate
grazie, adesso provo e poi ti faccio sapere

 ...
@Rivera:
Stai attento che cos� ogni volta che il cursore esci dal controllo
il codice viene rieseguito. Di solito si vuole solo una tale ricerca
quando si � cambiato qualcosa. Per questo scopo sarebbe
meglio l'evento "Dopo aggiornamento" del controllo.
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

dati mancanti ?
intanto grazie, ci siamo quasi, ma mi ritorna sempre la prima ragione 
sociale della tabella "fornitori_rag_soc" qualsiasi codice inserisco

 sociale della tabella "fornitori_rag_soc" qualsiasi codice inserisco
Se ho capito bene l'esempio, invece di
scheda_rag_soc=dlookup
("fornitori_rag_soc","Fornitori","scheda_codice=" & scheda_codice)
dev'essere:
scheda_rag_soc=dlookup
("fornitori_rag_soc","Fornitori","fornitori_codice=" & scheda_codice)
Se non funziona, posta il tuo codice attuale e descrivi quale campo
nella tabella Fornitori dev'essere uguale a scheda_codice della
maschera attuale.


Rivera  (ero sPAriTO) ha scritto:




C'� un errore nella condizione WHERE di Dlookup. Sar� un errore di
trascrizione.
scheda_rag_soc=Dlookup
("fornitori_rag_soc","Fornitori","Fornitore_Codice=" &
.
.
.
.
--
sv
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Access FAQ:
www.donkarl.com/it
OK, giusto come al solito.
Ciao Karl
Alberto

 ("fornitori_rag_soc","Fornitori","fornitori_codice=" & scheda_codice)
perfetto grazie! siete sempre risolutivi.

 ("fornitori_rag_soc","Fornitori","Fornitore_Codice=" &
perfetto, grazie!

 meglio l'evento "Dopo aggiornamento" del controllo.
si ok, grazie