[debutant]base de donnees

Question

Bonjour a tous,

Voila je debute avec visual basic 6....

Je me suis fait une p'tite base de donnees avec des nom et prenoms!

Je voudrais et grace a visual basic inserer des nouveaux nom et prenom!

J'ai donc fait une fiche et place un data1 que j'ai parametre correctement!!!!

ensuite j'ai fait deux champs text nom et prenom  et enfin un bouton valider !!!!

il ne me manque que le code source je pense pour que qd je vais cliquer sur le bouton valider il m'inserer mes donnees ds ma table !!!!!

Si quelqu'un pouvait m'aider !!!!

un grand merci, j'ai essaye de trouve des sources sur ce site et de faire un copie coller mais en vainc!!!!

merci
jimmy

cs_PROGRAMMIX · Answer

Jette un oeil sur les sources du site, ce n'est pas les exemples de code qui manquent.

Fais une petit recherche sur des mots clés comme "Carnet d'adresses", "Base de données", etc.

Programmix

cs_labout · Answer

labout
Pour enregistrer tes données dans la table
Data1.Recordset.AddNew
Data1.Recordset.Fields("Nom").Value = textbox1.Text
Data1.Recordset.Fields("PreNom").Value = textbox2.Text
Data1.Recordset.Update

bmichael007 · Answer

C'est la même chose en ADO?

cs_labout · Answer

labout

Ah non en ADO tout est par requete SQL

bmichael007 · Answer

Donc si je comprends bien, on ne peut faire:
Adodc1.Recordset.Fields("champ1").Value = Text1.text
...............
??

cs_labout · Answer

labout

Non je ne penses pas.
Il faut une requete d'update puis un requery du recordset
Tu as plein d'exemples sur ce site
@+

cs_labout · Answer

labout

Non je ne penses pas.
Il faut une requete d'update puis un requery du recordset
Tu as plein d'exemples sur ce site

Désolé je ne te donnes pas toute la syntaxe car le site merde trop aujourdhui
@+

cs_labout · Answer

labout

Non je ne penses pas.
Il faut une requete d'update puis un requery du recordset
Tu as plein d'exemples sur ce site

Désolé je ne te donnes pas toute la syntaxe car le site merde trop aujourdhui
@+

bmichael007 · Answer

Merci pour ta réponse.
Le problème c'est que je n'arrive absolument pas à Valider un enregistrement créé par un utilisateur.
Mon bouton Ajouter:
Private Sub cmdajouter_Click()

Set rs = New ADODB.Recordset
Set cn = New ADODB.Connection

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\contrat_qualif2000.mdb;Persist Security Info=False"
cn.Open

rs.Open "SELECT max(numformation) as derniernum FROM type_formation", cn, adOpenDynamic, adLockOptimistic
Text1.Text = rs("derniernum") + 1
rs.Close

et Valider:
Private Sub cmdvalider_Click()
rs.Open "SELECT * FROM type_formation", cn
rs.Update

Mais ça me valide pas dans ma base de donnée. A savoir que mon Adodc est bien paramétré sur ma base Access!
Et que les Textbox sont reliés à mon Adodc1...

cs_labout · Answer

labout

Si c'est pour insérer un enregistrement c'est
sReq= _
"Insert into Type_formation (champ1,champ2,champ3)" sReq=sReq & "values('" & sstring & "'"," & nnumerique &",#"
sReq=sReq & ddate & "#)"
cn.execute(sreq)

Notes que pour les champs string il faut des ' 
champs date il faut des # 

Si c'est une Maj il faut
sReq="Update matable set champ2 ='" & sstring & "'"
sreq=sreq & " where champ1 )" & id
Il faut un identificateur unique afin que seul un enreg soit modifié (champ compteur ou autre).
@+

bmichael007 · Answer

Merci pour ces réponses et avec du retard, je retrouve toujours le même problème!!
En rapport avec ton dernier code, comment faire, si l'utilisateur saisit plusieurs données dans des textbox (comme par exemple: nom, prenom, adresse, ville...d'un étudiant et les enregistrer dans la base de donnée)?
Il faut toujours faire un Insert Into?

Merci pour vos lumières!

[debutant]base de donnees

11 réponses

Discussions similaires