creation de bouton

Question

c  koi le script pour faire un bouton ajouter, afin d'ajouter des données ds ma base.
ainsi qu'un bouton modifier et supprimer? 
help svp je trouve po

PatriceVB · Answer

tu parles de VB ou VBA Access, précise ta question en indiquant l'outil que utilises et ta config logicielle.
@+

cs_rastatouin · Answer

c pour VB simple 
j'utilise une connection a ma base (odbc) access
c pour un formulaire

Zballl · Answer

Perso j'utilise une commande avec une requete sql (dans ton cas une requete action INSERT INTO...VALUES(...) dans le data environnement.
Avec une requete paramétrée tu ajoute n'importe quoi dans n'importe quelle table avec 1 ligne de code.

Mais c pas la seule solution, loin de là!

-=-     -=-     -=-
PuLP (Zballl comme d'hab ;)
 %-6

cs_rastatouin · Answer

c ce que j'essaye de faire mais jai des erreur de syntaxe je crois, tu pourrai me donner un modele stp
SQL = "INSERT INTO [CLUB] (Num_club,nom_club,adr_club,tel_club) VALUES text1.Text, Text, Text3.Text"

BasicInstinct · Answer

'lut
essaie comme ca:
SQL="Insert into club (Num_club,nom_club,adr_club,tel_club) values ('" & text1.text & "','" & text2.text & "','" & text3.text & "')"

 :clown)  BasicInstinct  :clown)

Zballl · Answer

Ben moi je crée une requete paramétrée
INSERT INTO CLUB
VALUES(?,?,?);

et après un simple appel de la commande
nom_commande text1.text text text3.text

si tu as un champ numauto il ne faut pas tenir compte du param ni dans la commande ni dans l'appel il gère seul

-=-     -=-     -=-
PuLP (Zballl comme d'hab ;)
 %-6

cs_rastatouin · Answer

merci les gars c cool, c koi la syntaxe pour un delete et un update svp

Zballl · Answer

DELETE FROM NOM_TABLE
WHERE condition;

UPDATE nom_table
   SET liste_colonne_valeur
WHERE condition;

-=-     -=-     -=-
PuLP (Zballl comme d'hab ;)
 %-6

BasicInstinct · Answer

SQL="Delete from Matable where MonId=" & NumeroId
sql="Update Matable set MonChamp1=" & MaValeur1 & " ,MonChamps2=" & Mavaleur2 & " where MonId=" & NumId

Si tes champs sont de type texte, il faut encadrer les valeur par des '    (Voir 1er exemple)
si c'est des date, encadrer les valeur par des # & faire attetion au format:
access par exemple enregistre les dates au format americain MM/DD/YYYY
dc si tu lui mets 02/04/2003, il comprend 4 fevrier au lieu de 2 avril (ca y'en a etre genant)

 :clown)  BasicInstinct  :clown)

cs_rastatouin · Answer

il me creer un bp au nivo de la "," pourkoi??
SQL = "Delete from CLUB where Num_club='" & Combo1.Text & "', nom_club='" & Text1.Text & "', adr_club='" & Text2.Text & "', tel_club='" & Text3.Text & "'"
ExecRequete (SQL)

BasicInstinct · Answer

parce que tu es dans le WHERE :))

remplance ta virgule par AND  (attention aux espaces)
 :clown)  BasicInstinct  :clown)

cs_rastatouin · Answer

oki c bon jai trouver merci
pour la suite lol le update, vb me pose pb il n'accepte po ma requete ??
SQL = "Update CLUB set Num_club=" & Combo1.Text & " ,nom_club='" & Text1.Text & " ', adr_club='" & text2.Text & "', tel_club='" & text3.Text &"' where Num_club='" & combo1.text&"'"
ExecRequete (SQL)

merci de votre patience je debute lol :)

cs_rastatouin · Answer

j'ai aussi une combo box que j'alimente par un bouton et je voudrai qu'elle se vide a chaque alimentation? comment faire???

cs_rastatouin · Answer

il fau koi en fin d'instruction?? un " non?

cs_rastatouin · Answer

j'ai trouver c bon

cs_rastatouin · Answer

comme metter a blanc une liste box?

BasicInstinct · Answer

pour la vider: combo1.clear
pour la mettre rien : combo1.text=""
sauf si ton style =2 , ou dans ce cas la if faut rajouter le blank a ta liste: combo.additem "" pour pouvoir le faire

 :clown)  BasicInstinct  :clown)

cs_rastatouin · Answer

c possible de faire un update sur 2 table en meme tps

BasicInstinct · Answer

non.
faut faire 2 requetes :)

 :clown)  BasicInstinct  :clown)

Creation de bouton

19 réponses

Discussions similaires