Pour me connecter sur un serveur partagé, j'utilise l'API :
WNetAddConnection2.
Le mappage s'effectue correctement
mais, dans la suite de mon programme VBA, je ne peux ouvrir les fichiers
distants (via Application.FileSearch.Execute).
Il faut que je ferme mon classeur EXCEL, puis que je relance l'appli -sans
appeler cette API, puisque le serveur est toujours mappé.
Y-a-t-il quelque part un paramètre caché qu'il faudrait positionner comme il
faut, pour que le FileSearch fonctionne du 1er coup ?
(alors qu' en dééroulant en pas à pas, dès que l'API est exécutée,, je vois
bien dans l'Explorateurla lettre affectée au serveur, et je peux ouvrir des
fichiers distants !!!).
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
FxM
Bonsoir,
Pour me connecter sur un serveur partagé, j'utilise l'API : WNetAddConnection2. Le mappage s'effectue correctement mais, dans la suite de mon programme VBA, je ne peux ouvrir les fichiers distants (via Application.FileSearch.Execute). Il faut que je ferme mon classeur EXCEL, puis que je relance l'appli -sans appeler cette API, puisque le serveur est toujours mappé.
Y-a-t-il quelque part un paramètre caché qu'il faudrait positionner comme il faut, pour que le FileSearch fonctionne du 1er coup ? (alors qu' en dééroulant en pas à pas, dès que l'API est exécutée,, je vois bien dans l'Explorateurla lettre affectée au serveur, et je peux ouvrir des fichiers distants !!!).
Merci de toutes vos bonnes idées
Mouspi
Bonsoir,
As-tu essayé en passant par net use ? Exemple à améliorer car il laisse une fenêtre DOS à fermer: Sub test() txt = "net use z: pavilionf /yes" Shell txt 'je joue avec les fichiers txt = "net use z: /delete" Shell txt End Sub
@+ FxM
Bonsoir,
Pour me connecter sur un serveur partagé, j'utilise l'API :
WNetAddConnection2.
Le mappage s'effectue correctement
mais, dans la suite de mon programme VBA, je ne peux ouvrir les fichiers
distants (via Application.FileSearch.Execute).
Il faut que je ferme mon classeur EXCEL, puis que je relance l'appli -sans
appeler cette API, puisque le serveur est toujours mappé.
Y-a-t-il quelque part un paramètre caché qu'il faudrait positionner comme il
faut, pour que le FileSearch fonctionne du 1er coup ?
(alors qu' en dééroulant en pas à pas, dès que l'API est exécutée,, je vois
bien dans l'Explorateurla lettre affectée au serveur, et je peux ouvrir des
fichiers distants !!!).
Merci de toutes vos bonnes idées
Mouspi
Bonsoir,
As-tu essayé en passant par net use ?
Exemple à améliorer car il laisse une fenêtre DOS à fermer:
Sub test()
txt = "net use z: \pavilionf /yes"
Shell txt
'je joue avec les fichiers
txt = "net use z: /delete"
Shell txt
End Sub
Pour me connecter sur un serveur partagé, j'utilise l'API : WNetAddConnection2. Le mappage s'effectue correctement mais, dans la suite de mon programme VBA, je ne peux ouvrir les fichiers distants (via Application.FileSearch.Execute). Il faut que je ferme mon classeur EXCEL, puis que je relance l'appli -sans appeler cette API, puisque le serveur est toujours mappé.
Y-a-t-il quelque part un paramètre caché qu'il faudrait positionner comme il faut, pour que le FileSearch fonctionne du 1er coup ? (alors qu' en dééroulant en pas à pas, dès que l'API est exécutée,, je vois bien dans l'Explorateurla lettre affectée au serveur, et je peux ouvrir des fichiers distants !!!).
Merci de toutes vos bonnes idées
Mouspi
Bonsoir,
As-tu essayé en passant par net use ? Exemple à améliorer car il laisse une fenêtre DOS à fermer: Sub test() txt = "net use z: pavilionf /yes" Shell txt 'je joue avec les fichiers txt = "net use z: /delete" Shell txt End Sub
@+ FxM
mouspi
Merci FxM, c'est tout bon !!! "FxM" a écrit dans le message de news:
Bonsoir,
Pour me connecter sur un serveur partagé, j'utilise l'API : WNetAddConnection2. Le mappage s'effectue correctement mais, dans la suite de mon programme VBA, je ne peux ouvrir les fichiers distants (via Application.FileSearch.Execute). Il faut que je ferme mon classeur EXCEL, puis que je relance l'appli -sans appeler cette API, puisque le serveur est toujours mappé.
Y-a-t-il quelque part un paramètre caché qu'il faudrait positionner comme il faut, pour que le FileSearch fonctionne du 1er coup ? (alors qu' en dééroulant en pas à pas, dès que l'API est exécutée,, je vois bien dans l'Explorateurla lettre affectée au serveur, et je peux ouvrir des fichiers distants !!!).
Merci de toutes vos bonnes idées
Mouspi
Bonsoir,
As-tu essayé en passant par net use ? Exemple à améliorer car il laisse une fenêtre DOS à fermer: Sub test() txt = "net use z: pavilionf /yes" Shell txt 'je joue avec les fichiers txt = "net use z: /delete" Shell txt End Sub
@+ FxM
Merci FxM, c'est tout bon !!!
"FxM" <nullos@greuchmeu.ici> a écrit dans le message de news:
u4cXiR38EHA.3616@TK2MSFTNGP11.phx.gbl...
Bonsoir,
Pour me connecter sur un serveur partagé, j'utilise l'API :
WNetAddConnection2.
Le mappage s'effectue correctement
mais, dans la suite de mon programme VBA, je ne peux ouvrir les fichiers
distants (via Application.FileSearch.Execute).
Il faut que je ferme mon classeur EXCEL, puis que je relance
l'appli -sans appeler cette API, puisque le serveur est toujours mappé.
Y-a-t-il quelque part un paramètre caché qu'il faudrait positionner comme
il faut, pour que le FileSearch fonctionne du 1er coup ?
(alors qu' en dééroulant en pas à pas, dès que l'API est exécutée,, je
vois bien dans l'Explorateurla lettre affectée au serveur, et je peux
ouvrir des fichiers distants !!!).
Merci de toutes vos bonnes idées
Mouspi
Bonsoir,
As-tu essayé en passant par net use ?
Exemple à améliorer car il laisse une fenêtre DOS à fermer:
Sub test()
txt = "net use z: \pavilionf /yes"
Shell txt
'je joue avec les fichiers
txt = "net use z: /delete"
Shell txt
End Sub
Merci FxM, c'est tout bon !!! "FxM" a écrit dans le message de news:
Bonsoir,
Pour me connecter sur un serveur partagé, j'utilise l'API : WNetAddConnection2. Le mappage s'effectue correctement mais, dans la suite de mon programme VBA, je ne peux ouvrir les fichiers distants (via Application.FileSearch.Execute). Il faut que je ferme mon classeur EXCEL, puis que je relance l'appli -sans appeler cette API, puisque le serveur est toujours mappé.
Y-a-t-il quelque part un paramètre caché qu'il faudrait positionner comme il faut, pour que le FileSearch fonctionne du 1er coup ? (alors qu' en dééroulant en pas à pas, dès que l'API est exécutée,, je vois bien dans l'Explorateurla lettre affectée au serveur, et je peux ouvrir des fichiers distants !!!).
Merci de toutes vos bonnes idées
Mouspi
Bonsoir,
As-tu essayé en passant par net use ? Exemple à améliorer car il laisse une fenêtre DOS à fermer: Sub test() txt = "net use z: pavilionf /yes" Shell txt 'je joue avec les fichiers txt = "net use z: /delete" Shell txt End Sub
