Discussion :

[micka180]

Bonjour,

mon script fait appel à de l'excel.
je dois l'executer depuis le serveur d'entreprise, mais voila l'oject excel ne peut pas etre créé car office n'est pas installé sur le serveur (normal).

ma question y a t'il une combine comme une DLL à placer ou autre chose pour povoir l'executer ?

Merci d'vance pour votre aide

[ced600]

Je ne pense pas, je pense que tu es obligé de l'installer.
S'il y a une combien, tu la trouveras sur le site de microsoft.

[micka180]

en utilisant un ADO et en convertissant le .xls en .CSV, penses tu que se soit realisable ?

[ced600]

Je crois qu'il va falloir que tu explicites ce que tu veux dire par :

mon script fait appel à de l'excel.

[micka180]

voila, le script doit tourner sur serveur win2003, il fait appel à un fichier .XLs situé sur un autre serveur.

le script scan des log et en fonction des logs il ouvre le fichier excel et ecrit une valeur à l'interieur.

voila un morceau de code pour ma methode de connexion.

Code :

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

1
2
3
4
Set xlapp = CreateObject("Excel.Application")  'créé une instance Excel
Set xlBook = xlapp.Workbooks.Open ("\\serveur\unite logique$\repertoire\fichier.xls") 'Ouverture du gestionnaire de feuilles Excel
Set xlSheet = xlBook.Sheets(tbmois(tbDate(1))) 'Positionnement sur la xlSheet du mois en cour
Set fso = CreateObject("Scripting.FileSystemObject") 'declaration de la creation d'un objet FSO

voici le message d'erreur qui m'est renvoyé

"un composant ActiveX ne peut pas créer un objet :"excel.application" "

l'erreur est positionnée ligne 25 soit

Code :

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

Set xlapp = CreateObject("Excel.Application")

[AlainTech]

en utilisant un ADO et en convertissant le .xls en .CSV, penses tu que se soit realisable ?

Je pense qu'en utilisant ADO tu peux travailler sur des fichiers Excel pour autant qu'ils soient organisés comme des bases de données.

Il y a une contribution de SilkyRoad à ce sujet.
http://silkyroad.developpez.com/VBA/ClasseursFermes/

[micka180]

je tente une connexion vias ado sur le fichier xls.

(je developpe sur Primalscript)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim cn as ADODB.Connection '(le as n'apparait pas en bleu chez moi)
Set cn = New ADODB.Connection
With cn
	.Provider = "Microsoft.Jet.OLEDB.4.0"
	.ConnectionString = "Data Source=D:\suivi bilan journalier.xls;" & _
"Extended Properties=Excel 8.0;"
	.Open
End With
 
 
strQuery = "SELECT * FROM [D:\suivi bilan journalier.xls$]"

et j'ai un retour d'erreur sur ma premiere ligne "Erreur de compilation Microsoft VBScript: Fin d'instruction attendue"

je ne comprend pas vraiment ce qu'attend le compilateur ?

[ced600]

Code :

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

Dim cn as ADODB.Connection

Ce n'est pas du VBS, c'est du VB, en VBS :

Code :

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

Dim cn

Pour en savoir plus regarde la