Newsgroup: it.comp.appl.access
Titolo: Ripetere record precedente........

Salve a tutti!
purtroppo il suggerimento, sul grande sitocomune, proposto da Federico 
LUCIANI, ahimč, a me non funge! :-(
dove sbaglio?
Grazie anticipatamente. 


Ciao Mark,
devi ripetere in un controllo il record precedente ? Non ho controllato la
faq del Sc, ma prova in questo modo :
su current della tua form ci scrivi :
On Error GoTo errori
Dim rst As DAO.Recordset
Set rst = Me.RecordsetClone
rst.bookMark = Me.bookMark
rst.MovePrevious
Me!TuaTextBoxRecPrec = rst("TuaTextBoxRecAttuale")
set rst=nothing
Exit_DelCurrentRecord_Click:
    Exit Sub
errori:
       If Err.Number = -
2147352567
 Then Me!TuaTextBoxRecPrec =
Me.TuaTextBoxRecAttuale
   Resume Exit_DelCurrentRecord_Click
Adatta i nomi al tuo caso
Ciao, Sandro

 Ciao, Sandro
Grazie per l'attenzione ma.........purtroppo il tuo codice funge solo se si 
passa al record senza aggiornare " a vista " . Cioč: bisogna andare ancora 
avanti e poi tornare indietro per vedere se ha inserito il valore del 
precedente record.
Ho provato in tutti gli altri eventi ma.....nisba!
Grazie ancora,
Marco.

 Marco.
Ciao Marco,
con una query con subQuery ?
SELECT TuaTab.id, nz((select id from TuaTAb as pippo where
TuaTab.id-1=
pippo.id
),id) AS nrPrec
FROM TuaTab
Ciao, Sandro.
ps. nz lo messo perchè se id è null riporta l'id corrente


Perchč non funge?
cosa scrivi e che tipo di dato č, testo forse?
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it


prova cosě
Tuotesto.beforeupdate = "=" & tuotesto



Ciao, Massimiliano,
dove la inserisco questa istruzione, nel controllo? su quale evento? 
"Tuotesto" mi fa pensare una determinata frase.
Supponiamo che il controllo si chiami servizio e voglio, ad ogni nuovo 
record, che per default questo controllo contenga il valore del controllo 
del record precedente, secondo il tuo consiglio, dovrei inserire, nel 
controllo "servizio", in valore predefinito:
Servizio.beforeupdate="=" & servizio
giusto?
Illuminami.
Grazie anticipatamente per la cortese attenzione.
Marco.
P.S. - In sostanza ho creato una tabella servizi, correlata con una tabella 
dipendenti e, a modo mio, ho risolto il problema di avere (per comodità di 
terzi), tutti i record "a vista", in maschera continua, tipo foglio excel, 
per inserire, a fianco di ogni dipendente, il rispettivo servizio. Per 
quanto possa essere macchinoso (per me che di Visual Basic, ahimè, sono 
ancora a 0), mi sono creato una query di accodamento e, devo dire, che funge 
alla grande!!! Ho una maschera dove inserisco una data e relativo ID 
(tabella movimenti) e una sottomaschera chiamata servizi la quale 
sottomaschera, come già detto, mi presenta tutti i record, relativi all'ID 
della maschera principale e ce li ho tutti "a vista" evitando di dover 
scegliere, da una casella combinata, i dipendenti. Agisco esclusivamente sul 
controllo "servizio" e inserisco i dati.
Problema: ad ogni nuovo record, questa sottomaschera si presenta, 
ovviamente, con il/i contollo/i "servizio" vuoto/i.
E' quì la necessità di avere il dato del precedente record così facendo il 
nuovo record necessiterebbe di sole poche variazioni perchè, la maggior 
parte, ma non sempre, viene confermato sempre il servizio precedente.
Spero sia stato abbastanza chiaro.
Marco.

 Marco.
Scusami ho detto un'imprecisione
Su afetr_update del tuo controllo ci metti
Me.servizio.DefaultValue = "=" & Me.servizio.Value


 ha scritto nel messaggio 
news:djt8dp$jbd$1...@area.cu.mi.it...

No, purtroppo non ci siamo!
L'After update di cosa, del controllo? ma io non devo posizionarmi sul 
controllo servizio. Forse ti riferisci alla maschera su evento AfterUpdate e 
anche cosě, mi dispiace, non succede nulla.
Grazie per la pazienza.
Marco.

 Marco.
Ciao Marco,
con una query con subQuery ?
SELECT TuaTab.id, nz((select id from TuaTAb as pippo where
TuaTab.id-1=
pippo.id
),id) AS nrPrec
FROM TuaTab
Ciao, Sandro.
ps. nz lo messo perchč se id č null riporta l'id corrente
Ok, allora:
TuaTab.id = Servizi.idservizi;
pippo       = servizio
nrprec      = ???
Scusami, ma non capisco.
Grazie ancora.
Marco.

 - 
www.sitocomune.com
   Sezione Forms
      3.2 Ripetere un valore del record precedente in una form.
        Federico Luciani
      (D)
      Come posso evitare di riscrivere lo stesso valore, per un campo, in 
tutti i nuovi records in una form?
      (R)
      Per ripetere un valore del record precedente si puo usare la proprietà 
DefaultValue del controllo.
      Se avete un controllo testo chiamato txtAnno, e volete che ogni volta 
che create un nuovo record venga automaticamente inserito il valore del 
record precedente, allora provate ad inserire il codice seguente nell'evento 
BeforeUpdate del contollo txtAnno:
   Me.txtAnno.DefaultValue =  "'" & Me.txtAnno.Value & "'" 
'(doppioapice-apice-doppioapice)
In questo modo ogni volta che passate al nuovo record (nella form), il 
controllo txtAnno conterrà il valore inserito nel record precedente e sarà 
sempre lo stesso fino a quando non verrà modificato.
      ------------------------------ PERCHE' NON FUNZIONA 
??? -----------------
      Uso Access '97 aggiornato alla 2^ patch - WinXP SP2 - forse manca 
qualche libreria???
      Grazie.
      Marco.