OVH Cloud OVH Cloud

active'X Winsock [ GetData ]

2 réponses
Avatar
Bul
bonjour à tous,

j'ai une petite application dans laquelle on peut transférer
des fichiers locaux vers un site et inversement ( un petit
FTP quoi ), en J[ava]Script + Active'X.

J'ai un problème que je n'arrive pas à résoudre :
Winsock.GetData(texterecu,8); ne me renvoie rien,
enfin j'ai cette impression :
l'évênement DataArrival(lgrecu) du Winsock est
bien déclenché, le nombre de caractères semble
correct, mais le string est vide.
j'ai pour l'instant écrit une petite dll pour que
ça marche... il n'y a pourtant aucune raison,
à part mes erreurs !!
extraits de mon script, simplifié :
<OBJECT id="Winsock1"
classid="clsid:248DD896-BB45-11CF-9ABC-0080C7E7B78D"
VIEWASTEXT>
<PARAM NAME="_ExtentX" VALUE="741">
<PARAM NAME="_ExtentY" VALUE="741">
<PARAM NAME="Protocol" VALUE="0">
<PARAM NAME="RemoteHost" VALUE="">
<PARAM NAME="RemotePort" VALUE="0">
<PARAM NAME="LocalPort" VALUE="0"></OBJECT>
et je fais
Winsock1.Connect("adresse site ftp",21);
...
<Script type="Text/JavaScript"
FOR="Winsock1"
EVENT="DataArrival(lgrecu)"><!--------

ici, si je met
Winsock1.GetData(txtrecu,8);
je ne reçois "rien"

et, si je fait
var obj=new ActiveXObject("GetData.clsGetData");
txtrecu=obj.GetData(Winsock1);
obj=null;
ça marche, avec en visual basic
Public Function GetData(WS) As String
Dim txtrecu As String
txtrecu = vbNullString
On Error GoTo donnees_Err
WS.GetData txtrecu, vbString
donnees_Err:
GetData = txtrecu
End Function

je fais quoi comme erreur ?
pouvez-vous m'aider ? m'orienter ?
me dire où je peux trouver de l'aide ?
d'avance merci.

2 réponses

Avatar
AnTaReS
bonjour à tous,

j'ai une petite application dans laquelle on peut transférer
des fichiers locaux vers un site et inversement ( un petit
FTP quoi ), en J[ava]Script + Active'X.
[...]


Je ne suis pas sûr du tout que ça t'aide, mais au cas où tu ne le
saurais pas déjà, il existe un ActiveX similaire gratuit, Socket Wrench,
qui fait la même chose et qui marche parfaitement.
M'enfin c'est vrai que c'est + pratique si on peut utiliser la lib
Winsock qui est présente sur tous les PC sous Windows (perso j'avais pô
réussi à la faire marcher) ...

@+
O.L.

Avatar
Bul
merci de la réponse
mais en Visual Basic, en Vbscript ...
( par exemple ) aucun souci, pourquoi
pas, alors, en j[ava]script ?