Bonjour à toutes, bonjours à tous,

Je vous expose mon problème :

Citation Envoyé par WinRar

C:\ClasseurZippé.rar: Impossible d'ouvrir C:\Documents
Le fichier spécifié est introuvable.
C:\ClasseurZippé.rar: Impossible d'ouvrir and
Le fichier spécifié est introuvable.
C:\ClasseurZippé.rar: Impossible d'ouvrir Settings\Boux2\Bureau\doc.pdf
Le chemin d'accès spécifié est introuvable.
après l'execution du code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Declare Function ShellExecute Lib "shell32.dll" Alias _
       "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation _
       As String, ByVal lpFile As String, ByVal lpParameters _
       As String, ByVal lpDirectory As String, ByVal nShowCmd _
       As Long) As Long
Sub testZip()
Dim Zippeur$, Archive$, Source$
  Zippeur = "C:\Program Files\WinRAR\WinRAR.exe"
  Archive = "C:\ClasseurZippé.rar"
  Source = "C:\Documents and Settings\Boux2\Bureau\doc.pdf"
'  'création de l'archive
  ShellExecute 0, "open", Zippeur, _
      "a " & Archive & " " & Source, "", vbHide
 
End Sub
et je ne comprend pas pourquoi.

A noter que si Source = "C:\doc.pdf" winRar fonctionne bien comme il faut, j'en conclu à un problème d'espace ...

Autre question j'aimerais savoir si je fais une procédure qui créer une archive et quelle ne touve pas WinRar d'installer comment utiliser (Quel est le chemin ?) de l'outils windows XP de base ?

Merci de bien vouloir me répondre.