chaudier37
Messages postés209Date d'inscriptionjeudi 5 août 2004StatutMembreDernière intervention15 juillet 2009
-
3 mai 2008 à 23:51
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 2018
-
5 mai 2008 à 04:12
Bonjour
J'ai un problème.
j'ai fait un exercice : c'est une table de salariés d'une société de toute la fance.
dans une autre table se trouve les salariés dans une zone de liste modifiable issue de la première table
dans le formaulaire principal, je choisi dans la zone de liste modifaible le salarié, j'entre ses heures de travail pour le mois. et ce que je voudrais c'est qu'à l'issue de cette entrée soit crée une autre table sur le nom du salarié... avec les heures effectuées...
Private Sub Commande2_Click()
MsgBox Form_noms!noms met le nom choisi dans la zone de liste modifable
voilà la création de table que j'ai tenté de faire mais qui ne fonctionne pas
Dim maRequete As String
maRequete = "Create Table & Form_noms!noms & ([" & Form_noms!noms & "] text, montant number)"
Dim heures As Integer, mission As String, jour As Date, mois As Date
Dim i As Integer, a As Integer, b As Integer, c As Integer
jour = InputBox("entrez la date") l'operateur entre une date
a = InputBox("combien de jorus comprends le mois concerné") l'operateur entre le nombre de jours que comprend le mois
Dim h1 As Integer, h2 As Integer, h3 As Integer
h1 = InputBox("entrez le nombre d'heures travaillées dans la mission 1 par " & Form_noms!noms) l'operateur entre le nombre d'heures travaillées par jours pour la mission 1
h2 = InputBox("entrez le nombre d'heures travaillées dans la mission 2 par " & Form_noms!noms) l'operateur entre le nombre d'heures travaillées par jours pour la mission 2
h3 = InputBox("entrez le nombre d'heures travaillées dans la mission 3 par " & Form_noms!noms) l'operateur entre le nombre d'heures travaillées par jours pour la mission 3
For i = 0 To a - 1 boucle de 0 au nombre de jours
Form_noms!Date = jour + i date + jour
Form_noms!mois = jour + i mois
Form_noms!mission = "m1" mission n°1
Form_noms!heures = h1 nombre d'heures effectuées par jour de la mission 1
DoCmd.GoToRecord , , acNext enregistrement suivant
Form_noms!Date = jour + i date + jour
Form_noms!mois = jour + i mois
Form_noms!mission = "m2" mission n°2
Form_noms!heures = h2 nombre d'heures effectuées par jour de la mission 2
DoCmd.GoToRecord , , acNext enregistrement suivant
Form_noms!Date = jour + i date + jour
Form_noms!mois = jour + i mois
Form_noms!mission = "m3" mission n°3
Form_noms!heures = h3 nombre d'heures effectuées par jour de la mission 3
DoCmd.GoToRecord , , acNext nombre d'heures effectuées par jour de la mission 3
Next fin de boucle
DoCmd.SetWarnings False effacement du questionnaire de requête
DoCmd.RunMacro "effacement" macro qui fait ouvrir une requête d'effacement dans la table : les dimanche et les missions du samedi différentes de mission 3
DoCmd.SetWarnings True
End Sub
Voici ce que j'ai fait : c'un un travail qui permet de noter le nombre d'heures par mission et par jour des salariés. tout va bien. sauf que j'aurai voulu que à chaque fois une table concernant le salarié se crée... et donc j'ai suivi votre syntaxe et cela ne fonctionne pas...
la table ne se cree pas...
help... vous pouvez m'aider ? je suis perdue...
merci
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 5 mai 2008 à 04:12
salut,
<li> Vous êtes ici : [infomsg.aspx Thèmes] / [infomsgf_VB-NET-VB-2005_40.aspx VB.NET et VB 2005] / [infomsgt_BASE-DONNEES_235.aspx Base de données] / [infomsgt_SQL_239.aspx SQL] / create trable avec variable</li>
ah bon, t'es sûr que c'est du DotNet çà?...
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp