Discussion :

[dellalyoussef]

Bonjour,

J'ai essayer d'ajouter des enregistrement dans une table a partir d'une formulaire, mais le problème est que le code ne fonction pas et me générer une erreur:

les champ de la table:

Date Date/Heure Date, abrégé
Client Texte court
DUM Texte court
Devis Monétaire

Et le formulaire avec des cboS suival:

cboDateDe
cboDateA
cboClient
cboDum
cboDevis

Btn: btnOk avec le code suivant:

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub btnOk_Click()
Dim db As DAO.Database
Dim sql As String
Set db = CurrentDb
sql = "INSERT INTO tblDevis ( [Date], Client, Dum, Devis ) " _
    & "VALUES (tblDevis.[Date])= " & Me.cboDatede.Value & ",(tblDevis.[Client])= " & Me.cboClient.Value & ",(tblDevis.[Dum])= " & Me.cboDum.Value & ",(tblDevis.[Devis])= " & Me.cboDevis.Value & ";"
DoCmd.RunSQL sql
Set db = Nothing
End Sub

d'autre part, j'ai besoin de développer ce code pour que l'heur que j'ai remplie de cboDateA, les donner sont saies répétitive jusqu'à la date déclaré dans cet combo box.

Est ce que il a une support dans ce sens?

Salutations

Dellal

[accessisgood]

Bonjour,

ne serait il pas possible de relier ton formulaire à une table?

[dellalyoussef]

Bonjour,

J'ai résolu le problème de la saisie, il fonctionne correctement avec se code:

Code :

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

1
2
3
4
5
6
7
8
9
rivate Sub btnOk_Click()
Dim db As DAO.Database
Dim sql As String
Set db = CurrentDb
sql = "INSERT INTO tblDevis ( [Date], Client, Dum, Devis ) " _
    & "VALUES ('" & Me.cboDatede.Value & "','" & Me.cboClient.Value & "','" & Me.cboDum.Value & "','" & Me.cboDevis.Value & "');"
DoCmd.RunSQL sql
Set db = Nothing
End Sub

il me reste que comment je peut insérer l'information pour une période ci la combo box cboDateA est éditer, par exmaple



j'ai besoin que l'information saisie donne le formulaire sera répéter pour les dates de 22/12 a 29/12

merci

[dellalyoussef]

Bonjour,

est ce que j'ai pu avoir une support concernant le code pour la duplication d'une formulaire entre une intervalle date?

Merci