Newsgroup: it.comp.appl.access
Titolo: mettere dato in un campo

Ciao a tutti
Devo inserire un dato in un campo di una tabella.
Conosco:
1) Nome Campo da riempire
2) Record sul quale operare
Come posso fare..?
Sarebbe comodo qualcosa come la funzione dlookup()
che legge il dato.
Io lo devo inserire invece..
Grazie in anticipo
Antc

 ha scritto nel messaggio news:yim%8.108678$Jj7.2...@news1.tin.it...

purtroppo non c'č nulla di cosě semplice come dlookup per scrivere nelle tabelle, comunque:
    Dim rc As DAO.Recordset
    Set rc=CurrentDb.Openrecordset ("MiaTabella") ' Puoi mettere anche un'istruzione SQL invce del semplice nome di tabella
    rc.FindFirst ...  oppure  rc.Move...        ' Usa i metodi Find... o Move... per spostarti sul record che devi modificare
    rc.Edit
    rc![MioCampo] = ...                              ' Assegni il valore al campo che ti interessa
    rc.update
    rc.close
nei riferimenti del progetto deve essere presente la libreria DAO (controlla in particolare se stai usando AccessXP)
Ciao,
Mat.

     Set rc=CurrentDb.Openrecordset ("MiaTabella") ' Puoi mettere anche
un'istruzione SQL
Peccato che questa con access 97, se non ci metti il parametro
dbopendynaset, poi con la findfirst non funziona...
Antonio



currentdb.execute("update ....")
Saluti.
Emanuele.

 ha scritto nel messaggio
news:yim%8.108678$Jj7.2...@news1.tin.it...

Prova con il RunSql (vedi help);
Es.
'--------------
DoCmd.RunSql "UPDATE Ordini SET AmmontareOrdini = AmmontareOrdini *
1.1,[Spese trasporto]  [Spese trasporto] * 1.03 WHERE Paese = 'UK';"
'--------------
Ciao.
--
Sergio MAZZA


...già un vero peccato
Matteo

 ha scritto nel messaggio
news:SUw%8.23337$s74.6...@twister1.libero.it...

Il peccato maggiore poi è quello di fornire pretenziosamente informazioni
incomplete...
Antonio


andrò a confessare i miei peccati, intanto mi scuso con Antc che avrà perso ore ed ore a causa della mia superficialità...
Matteo

 ha scritto nel messaggio
news:ahm325$bof$1...@canarie.caspur.it...


 ha scritto nel messaggio
news:K%z%8.25750$GV2.6...@twister2.libero.it...


 ha scritto nel messaggio
news:K%z%8.25750$GV2.6...@twister2.libero.it...

Ma io ti perdono: purtroppo però mi rendo conto della difficoltà che avranno
incontrato i meno esperti a realizzare la tua soluzione concettualmente
corretta, ma che non funzionava...
Certo, avendo tu notoriamente del tempo da perdere per entrare nei dettagli
spinti dei tuoi suggerimenti, mi meraviglio che tu abbia potuto dimenticare
di riportare questa piccola informativa aggiuntiva!!!
Antonio

 Antc
Potresti fare cosě:
metti il valore della inputbox in una var stringa
poi testa che il valore sia un numero con isnumeric altrimenti ripeti
l'inserimento.
Poi con instr verifica che dentro ci sia solo o il . o la , altrimenti
ripeti l'inserimento.
Se c'č il . usa val per trasformare la stringa in numero decimale,
altrimenti usi la cdbl.
Antonio


Per favore scrivi la tua risposta dopo il testo del messaggio precedente,
come faccio io; grazie.
Ma "Var" come l'hai dichiarata? Poi ti consiglio di cambiargli nome,
potresti scontrarti con parole riservate di Access...
Ciao.
--
Sergio MAZZA


Eh! Eh! Questo sarà il tuo epitaffio...
Ciao.
P.S. Preferivi "...MAZZA Bubù..."
--
Sergio MAZZA

 ha scritto nel messaggio
news:QNN%8.27886$GV2.6...@twister2.libero.it...

Chiedo pubblicamente scusa per l'imperdonabile errore
riguardante il Sig. BISO
-La 'Var' era indicativa. Io la chiamo Detrazione
-Dalla inputbox() esce il numero con la virgola.
-Se uso Cdbl, all'inserimento del numero nel campo
 della tabella ottengo l'errore runtime 3144..!!
 Cordialita' a tutti
