Probléme avec Access et les requête SQL

 
Poster un nouveau sujet   Répondre au sujet    Forum-Webfolie Index du Forum // aide générale
Voir le sujet précédent :: Voir le sujet suivant  
Auteur Message
Massilia
Occasionnel
Occasionnel


Inscrit le: 01 Jan 1970
Messages: 115
Localisation: au vel'

MessagePosté le: Sam Jan 14, 2006 11:47 pm    Sujet du message: Probléme avec Access et les requête SQL Répondre en citant
Bonjour tout le monde.
alors voilà, j'ai un petit probléme avec visual basic access :
j'ai une base de donnée avec des clients des factures et des produits; quand un client fait une commande il faut que la quantité commander soit retiré des stocks donc de la table "produit", c'est-à-dire, je dois taper une requette SQL dans le code visual basic acces pour faire une mise à jour de cette table à chaque produit commandé donc retirer des stoks.
voici le début du code, à la place des points d'intérrogations il doit y avoir une ou des requettes SQL.


Private Sub Commande6_Click()
 Dim Bd As Database, Rs As Recordset


Set Bd = Application.CurrentDb
    Dim StrReq As String

Set Rs = Bd.OpenRecordset("??????????????), dbOpenDynaset)

   StrReq = "????????????????????.
   
    DoCmd.RunSQL StrReq

Set Rs = Nothing
Set Bd = Nothing



PS : je débute en SQL!
et je pense que la requete doit commencer par "update..."

merci bcp d'avance. Souriant
_________________
NOUS SOMMES LA VOIX, LE COEUR ET LES BRAS DE LA VILLE QUI NOUS A VU NAITRE
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé
mumulafrite
Administrateur
Administrateur


Inscrit le: 01 Jan 1970
Messages: 1260
Localisation: Marseille

MessagePosté le: Ven Jan 27, 2006 2:26 pm    Sujet du message: Répondre en citant
coucou,
dsl pour le retard mais javoue ne pas connaitre le visual basique (mysql oui par contre)

voici ce que jai trouvé:
Citation:
La mise à jour de vos données se fait à l'aide de l'instruction UPDATE.
La syntaxe est la suivante:

UPDATE table SET Colonne='valeur'
WHERE (Critère de recherche)

* L'instruction UPDATE permet de mettre à jour vos données.
o Le mot table représente le nom de la table dans lequel vont être mis à jour des données.
o La clause SET permet d'introduire un critère de recherche.
o Le mot Colonne représente le nom de la colonne dans lequel vont être mis à jour des données.
o Le mot valeur représente la nouvelle valeur.
* La clause WHERE permet d'introduire un critère de recherche.
o Le mot Critère de recherche permet d'effectuer une recherche afin de déterminer quelles données doivent être effacé de la base.


Par exemple:
UPDATE Fichier SET date='20/05/01' WHERE Produit='Lait'
Tous les enregistrements de la colonne date vont être modifié par '20/05/01'. Mais avec la clause WHERE, seul les produits laitiers seront concerné.


Source:lien vers la page web
_________________
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Visiter le site web de l'utilisateur
Massilia
Occasionnel
Occasionnel


Inscrit le: 01 Jan 1970
Messages: 115
Localisation: au vel'

MessagePosté le: Sam Jan 28, 2006 2:36 pm    Sujet du message: Répondre en citant
oui merci mumu!

enfaite j'ai réussi à faire mes 2 requêtes mais elles marche toujours pourtant elles me semblent logique! j'ai cherché pendant 3semaines l'erreure et j'ai perdu espoir.... donc j'ai laissé tomber!
mais je vais quand même la mettre peut que tu me suavera la vie Très content !

Dim Bd As Database, Rs As Recordset

Set Bd = Application.CurrentDb
    Dim StrReq As String

Set Rs = Bd.OpenRecordset("SELECT N°PRODUIT FROM LIGNE_DE_FACTURE WHERE N°FACTURE =" & CStr(Me.N°FACTURE), dbOpenDynaset)

   StrReq = "UPDATE PRODUIT INNER JOIN PRODUIT ON LIGNE_DE_FACTURE.N°PRODUIT = PRODUIT.N°PRODUIT set PRODUIT.QTÉ_STOCK_PDT = [PRODUIT.QTÉ_STOCK_PDT]-[LIGNE_DE_FACTURE.QUANTITÉ_LIGNE_FACT]" & "where LIGNE_DE_FACTURE.N°FACTURE" & Me.N°FACTURE
           
   
    DoCmd.RunSQL StrReq

Set Rs = Nothing
Set Bd = Nothing


dsl pour les nom trop long de mes tables! Embarassé
merci!
_________________
NOUS SOMMES LA VOIX, LE COEUR ET LES BRAS DE LA VILLE QUI NOUS A VU NAITRE
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé
 


Poster un nouveau sujet   Répondre au sujet    Forum-Webfolie Index du Forum // aide générale Toutes les heures sont au format GMT + 2 Heures
Page 1 sur 1

 
Sauter vers:  
Vous ne pouvez pas poster de nouveaux sujets dans ce forum
Vous ne pouvez pas répondre aux sujets dans ce forum
Vous ne pouvez pas éditer vos messages dans ce forum
Vous ne pouvez pas supprimer vos messages dans ce forum
Vous ne pouvez pas voter dans les sondages de ce forum


Hébergé par Mouseimaging

Powered by phpBB © 2001, 2002 phpBB Group
alexisBlue v1.2 // Theme: Andrew Charron // Icons: Travis Carden