Newsgroup: it.comp.appl.access
Titolo: Non riesco proprio, aiuto...

Ho gia' postato ed il buon Luciano mi ha risposto ma non riesco. Mi sembra
impossibile che essendo all'interno di un database sia cosi' difficile
leggere dati da una query o altro.
Vorrei sapere come si fa' a leggere i singoli campi estratti da una query
dall'interno del VBA. Sono nel codice dell'autocomposizione del comando
all'evento click.
La query funziona ma come faccio ad attribuire ad una variabile il valore di
un campo?
Grazie e scusate ma sono agli inizi e nel libro che sto' seguendo sembra
strano ma l'estrazione di un singolo campo
sembra sia fantascienza.
##########################################
Private Sub Comando29_Click()
On Error GoTo Err_Comando29_Click
    Dim stDocName As String
    stDocName = "qryCercaDati"
    DoCmd.OpenQuery stDocName, acNormal
Exit_Comando29_Click:
    Exit Sub
Err_Comando29_Click:
    MsgBox Err.Description
    Resume Exit_Comando29_Click
End Sub
######################################

 sembra sia fantascienza.
Non esageriamo con i termini (fantascienza), basta leggere/cercare l'help ma
sopratutto avere le idee chiare di cosa si vuole fare.
Non ho seguito la vostra discussione ma puoi utilizzare (per esempio) il
dlookup (vedi help):
es.
'---------------------
 Private Sub Comando29_Click()
 On Error GoTo Err_Comando29_Click
     Dim stDocName As String
     stDocName = "qryCercaDati"
     valore =
dlookup("[nomeCampoDaLeggere]",stDocName,"eventualeCondizioneWhere")
 Exit_Comando29_Click:
     Exit Sub
 Err_Comando29_Click:
     MsgBox Err.Description
     Resume Exit_Comando29_Click
 End Sub
'---------------------
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:ae6pre$cbl$1...@nocsv003.tocn.ne.jp...

Il codice postato apre una query ma quello che a te interessa č avere il
valore di un singolo campo.
Se č cosě cerca nella guida DlookUp. E' uno dei sistemi. Poi leggiti
Recordset e correlati.
P.E.: MiaVariabile = DlookUp("Cognome","Anagrafica","ID = 1")
Ciao, Carlo

Grazie Sergio e Carlo,
le idee chiare ce l'ho, in Php/MySQL riesco benissimo, ma in Access mi
sembra sia tutto difficile, almeno per i newbie. Altra nota negativa e'
l'help, hai ragione di cercare ma se uno non conosce gia' il linguaggio come
facevo a conoscere che esisteva Dlookup ? E' questo che mi sembra
fantascienza in un help in linea dove non c'e' un capitolo su Accedere e
prelevare informazioni dal Database spiegato in parole semplici.
Ho provato anche a leggere recordset ma per un principiante e'
improponibile, troppi termini da imparare.
Mentre con una semplice riga data da voi e' tutto risolto, ci voleva tanto
alla Microsoft a scrivere questo?
Comunque a parte la polemica, tanto ci dovro' battere il capo per molto,
Grazie tante a tutti voi che rispondete ai neofiti come me.
Buon lavoro.

 ha scritto nel messaggio
news:ae6uol$d2l$1...@nocsv003.tocn.ne.jp...

Nessuna polemica; mi sono sentito "perso" anch'io le prime volte, ma con il
"trova" e l'inserimento di parole "giuste" ora non mi perdo (quasi) più. E'
che non considero un neofita chi ha già esperienze di programmazione...
Ciao.
--
Sergio MAZZA

 leggere dati da una query o altro
rst = currentdb.openrecordset (tuaquery)
Do while not rst.eof
    var1 = rst(0)
    var2=rst(1)
    varn = rst(n-1)
    'qui fai quello che devi fare perche' e' ovvio che al giro dopo il
valore delle var cambia
    rst.movenext
loop
rst.close
Questo e' uno dei tanti modi...
Saluti.
Luciano

 un campo?
Devi aprire il recordset della query, spostarti al record che ti
interessa e leggere il campo:
Dim RST as Recordset, DataOUT as variant
Set RST=Currentdb.Openrecordset("NomeDellaQuery",db_open_snapshot)
RST.movefirst
(Oppure RST.find per trovare un record specifico... vedi help) 
DataOut=RST!NomeCampo