Antc

 ha scritto nel messaggio
news:ahoa53$sse$1...@canarie.caspur.it...

Sentite scuse al Sig. BISO
Antc

 ha scritto nel messaggio
news:aho9tr$ss7$1...@canarie.caspur.it...

Ciao S.Mazza
La variabile 'Var' era indicativa.
Si chiama Detrazione, cosi' inizializzata:
Dim Detrazione as double
Ciao ancora e grazie.
Antc

 Antc
--
Sergio MAZZA

 ha scritto nel messaggio
news:kYP%8.137568$vm5.4...@news2.tin.it...

Ma il campo č dichiarato come precisione doppia?
Guarda che cdbl("8,33") da 8,33 quindi non č lě l'errore
cosě come var("8.33") da 8,33
Antonio

 ha scritto nel messaggio
news:WuQ%8.220$n04....@twister2.libero.it...

Il campo e' dichiarato precisione doppia.
Indicavo gia', nella risposta a S.Mazza, che l'errore
proveniva dall'uso di UPDATE...
Grazie e ciao
Antc


Ciao
Antc
Ti ho risposto tra le righe per non perdere il filo
del discorso. Scusami se ti provoca qualche disturbo..
Ciao ancora

 inserendo 12.5 mi aggiorna i dati in 12,50...
Forse inizio a capire...
Io nella inputbox() inserisco no 12.5 ma 12,5....
Puo' essere..?
Se e' cosi', come posso fare per inserire nella inpuibox()
proprio il valore 12, 5  (cioe' con la virgola..)..?
Scusa la mia non praticita'...
Ciao Sergio  e grazie.
Antc

 Ciao ancora
Questa è la prova che ho effettuato:
'--------------
Dim strSQL As String
strSQL = "UPDATE Tabella4 SET Tabella4.numero = " & InputBox("inserire un
numero") & ";"
DoCmd.RunSQL strSQL
'--------------
inserendo 12.5 mi aggiorna i dati in 12,50...
Ciao.
--
Sergio MAZZA

 proprio il valore 12, 5  (cioe' con la virgola..)..?
Non ti avevo gią spiegato che puoi gestire i vari inserimenti con instr?
Antonio

 ha scritto nel messaggio
news:ZJR%8.549$lu5....@twister1.libero.it...

Scusa la mia poca abilita'.
Grazie Antonio
Antc

 ha scritto nel messaggio
news:ahon57$3nf$1...@canarie.caspur.it...

Ciao Sergio
Dopo tutti i tentativi da me fatti, e falliti, oggi ho
scoperto la causa (probabilmente a te, ed ad altri, ovvia...)
Non era un problema di cattivo uso delle funzioni
Inputbox(), Cdbl() e/o Val() ma di una errata sintassi del
dell'istruzione Sql. Mi spiego meglio .
L'istruzione da te suggeritami:
DoCmd.RunSQL "UPDATE Tabella4 SET Tabella4.numero = " & InputBox("inserire
un
numero") & ";"
e da me gia' utilizzata nella forma:
     Dim Detrazione as double
     Detrazione = Cdbl( Inputbox(.....................) )  o Detrazione =
Val( Inputbox(.....................) )
DoCmd.RunSQL "UPDATE Tabella4 SET Tabella4.numero = " & Detrazione & ";"
apparentemente e' corretta   (gli errori li ho segnalati in un post
precedente)
L'errore sta nella mancanza di apici prima e dopo la variabile..!!!!, cioe':
DoCmd.RunSQL "UPDATE Tabella4 SET Tabella4.numero = '" & Detrazione & "';"
 
                    -                            -
*****************************************************************
Ho programmato per 15 anni in Clipper e vi assicuro che e'
di un illogico da far paura...!!!!
Grazie ancora Sergio per l'attenzione e la cortesia
Ciao e buon week end
Antc

 ha scritto nel messaggio
news:SZf09.124627$Jj7.2...@news1.tin.it...

Gli apici vengono utilizzati per inserire testi non numeri; che ne sapevo io
che volevi inserire "12.13" e non 12.13?
Provengo anch'io dal clipper e secondo me non è illogico...
Ciao.
--
Sergio MAZZA

Ciao.
concordo...
Saluti.
Emanuele.