Discussion :

[sooprano]

salut je devloppe en vb6 mon Probleme c'est ke j'ai pas fais mon sql mais l'incrémentation auto ne se fait pas voila Mon sql en base de donnée je l'ai déclarer le champs Mat en Auto increment

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private sub command1_click()
va = MsgBox("Voulez Vous Vraiment Valider???", vbYesNo + vbInformation, "Validation")
If va = 6 Then
d = Format(Label4, "dd/mm/yyyy")
SQL = " insert into Commande (Date_cde ,Numc_cde) " & _
" values( ,#" + d + "# ,'" + Combo1 + "')"
Base.Execute SQL
End If
end sub

j'espere que vous m'aider sur Ca? Merci

[infosteph]

Salut,

1) C'est quoi ta base de données ?
2) Tout les colonnes de tables "Commande" ?

3) Ecrit plutôt ça, c'est plus propre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
If MsgBox("Voulez Vous Vraiment Valider???", vbYesNo + vbInformation, "Validation") = vbYes Then
    Base.Execute "insert into Commande (Date_cde ,Numc_cde) values('" & Format(Label4.Caption, "yyyy/mm/dd") & "','" & Combo1.Text & "')"
End if

[sooprano]

ma base de donnée s'appele GESTION COMMANDE ainsi j'ai une table Commande qui porte 3 champs l'un est de type autoIncrement et j vx l afficher automatiquement dans label5 pourez vous m aider sur ca?

ah dsl Les champs du table Command est Num_cde , Date_cde , Numc_cde ("N°client")
remarque
n°client est clé etrangere

[infosteph]

Salut,

1) C'est quoi ta base de données ?
[/CODE]

Je précise, pas le nom de la base mais le SGBD :
Sybase, Oracle, SQL Server, ...

@+

[infosteph]

Si je comprendsn bien,

Dans ta table client l'identifiant s'incrémente mais dans ta commande il reste à la valeur par défaut ?

Cela peut être normal sachant que dans commande ton n°client est une clé étrangère.

L'incrémentation automatique se fait juste sur la colonne de la ta client, à toi de mettre à jour le n°client dans ta commande.

@+

[sooprano]

non c'est pa le client qui est AutoIncrement bon Ma base donnée est creer dans Visual basic bdd.mdb(access)
le Matricule est declarer AutoIncrement Alors j'veux qu'il m'affiche l'incrementation Automatiquement Dans Label5 En utilisant Ce Sql

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private sub command1_click()
va = MsgBox("Voulez Vous Vraiment Valider???", vbYesNo + vbInformation, "Validation")
If va = 6 Then
d = Format(Label4, "dd/mm/yyyy")
SQL = " insert into Commande (Date_cde ,Numc_cde) " & _
" values( ,#" + d + "# ,'" + Combo1 + "')"
Base.Execute SQL
End If
end sub

remarque
dans sql en faisant ca "values( ,)"
ca vx dire Prendre en consideration Le Matricule ki est declarer dans la table Command AutoIncrement il Dois M'afficher par defaut Le 1 et quand je valide
il dois M'afficher le 2 Et ainsi d suite j'espere ke tu ma compris