Newsgroup: it.comp.appl.access
Titolo: Inserimento dati

In un database "AMICI" esiste la tabella "INDIRIZZI" con vari campi
fra i quali il campo 'Nome'
Vorrei, attraverso un form contenente una casella di testo txtNome,
inserire un nominativo, dare conferma sull'esattezza dell'inserimento
e, successivamente, salvare il contenuto di questa casella nella
tabella "INDIRIZZI".
Ovviamente questo é solo un esempio e so che potrei adoperare un
metodo più diretto ma io vorrei usare proprio questo sistema. Spero di
essermi spiegato chiaramente. 
Ho provato diverse tecniche, ma quella per me più confacente é quella
che ho appena illustrato. Mi aiutate con un  esempio riferito a quello
da me esposto?
Ringrazio in anticipo.
Gianni

 ha scritto nel messaggio 
news:s96r41do83hf0ela5...@4ax.com...

Ciao Gianni,
puoi gestire manualmente l'immissione, modifica etc... dei dati
Puoi inserire ad es. 1 pulsante per un controllo sull'immissione...
Sub  pulsante_click()
on error goro GesttioneErrore
Dim nome_da_controllare as string
nome_da_controllare="pippo"
if      nome_da_controllare= Trim$(Me.txtNome) then
       'codice per aprire la tabella ed aggiornare il valore
  else
       Msgbox "nome inesatto...sorry"
 end if
exit sub
GestioneErrore:
          Msgbox "Si è verigicato il seguente errore : " & Err.Description
            Resume next
End sub

 ha scritto nel messaggio 
news:k3h3e.723439$b5.32...@news3.tin.it...

Codice per aggiornare una tabella archiviando 1 nuovo dato
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("tb")
rs.AddNew
rs!Nome= Trim$(Me.txtNome)
rs!altrocampo= valoredaaggiungere
e così via per tutti i campi
rs.Update
rs.Close
Set rs = Nothing
Set db = Nothing
MsgBox "Registrazione effettuata con successo" 



Grazie Gaspare, ma non funziona. Mi da il seguente errore:
Dim db As Database
Tipo definito dall'utente non definito
Gianni

 ha scritto nel messaggio 
news:lqhs41dgqdeqjfsjj...@4ax.com...

togli quella riga ed utilizza direttamente questa
Set rs = db.OpenRecordset("nometabella") 

 ha scritto nel messaggio 
news:LOr3e.1154699$35.42...@news4.tin.it...

pardon...set db= CurrentDb 


Ora mi da questo errore:
Errore: tipo non corrispondente
sulla riga 
Set rs = db.OpenRecordset("Tipologie")
forse in riferimento all'istruzione = db.openrecordset......?
Ti prego di avere ancora pazienza. Dammi una mano per favore.
Ciao, Gianni


wrote:

Gaaaaaaaaaspareeeeeeeeee......

 Ciao, Gianni
Ti mancano i Riferimenti DAO 3.6 nelle librerie.
Dalla barra Meù della Finestra del Codice vai in:
Strumenti--->Riferimenti e cerca Microsoft DAO 3.6
Ovviamente non sò se usi anche ADO a quel punto per
sicurezza quando dichiari tipi di Variabili Oggetto
appartenenti alla libreria Esplicita anche la Libreria:
Dim rs As DAO.Recordset
Ciao
@Alex



Ciao Alex. Intanto grazie per la risposta, proverò più tardi ad
utilizzare il sistema da te proposto. Volevo però approfittare per
dirti che ho seguito il tuo consiglio di rivolgermi al NG (invece che
a te personalmente) e  l'unico che ha risposto alle mie domande é
stato Gaspare che, ad un certo punto,  mi ha mollato dicendomi che mi
avrebbe aiutato solo per sviluppre il codice a pagamento. Che
delusione!
A presto