Newsgroup: it.comp.appl.access
Titolo: [HELP] - Comprensione codice

Buongiorno a tutti :)
Ho scritto il codice di esempio postatomi da Roccia in un precedente post
nell'evento After_Update del controllo txtNome:
Private Sub txtNome_AfterUpdate()
Dim RS As DAO.Recordset
Set RS = Me.RecordsetClone
RS.FindFirst "[Nome]='" & Me.txtNome & "'"
If RS.NoMatch Then
    MsgBox "non trovato"
Else
    Me.Bookmark = RS.Bookmark
End If
End Sub
e funziona :)
Il problema è che vorrei capire perchè funziona. Nella guida in linea che
io ho manca tutta la parte relativa a DAO; infatti 
ad.es
. quando provo a
cercare il metodo Find con riferimento a DAO mi appare la finestra vuota,
e questo accade per tutto ciòche riguarda DAO.
Qualcuno ha gentilmente due min di tempo per spiegarmi perchè tutto questo
piccolo codice funziona?
Vi spiego come è strutturato il mio db:
MASCHERA_PRIMO_CONTATTO
|
|--------txtNome---->evento After_Update
|
CONTROLLOASCHEDE_DATI_ANAGRAFICI
|
PAGINA1
|
SOTTOMASCHERA_DATI_ANAGRAFICI
|
|--------txtSubNome
txtSubNome mostra il nome che io scrivo in txtNome
Tutto ciò è proprio quello che voglio perchè questo poco codice non solo
funziona per txtSubNome ma anche per tutti gli altri controlli della
sottomaschera in questione.
Come è possibile ciò?
Grazie infinte mi siete di ENORME aiuto :))))
-- 
FIRMA BAU BAU MICIO MICIO - Un tale disse a un tale 'Tu sei tale e quale a
un tale'. Il tale chiese al tale 'Tale e quale a quale tale?'. Non sapendo
a quale tale fosse tale e quale il tale, il tale se ne andò. Convinto che
quel tale a qualche tale fosse proprio tale e quale.
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie infinte mi siete di ENORME aiuto :))))
-- 
_ _
Ciao
MAssimiliano Amendola
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:  
www.donkarl.com/it

 mi sa che ho esagerato ad interpreatre... per favore fermatemi!!!
Sei stato gentilissimo!!!!
Grazie :)
-- 
FIRMA BAU BAU MICIO MICIO - Un tale disse a un tale 'Tu sei tale e quale a
un tale'. Il tale chiese al tale 'Tale e quale a quale tale?'. Non sapendo
a quale tale fosse tale e quale il tale, il tale se ne andň. Convinto che


 ha scritto nel messaggio news:d5skmo$cqv$1...@news.newsland.it...

Set RS = Me.RecordsetClone '<-- copia il recordset associato alla form in un'altra variabile
RS.FindFirst "[Nome]='" & Me.txtNome & "'" '<-- cerca, nel recordset, la prima occorrenza nel campo [nome] del testo contenuto nella 
casella di testo txtNome
If RS.NoMatch Then '<-- se non è stata trovata
   MsgBox "non trovato"
Else
   Me.Bookmark = RS.Bookmark '<-- in caso contrario mi posiziono sul record tramite il Bookmark
End If
Ciao.
P.S. L'ENORME è riferito al BISO vero?
-- 
Sergio MAZZA 

> P.S. L'ENORME č riferito al BISO vero?
BISO?
Cmq grazie anche a te :)
-- 
FIRMA BAU BAU MICIO MICIO - Un tale disse a un tale 'Tu sei tale e quale a
un tale'. Il tale chiese al tale 'Tale e quale a quale tale?'. Non sapendo
a quale tale fosse tale e quale il tale, il tale se ne andň. Convinto che


 -- 
No BISO? Ahi, ahi, ahi...
Ciao.
P.S. BISO = Antonio BISO, non mi dire che non hai notato la sua presenza in questo NG. Pensa che riesce anche a sdoppiarsi per 
litigare da solo!!
-- 
Sergio MAZZA 


Sì perchè neanche lui si sopporta tanto...


 Cioè??
Ho un vago sospetto :D
(IO dico che le guide successive a quella di A97 sono fatte con una
parte anatomica normalmente preposta a ben altre funzioni) 
Cia'
Max

 > End Sub
Ciao
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/