× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 Corriger un code sql qui me donne toujours une erreur
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Guy FALESSE
  Posté le 16/01/2018 @ 17:31 
Aller en bas de la page 
Petit astucien

Je voudrais ouvrir un formulaire qui contiendrait certains champs dont un total qui serait obtenu à l'aide d'un champ date.

D'avance merci

Guy FALESSE

Publicité
Guy FALESSE
 Posté le 16/01/2018 à 17:37 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

je ne vois pas où je peux mettre mon code

Merci,

Guy FALESSE

Guy FALESSE
 Posté le 17/01/2018 à 11:21 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour,

Je ne sais si quelqu'un m'a vu, mais à tout hasard, je mets mon code erroné ici

D'avance merci

Private Sub Commande60_Click()
Dim monSQL As String, ResultFrm As Form
monSQL = "SELECT tblCommissions.DateAchat, tblCommissions.Magasin, tblCommissions.Articles, tblCommissions.PrixUnit, tblCommissions.Qté, tblCommissions.Marque, tblCommissions.TotArticle FROM tblCommissions _
&" WHERE tblCommissions.DateAchat.dateAdd="q" _
& DoCmd.OpenForm "ResultFrm" _
& docmd.ResultatFrm.recordSource=monSql
End Sub

Guy FALESSE

Titus68
 Posté le 19/01/2018 à 18:18 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Je pense que tu as dû trouver depuis mais çà n'est pas plutôt :

Private Sub Commande60_Click()

Dim monSQL As String, ResultFrm As Form

monSQL = "SELECT tblCommissions.DateAchat, tblCommissions.Magasin, tblCommissions.Articles, tblCommissions.PrixUnit, tblCommissions.Qté, tblCommissions.Marque, tblCommissions.TotArticle FROM tblCommissions " & _

" WHERE tblCommissions.DateAchat.dateAdd='q' "

DoCmd.OpenForm "ResultFrm"

docmd.ResultFrm.recordSource=monSql

End Sub

tblCommissions.DateAchat.dateAdd='q' çà me parait bizarre : dateAdd mais ajout à la date quoi ?

Pour la syntaxe ci-dessous je ne connais pas trop :

DoCmd.OpenForm "ResultFrm"

docmd.ResultFrm.recordSource=monSql



Modifié par Titus68 le 19/01/2018 18:21
Guy FALESSE
 Posté le 19/01/2018 à 19:20 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Salut,

Merci pour ta réponse.

Mais, je suis en panne d'Access, donc, de toute manière, je ne saurais pas tester.

Tiens, avant, on avait la possibilité de mettre son code dans un cadre, mais comme je vois, on ne sait plus ou bien, il y a encore une manipulation à faire.

Dans mon access10 j'ai sans arrêt erreur de compilation la fonction, une des mienne ou celle de Access.

Je vais essayer de demander un nouveau DVD, je ne sais pas si ça marchera.

Bonne soirée.

Guy FALESSE

Titus68
 Posté le 19/01/2018 à 23:31 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Je n'utilise pas access mais le langage ressemble à du visual basic.

Comme tous les langages de programmation il faut respecter scrupuleusement la syntaxe sinon le compilateur n'est pas très heureux.

Pour la procédure que tu indiquais, à mon avis, d'un point de vue syntaxe visual basic il y avait bien des erreurs.

Est-ce qu'access ne t'indique pas explicitement la ligne sur laquelle il rencontre l'erreur et un commentaire assez compréhensible quand tu as une erreur en vue de la corriger ?

Peux-tu indiquer le message exact d'erreur que tu as ?

Guy FALESSE
 Posté le 20/01/2018 à 09:42 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Salut Titus68,

Merci pour ta réponse.

Malheureusement, Access déconne à mort et je n'ai que des erreurs, quelle que soit la fonction que j'emploi, j'ai le message: compilation erreur.

Ça ne m'arrange pas du tout, on dirait que j'ai chopé un virus qui a bousillé Access, mais, l'antivirus n'a rien trouvé, alors....

Je vais devoir tout réinstallé Office si toutefois je n'ai pas encore d'erreur.

J'ai la version officielle de Office10.

Au fait, c'est bien du Visual basic concernant ma demande sql

J'espère que je pourrai me dépanner et en tout cas, merci.

Guy FALESSE

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
29,99 €Ensemble clavier + souris sans fil Logitech MK270 à 29,99 €
Valable jusqu'au 08 Juin

Amazon fait une promotion sur l'ensemble clavier + souris sans fil Logitech MK270 qui passe à 29,99 € livré gratuitement alors qu'on le trouve habituellement autour de 35 €. Cet ensemble est composé d'un clavier sans fil Logitech avec des touches silencieuses et d'une souris sans fil adaptée à la forme de la main qui convient aux droitiers comme aux gauchers. Un seul récepteur USB vous permettra d'utiliser ces 2 périphériques sans fil. 


> Voir l'offre
149 €Caméra sportive GoPro HERO7 White à 149 €
Valable jusqu'au 08 Juin

Leclerc fait une promotion sur la caméra sportive GoPro Hero 7 White qui passe à 149 € au lieu de 219 €. Cette caméra est étanche 10m sans boitier, peut filmer en 2K et en FullHD 1080p à 60 images/s et dispose d'un écran tactile 2 pouces. Elle intègre le WiFi et  les commandes vocales.


> Voir l'offre
580,99 €Disque dur externe Western Digital My Book Duo 24 To USB 3.1 à 580,99 €
Valable jusqu'au 10 Juin

Amazon propose actuellement le disque dur externe Western Digital My Book 24 To USB 3.1 à 580,99 € livré gratuitement alors qu'on le trouve ailleurs à partir de 800 €. Le My Book Duo est une solution de stockage RAID de bureau d’une très grande capacité, idéale pour stocker des photos, des vidéos, des documents et de la musique. Vous pourrez l'utiliser en mode RAID 0 pour des perfomances ultrarapides (vitesse de lecture séquentielle pouvant atteindre 360 Mo/s) ou bien en mode RAID 1 pour bénéficier d’une redondance et mettre vos données en miroir sur les disques durs installés dans le boîtier. Ce dernier comporte en effet 2 disques durs Western Digital RED de 12 To adaptés aux NAS et qui peuvent être récupérés pour être utilisés ailleurs. Sachant qu'un disque dur RED 12 To coûte au moins 450 €, l'achat du Western Digital My Book Duo 24 To peut aussi être une solution économique si vous avez besoin de 2 disques durs 12 To pour votre NAS.


> Voir l'offre

Sujets relatifs
Erreur dans code
erreur dans code
erreur dans mon code Vba
code erreur 0xC00CEE2D
comment pour corriger cette erreur #VALEUR!
windows live messenger code erreur
seven code erreur
Signification code erreur openoffice base
Probleme sur code vba
Proteger fichier XLSM par code VBA
Plus de sujets relatifs à Corriger un code sql qui me donne toujours une erreur
 > Tous les forums > Forum Bureautique