Discussion :

[audrey_]

Bonjour à tous,

pour ouvrir un doc excel qui se trouve sur mon serveur j'utilise :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
set xlapp = Createobject("Excel.Application")
xlapp.workbooks.Open("http://adresse de mon serveur//doc.xls)

Comment tester que "doc.xls" existe vraiment?

par avance, merci.

[pc75]

Bonjour,

Utilise l'objet FileSystemObject et la fonction FileExists()

[ced600]

tu veux faire le test depuis le coté client ou le coté server ?

[audrey_]

je voudrais faire le test depuis le coté client sur le server.
FSO ne marche pas sur le serveur :
fileExists("http...) ne fonctionne pas, il faut forcement mettre "C:/..."

merci pour vos réponses

[pc75]

Re,

Et si tu fais ça ?

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
 
.....
set xlapp = Createobject("Excel.Application")
on error resume next
xlapp.workbooks.Open("http://adresse de mon serveur//doc.xls) 
if Err <> 0 then
   select case Err
      case ???
         msgbox "Doc.xls introuvable"
      case else
         msgbox err.description
   end case
   on error goto 0
end if
.....

[Invité]

Bonjour

Autre solution, gérer l'erreur qui est soulevé lorsque tu veux accéder à ton fichier Excel.

Starec

[audrey_]

merci bcp, grace à ton code, le pb est resolu!