Requete et sql
Laprenti2
-
LApprenti2 Messages postés 14 Date d'inscription Statut Membre Dernière intervention -
LApprenti2 Messages postés 14 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
j'ai une base de donnée sous access 2010, en grande partie écrite en vba, langage que je ne maîtrise pas, cette base de donnée à été écrite par un ancien collaborateur,
est ce qu'il possible de transformer une instruction sql en type "mode création":
je voudrais faire l'inverse de ce que fait access quand je créé une requête en mode création et qu'il la converti en mode sql.
' R11
sql = "INSERT INTO tb_" & AGENCE & "_date_entree_negatif ( HIAGE, DEPOT, NOART, DATE_ENT, NCLFO, HIBON, HILIG, HIQTE, HIPRI, HIMTH, TYPHI, HILIA ) SELECT " & AGENCE & "_AHISTOP1.HIAGE, " & AGENCE & "_AHISTOP1.DEPOT, " & _
AGENCE & "_AHISTOP1.NOART, [hilij] & '/' & [hilim] & '/' & [hilis] & [hilia] AS DATE_ENT, " & AGENCE & "_AHISTOP1.NCLFO, " & AGENCE & "_AHISTOP1.HIBON, " & AGENCE & "_AHISTOP1.HILIG, " & AGENCE & "_AHISTOP1.HIQTE, " & AGENCE & "_AHISTOP1.HIPRI, " & _
AGENCE & "_AHISTOP1.HIMTH, " & AGENCE & "_AHISTOP1.TYPHI, " & AGENCE & "_AHISTOP1.HILIA FROM (" & AGENCE & "_AHISTOP1 INNER JOIN " & AGENCE & "_AARTICP1 ON " & AGENCE & "_AHISTOP1.NOART = " & AGENCE & "_AARTICP1.NOART) LEFT JOIN tb_altimat_depot_agence_cession ON (" & _
AGENCE & "_AHISTOP1.HIAGE = tb_altimat_depot_agence_cession.AGEDE) AND (" & AGENCE & "_AHISTOP1.NCLFO = tb_altimat_depot_agence_cession.CESSION) WHERE (((" & AGENCE & "_AHISTOP1.HIAGE)='" & AGENCE & "') AND ((" & AGENCE & "_AHISTOP1.HIQTE)<0) AND ((" & _
AGENCE & "_AHISTOP1.TYPHI)='LVC') AND ((" & AGENCE & "_AHISTOP1.HILIA)=Right(Year(Date()),2)) AND ((" & AGENCE & "_AARTICP1.art32)<>'DIV') AND ((tb_altimat_depot_agence_cession.CESSION) Is Null))"
' msgbox "R11"
DoCmd.RunSQL sql
j'ai essayer en faisans un copie collé dans une requête vierge, çà me jette.
j'ai une base de donnée sous access 2010, en grande partie écrite en vba, langage que je ne maîtrise pas, cette base de donnée à été écrite par un ancien collaborateur,
est ce qu'il possible de transformer une instruction sql en type "mode création":
je voudrais faire l'inverse de ce que fait access quand je créé une requête en mode création et qu'il la converti en mode sql.
' R11
sql = "INSERT INTO tb_" & AGENCE & "_date_entree_negatif ( HIAGE, DEPOT, NOART, DATE_ENT, NCLFO, HIBON, HILIG, HIQTE, HIPRI, HIMTH, TYPHI, HILIA ) SELECT " & AGENCE & "_AHISTOP1.HIAGE, " & AGENCE & "_AHISTOP1.DEPOT, " & _
AGENCE & "_AHISTOP1.NOART, [hilij] & '/' & [hilim] & '/' & [hilis] & [hilia] AS DATE_ENT, " & AGENCE & "_AHISTOP1.NCLFO, " & AGENCE & "_AHISTOP1.HIBON, " & AGENCE & "_AHISTOP1.HILIG, " & AGENCE & "_AHISTOP1.HIQTE, " & AGENCE & "_AHISTOP1.HIPRI, " & _
AGENCE & "_AHISTOP1.HIMTH, " & AGENCE & "_AHISTOP1.TYPHI, " & AGENCE & "_AHISTOP1.HILIA FROM (" & AGENCE & "_AHISTOP1 INNER JOIN " & AGENCE & "_AARTICP1 ON " & AGENCE & "_AHISTOP1.NOART = " & AGENCE & "_AARTICP1.NOART) LEFT JOIN tb_altimat_depot_agence_cession ON (" & _
AGENCE & "_AHISTOP1.HIAGE = tb_altimat_depot_agence_cession.AGEDE) AND (" & AGENCE & "_AHISTOP1.NCLFO = tb_altimat_depot_agence_cession.CESSION) WHERE (((" & AGENCE & "_AHISTOP1.HIAGE)='" & AGENCE & "') AND ((" & AGENCE & "_AHISTOP1.HIQTE)<0) AND ((" & _
AGENCE & "_AHISTOP1.TYPHI)='LVC') AND ((" & AGENCE & "_AHISTOP1.HILIA)=Right(Year(Date()),2)) AND ((" & AGENCE & "_AARTICP1.art32)<>'DIV') AND ((tb_altimat_depot_agence_cession.CESSION) Is Null))"
' msgbox "R11"
DoCmd.RunSQL sql
j'ai essayer en faisans un copie collé dans une requête vierge, çà me jette.
A voir également:
- Requete et sql
- Logiciel sql - Télécharger - Bases de données
- Sql lister les tables ✓ - Forum Programmation
- Requête bloquée par le pare-feu applicatif claranet webfence ✓ - Forum Réseaux sociaux
- Jointure sql ✓ - Forum MySQL
- Erreur lors de l'envoi de la requête facebook - Forum Facebook
3 réponses
bonjour
C'est de la programmation en sql.Difference entre requete et programmation.
Il faudrait modifier et transformer ce code.
un exemple de requete selection en sql
SELECT Patients.N°Patient, Patients.NomPatient, Patients.PrénomPatient, Patients.DateNaissance, Patients.Sexe, Patients.AdressePatient, Patients.CodePostal, Patients.Ville, Patients.N°Téléphone, Patients.N°SS, Patients.TypeDroitsSociaux, Patients.EchéanceSS, Patients.TypeComplémentaire, Patients.EchéanceComplémentaire, Patients.Remarques
FROM Patients;
C'est de la programmation en sql.Difference entre requete et programmation.
Il faudrait modifier et transformer ce code.
un exemple de requete selection en sql
SELECT Patients.N°Patient, Patients.NomPatient, Patients.PrénomPatient, Patients.DateNaissance, Patients.Sexe, Patients.AdressePatient, Patients.CodePostal, Patients.Ville, Patients.N°Téléphone, Patients.N°SS, Patients.TypeDroitsSociaux, Patients.EchéanceSS, Patients.TypeComplémentaire, Patients.EchéanceComplémentaire, Patients.Remarques
FROM Patients;
