lancer / ordonner une application depuis IE

Version imprimable

:salut: Bonjour a tous. :salut:
Je suis tout nouveau (de ce matin ;)) dans le monde de VBScript. J'ai lu un peu la FAQ et fait un petit tour des cours / exemples ici et là pour commencer. Et en me lancant dans mon tout premier script que de désillusion lorsque je vi l'erreur d'execution qu'il se passait ! :cry:
Je dispose d'une application (d'impression de codebarre) qui met a disposition des controles ActiveX pour pouvoir notamment imprimer :D. J'ai réaliser un formulaire html et mon but c'est d'utiliser son contenu avec ces controles.
Mais pour le moment j'en suis pas vraiment là puisque des problemes de comprehension / technique basique se sont poses :
- Pourquoi lorsque je test les exmeple de la FAQ Comment piloter Internet Explorer pour envoyer des informations à un site interne ou Comment piloter Excel pour créer un classeur.xls a l'interieur d'une page html toute simple :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 <HTML> <BODY> <FORM NAME="Feuille1"> <INPUT TYPE="Button" NAME="Bouton1" VALUE="Clic"> <SCRIPT FOR="Bouton1" EVENT="onClick" LANGUAGE="VBScript">  </SCRIPT> </FORM> </BODY> </HTML>
eh bien j'obtiens des erreurs tels que "un composant activex ne pas creer un objet : 'Excel.Application'" ou bien "Objet requis: WScript" ?
- Est on obliger de passer d'abord par un script vbs pour ensuite lancer IE (pour afficher mon formulaire puis lancer l'impression) ou bien peut on d'abord lancer un navigateur puis passer outre les messages d'erreur plus haut ?

Merci a tous de bien vouloir m'aider

26/10/2007, 13h54
ced600

Est ce que tu as excel d'installé sur ton poste ?

Code:

Set IE = Wscript.CreateObject("InternetExplorer.Application")

ça c'est du VBA pas du VBS, il faut faire comme cela :

Code:

Set IE = CreateObject("InternetExplorer.Application")
26/10/2007, 14h44
k-koo

Oui oui j'ai bien excel. Et en fait j'ai fais la modif pour IE et j'obtiens la meme erreur qu'avec excel :
"un composant ActiveX ne pas creer un objet : 'InternetExplorer.Application'" :scarymov:

Bonsoir,
C'est sur ce script la :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 Dim IE Set IE = Wscript.CreateObject("InternetExplorer.Application") IE.Visible = 1 IE.navigate "http://www.developpez.net/forums/login.php" Do While (IE.Busy) WScript.Sleep 10 Loop Set Helem = IE.document.getElementById("vb_login_username") Helem.Value = "NomUtilisateur" Set Helem = IE.document.getElementById("vb_login_password") Helem.Value = "MotDePasse" Set Helem = IE.document.Forms(0) Helem.Submit
que tu obtient une erreur. Teste le directement dans un fichier .vbs pour voir si tu as une erreur.
Sinon regarde ce petit KB de microsoft : http://support.microsoft.com/default...d=kb;fr;244264

Cdt

27/10/2007, 12h15
k-koo

Bon deja information importante, j'ai pas le meme probmeme sur tout les postes avec lesquels je travaile !
Là, avec un pste different de celui d'hier, excel se lance bien grace au bouton de ma page web. En revanche j'obtien toujours la meme erreur pour lancer IE.
J'ai quand meme une question assez basique mais fondamentale : ca devrait marcher / ca mache chez vous ??
Au pire si ca marche toujours pas pour internet explorer c'st pas bien grave tant que j'arrive a creer un objet pour mon appli de codebar.
J'attend encore des infos de votre part et je vous dirais si ca marche pour mon appli (j'espere juste que j'aurais pas dautre probleme de comprehension de leur utilisation)

Bon alors j'ai pu installer mon logiciel, et il donne un exemple dans l'aide pour utiliser les controles :
Code:

1 2 3 4 5 6 7 8 9 10 Dim oCS As LabelManager2.Application Dim oDoc As LabelManager2.Document Dim ISize As Long Dim devmode As Variant Set oCS = GetObject(, "lppx2.Application") Set oDoc = oCS.ActiveDocument ISize = oDoc.Printer.GetDevMode(devmode) ISize = oDoc.Printer.GetDevMode(devmode) ISize = oDoc.Printer.SetDevMode(devmode)
D'apres ce que j'ai compris ceci est du code VB tout court donc je l'ai modif comme ceci :
Code:

1 2 3 4 5 6 7 8 9 10 Dim oCS Dim oDoc Dim ISize Dim devmode Set oCS = CreateObject("lppx2.Application") Set oDoc = oCS.ActiveDocument ISize = oDoc.Printer.GetDevMode(devmode) ISize = oDoc.Printer.GetDevMode(devmode) ISize = oDoc.Printer.SetDevMode(devmode)
RESULTAT : ca marche pas :)
J'obtient la meme erreur si je l'execute depuis un fichier vbs tout seul ou bien si j'utilise ce code dans ma page HTML : "Object Requis 'oDoc'"
Quelqu'un peut il m'eclairer ?

29/10/2007, 09h14
ced600

Citation:

Bon deja information importante, j'ai pas le meme probmeme sur tout les postes avec lesquels je travaile !

Fait nous une description rapide du poste qui plante et des autres qui ne plantent pas.

Surtout quel OS utilises sur ces postes ? Win 2000 2003 XP Vista ?
29/10/2007, 17h07
k-koo

Bon a priori j'ai finalement reussi a en faire un minimum acceptable. Juste pour l'info jetais sous winXP SP2 sur les 2 machines. Et en fait ca marchais corretement sur les 2 postes... Surement fait d'la merde qqpart !
Quoi qu'il en soit j'arrive a lancer mon appli mais elle se ferme toute seule :aie:
Je vais ouvrir une autre conversation plus dirigé ver le soft que j'utilise : codesoft
MErci de votre aide