bonjour,
voila jais une fonction qui plante (la commande docmd.runcommand impossible
a poursuivre,
juste apres l'importation qui marche mais pas le renomage ca plante je ne
comprend pas).
Function importation_filmaker()
On Error GoTo importation_filmaker_Err
' supression du conditionement
DoCmd.OpenQuery "Sup COND001", acViewNormal, acEdit
' mise en form du conditionement
DoCmd.OpenQuery "mise en form COND001", acViewNormal, acEdit
' sup de tarif
DoCmd.OpenQuery "sup_TARIFNEW", acViewNormal, acEdit
' sup de cond
DoCmd.OpenQuery "sup_TARIFNEW_OLD", acViewNormal, acEdit
' import de cond
DoCmd.OpenQuery "cond(import penelope XLS)", acViewNormal, acEdit
' import de tarif
DoCmd.OpenQuery "tarif(import penelope XLS)", acViewNormal, acEdit
' sup LBA_ARTICLE2 avant creation
DoCmd.DeleteObject acTable, "LBA_ARTICLE2"
' sup LBA_PRODUIT1 avant creation
DoCmd.DeleteObject acTable, "LBA_PRODUIT1"
' import File Maker
DoCmd.RunCommand acCmdImport
' Renomage de la table utilsarticle
DoCmd.Rename "LBA_ARTICLE2", acTable, "Utilarticle"
' Renomage de la table utilsproduit
DoCmd.Rename "LBA_PRODUIT1", acTable, "UtilProduit"
' Renomage de la table utildetails
DoCmd.Rename "LBA_SPECIALE", acTable, "Utildetails"
' ouverture de la table article & sup des lignes
DoCmd.RunSQL "delete * from lba_article", -1
' ouverture de la table produits & sup des lignes
DoCmd.RunSQL "delete * from lba_produit", -1
' suite du traitement
' requette (sup article new) supression du contenue de la table article
new
DoCmd.OpenQuery "sup article new", acViewNormal, acEdit
' concatener et modification
DoCmd.OpenQuery "UP LBA-ART2", acViewNormal, acEdit
' ajout des article (ajouts produits lba_article2)
DoCmd.OpenQuery "ajout des produits(lba_article2)", acViewNormal,
acEdit
' requette trans1
DoCmd.OpenQuery "transt1(ajout des tarif et article a article new)",
acViewNormal, acEdit
' supression du contenue de la table LBA_ARTICLE
DoCmd.OpenQuery "sup LBA_ARTICLE", acViewNormal, acEdit
' requette (trans2 ajout des article avec tarif) sur LBA-ARTICLE
DoCmd.OpenQuery "trans2(ajout des tarif et article a LBA_ARTICLE)",
acViewNormal, acEdit
' supression du chiffrement de la remise client
DoCmd.OpenQuery "DelCalRemises", acViewNormal, acEdit
' affectation de la remises client
DoCmd.OpenQuery "CalRemises", acViewNormal, acEdit
' ajouts des produits ajout des produits(lba_produit1)
DoCmd.OpenQuery "ajout des produits(lba_produit1)", acViewNormal, acEdit
' mise a jour si pas d'images
DoCmd.OpenQuery "mise ajour pas d'images", acViewNormal, acEdit
' mise a jours du chemin de fer
DoCmd.OpenQuery "mise a jours du chemin de fer", acViewNormal, acEdit
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
pgz
Bonjour,
Finalement, ça plante sur le 'RunCommand' ou sur le 'Rename'?
RunCommand exécute une simple commande d'interface et l'opérateur est obligé de continuer l'importation " à la main". Si tu veux automatiser un peu plus regarde du côtéd de 'TransfertDataBAse'. Je suis sûr que cela va t'intéresser.
Bonne journée, pgz
Bonjour,
Finalement, ça plante sur le 'RunCommand' ou sur le 'Rename'?
RunCommand exécute une simple commande d'interface et l'opérateur est obligé
de continuer l'importation " à la main". Si tu veux automatiser un peu plus
regarde du côtéd de 'TransfertDataBAse'. Je suis sûr que cela va t'intéresser.
Finalement, ça plante sur le 'RunCommand' ou sur le 'Rename'?
RunCommand exécute une simple commande d'interface et l'opérateur est obligé de continuer l'importation " à la main". Si tu veux automatiser un peu plus regarde du côtéd de 'TransfertDataBAse'. Je suis sûr que cela va t'intéresser.
