begin process at 2010 03 18 10:17:36
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Visual Basic 6

 > 

Langages dérivés

 > 

VBScript

 > 

[VBS] Winsock en VBS ?


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

[VBS] Winsock en VBS ?

mercredi 5 septembre 2007 à 20:37:59 | [VBS] Winsock en VBS ?

Cybertat

Bonjour à tous,

Je cherche à savoir s'il est possible d'utiliser Winsock avec VBScript et si oui, comment ?

En fait, j'avais vu un article qui explicait comment faire pour un client IRC (http://www.vbfrance.com/codes/WINSOCK-AVEC-VBSCRIPT-CLIENT-IRC_17061.aspx) mais hélas lorsque je le test, le script m'affiche une erreur pour la ligne "Set tcpClient = CreateObject("MSWinsock.Winsock")" tout simplement parce qu'il ne semble pas connaitre "MSWinsock.Winsock"...

Est ce que quelqu'un pourrait m'aider svp ?

Merci par avance.
jeudi 6 septembre 2007 à 13:57:32 | Re : [VBS] Winsock en VBS ?

GEDDi

Bonjour,

En effet, tu dois surement avoir une erreur 429, ceci veut dire que la librairie
Winsock n'est pas présente ou est mal installée sur ton disque dur.
Sinon, le code suivant (en FBSL, proche du VBS) fonctionnerait :)

#Option Strict
#AppType CONSOLE

// -----------------------------
// Test
// -----------------------------
Dim w As New WinSock
Print "HostName : ", w.GetHostName()
Print "LocalIP  : ", w.GetIP()
Delete w
Pause

// -----------------------------
// Class WINSOCK
// -----------------------------
Class WinSock
  Private:
    tcpClient
    Method Initialize()
        Set tcpClient = CreateObject("MSWinsock.Winsock")
    End Method
    Method Terminate()
        If tcpClient Then ReleaseObject(tcpClient)
    End Method

  Public:
    Method GetHostName()
        If tcpClient Then Return GetValue( "%s", tcpClient, "LocalHostName" )
    End Method
    Method GetIP()
        If tcpClient Then Return GetValue( "%s", tcpClient, "LocalIP" )
    End Method
End Class


Gerome GUILLEMIN (auteur du langage FBSL)
Web : http://www.fbsl.net

jeudi 6 septembre 2007 à 17:19:30 | Re : [VBS] Winsock en VBS ?

JMO

Membre Club


 Bonjour à tous


Un lien, de ce forum, trouvé avec recherche "vbs winsock".
Evidemment, il y a d'autres exemples . merci ami google.
http://www.vbfrance.com/codes/WINSOCK-AVEC-VBSCRIPT-CLIENT-IRC_17061.aspx


jean-marc
jeudi 6 septembre 2007 à 19:12:58 | Re : [VBS] Winsock en VBS ?

Cybertat

Bonjour à tous,

Je développe dans le cadre de mon travail et je n'ai la possibilité d'utiliser que VBS. Mon script devant tourné sur des serveurs, je ne peut rien installé qui ne soit vital. Donc le fbls ne pourra me sortir d'affaire.

Sinon pour jean-marc, le lien que tu as indiqué est celui dont je me suis inspiré pour faire mon code. C'est le même que j'ai cité dans mon message de base...

Mais si effectivement la librairie winsock n'est pas présente ou mal installé, n'existe t-il pas une manipulation pour la redéclarer proprement ?

Merci de votre aide.
vendredi 7 septembre 2007 à 15:41:47 | Re : [VBS] Winsock en VBS ?

GEDDi


''>> existe t-il une manipulation pour la redéclarer proprement ?''

Sisi, tu cliques sur le bouton Démarrer, puis Executer et tapes ceci dans l'invite de commandes :
REGSRV32.EXE MSWINSCK.OCX

Cette commande va redeclarer cet objet COM en base de Registre.

--=:: -----------------------------------::=--
      Gérôme GUILLEMIN, ingénieur système et auteur du langage FBSL
--=:: -----------------------------------::=--

samedi 8 septembre 2007 à 12:28:51 | Re : [VBS] Winsock en VBS ?

Cybertat

Ah, ah, presque ! Je viens de redéclarer l'objet winsock dans ma base de registre comme tu me l'as dis et la commande est bien passé mais maintenant j'ai un autre message d'erreur. Il me dit que "La classe n'a pas de licence d'utilisation" (erreur 80040112). J'ai essayé de trouver sur google le pourquoi du comment de ce message mais je n'ai rien trouvé de concret.

Est-ce que quelqu'un saurais le pourquoi du comment et surtout, comment y rémédier ?

Sinon, juste pour ma culture personnel, winsock est un composant de base de windows non ? Comment se fait-il qu'il ne soit pas déclaré par défaut ? (J'ai vérifié sur plusieurs postes et OS.) Est-ce pour des raisons de sécurité ? Si oui, cela ne consitue t-il pas une faille de reforcer sa déclaration ? La réponse à ces questions n'est bien évidément pas obligé, c'est juste si quelqu'un sait !

Merci pour votre patiente et vos efforts ! ^^


Cette discussion est classée dans : vbs, vbscript, winsock, client, irc


Répondre à ce message

Sujets en rapport avec ce message

Client et serveur IRC avec Winsock (Aide !!!) [ par KOOK ] Salut, j'ai télécharger plusieurs sources de client et serveur irc mais aucune ne marche, j'ai un problème avec Winsock, pourriez vous m'aider, existe [déplacé VB6 -> VBS] Client/Serveur [ par Guillamue06 ] Bonjour, après le VB6, je m'intéresse maintenant au VBScript depuis hier et je cherche un moyen de créer un client et serveur en VBScript sans passer Problème Multi winsock [ par MeSod ] Bonjours, Je post sur le forum car jai un petit problème qui est le suivant : J'ai créé une application, un debut pour un RPG en réseau. Donc on va d Winsock list box [ par leo2708 ] Bonjours a tousBon voila mon problémeJ'ai creer un client et un serveurs .J'aimerais que le contenu d'un listbox du serveurs séenvoi sur un listbox du connexion avec winsock [ par ahmedbj ] Salut je viens de débuter en visual basic et j'ai commencé par créer une petite application client-serveur avec winsock et j'ai essayé d'envoyer le cl PB Connexion Winsock (malgré redirection des ports) [ par Yanniv ] Salut, J'aimerai faire un chat donc établir une liaison TCP . J'utilise winsock et le chat marche en local, le Problème est que en distant , le client Problème pour executer plusieurs envoi de message [ par Totooo62 ] Bonjour tous le monde, me revoila encore une foi avec mes Winsock, j'ai un probléme, j'ai 3 Winsock  par applicationsUn Winsock en listen sur le Serve selectionner du texte en vbscript [ par kalif ] bonjour a tous, je voudrai savoir s'il est possible de selectionner du texte en vbscript, mais attention car la situation est un peu complexe, - no Déconnection client suite veillle ordinateur [ par peug ] Bonjour à tous ! Dites voir, j'ai fait une petite appli client/serveur. Mais j'ai un problème lorsque l'ordinateur Client se met en veille (et pou Winsock data perdu ? [ par scrincer ] bon pour commencer je suis tres a l'aise avec winsockje monte un serveur multi-client, mais le probleme cest que je craint de perdre des data en cour


Nos sponsors


Appels d'offres

Sondage...

Comparez les prix

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,326 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales