XL 2013 Exécuter un transfert dtt vers une machine Iseries

Daniel Desch

XLDnaute Nouveau
Bonjour,

J'ai généré en VBA un tableau Excel à charger sur une machine Iseries, ainsi qu'un module DTT Client Access me permettant de transférer mes données sur AS400.
Maintenant ce que j'aimerais faire c'est exécuter ce module DTT à la fin la macro VBA pour ne pas avoir à demander aux utilisateurs de lancer le transfert eux-mêmes.
(Je précise que les règles de sécurité m'empêchent de passer par des drivers ODBC et que je suis obligé d'utiliser Client Access pour réaliser le transfert)

Le transfert suivant fonctionne en ligne de commande dos :
rxferpcb.exe Fichier.dtt userID password


Mais mon problème c'est que je ne sais pas comment l'écrire en vba, j'ai essayé :
Shell "CMD /K " & """" & "rxferpcb.exe Fichier.dtt userID password" & """"
ou
Shell "CMD /C " & """" & "rxferpcb.exe Fichier.dtt userID password" & """"

Mais je n'arrive pas à trouver la syntaxe exacte qui fonctionne

Merci par avance pour votre aide

Cordialement
 
Dernière édition:

Daniel Desch

XLDnaute Nouveau
Bonsoir,

Je n'ai pas eu de réponse mais finalement il n'y avait pas de problème en tout cas pas de programmation.

Shell "CMD /K " & """" & "rxferpcb.exe Fichier.dtt userID password" & """"

fonctionne très bien en vba sur d'autres PC que le mien.


Le souci était au niveau de la config du poste. J'ai désinstallé puis réinstallé Client Access proprement et maintenant cela fonctionne aussi sur mon PC.


On peut clôturer cette discussion

Cordialement
 

Statistiques des forums

Discussions
312 153
Messages
2 085 799
Membres
102 980
dernier inscrit
brossadan