Utilisation du Mscomm32.ocx avec un vbscript

**Abyss** · 21/05/2007, 11h28

Salut,

Je suis entrain d'écrire un petit script qui est cencé transmettre des données à un modem connecté en port com, mais je me heurte a certains problèmes

le script en question est cencé utiliser les propriétés du Mscomm32.ocx :

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
Option Explicit
 
Dim MSComm1
Set MSComm1 = CreateObject("MSCOMMLib.MSComm")
 
MSComm1.Commport = 3
MSComm1.Settings = "2400,N,8,1"
MSComm1.InputLen = 0
 
MSComm1.PortOpen = True
 
MSComm1.Output = "AT+CMGS=" & 0213313123 & Chr(13)
MSComm1.Output = "erreur détectée...Argeuh" & chr(26)
 
MSComm1.PortOpen = False

si j'execute le fichier vbs j'obtiens l'erreur : La classe n'a pas de licence d'utilisation

dans le create object j'avais essayé de mettre "mscomm32.ocx" à la place de "MSCOMMLib.MSComm" mais on m'a dit que ce n'était pas comme ca que je devais faire et en cherchant sur des forums j'ai trouvé cette commande.

Ect-ce qu'un grand manitou du vbs saurait me dire de quoi ca vient ? car a force de

vais bientot finir

Merci d'avance

**omen999** · 21/05/2007, 12h19

salut,
une petite visite chez le grand sachem eric phelps ?

:http://www.ericphelps.com/scripting/samples/

**Abyss** · 21/05/2007, 13h37

merci pour le lien, vais trifouiller voir si je trouve un truc dans le tipi du grand sachem

**Abyss** · 21/05/2007, 15h30

bon ca marche j'ai fini par installer vb sur la machine

me reste juste une question vu que ca marche toujorus pas ^^

comment je fais un ctrl+z en vbs ? (la premiere commande que je tappe je dois la valider avec enter la j'ai trouvé Chr(13) mais après la deuxième commende (l'envoi du message du sms) je dois valider avec un ctrl+z. on m'avais dit que le Chr(26) ferait merveille mais ca ne donne rien.

donc sois c'est mon code qui est foireux sois on fait pas un ctrl+z comme ca

si qqn peut m'aider, merci d'avance