La base d'une appli reseau (winsock pour les nuls)

Soyez le premier à donner votre avis sur cette source.

Vue 14 742 fois - Téléchargée 5 970 fois

Description

Encore une aide sur le controle Winsock suite à une question du forum.
Voici donc une source sur le B.A.-BA d'une application reseau avec le controle Winsock.
Deux controles Winsock communiquent entre eux dans une même application commentée et on ne peut plus simple.
Alors si aprés cela, vous n'avez toujours rien compris, j'y renonce.

Source / Exemple :


' Winscock est comme une fenêtre ouverte de votre programme sur le
' réseau (ou internet).
' Ici, on utilise deux controles dans la même fenêtre qui vont se connecter
' entres elles. Mais le principe est le même pour des applications differentes.
'
' La fenêtre serveur (winsock1) va être ouverte et mise en mode lecture.
' La fenêtre client (winsock2) va se connecter au serveur en precisant son
' adresse (son port local) et son son nom (le nom de l'ordinateur).
' Le serveur doit alors accepter la connection.
' Ensuite, vous pouvez échanger des informations par l'intermediaire de
' ces fenêtres.
'
' Vous pouvez également comparer winsock à un téléphone. Un poste en attente
' (le serveur) et un poste qui appel (le client). Pour appeler, vous devez
' connaitre le numero du correspondant (son port et son nom) et le client
' doit décrocher (accepter l'authentification).
'
' des deux côté :
' winsock.close           fermeture
' winsock.localport=452   definit le port local (ici 452)
' winsock.state           renvoi l'état du contrôle (de 0 à 9)
' winsock.SendData ("AB") envoi de texte (ici "AB")
'
' côté serveur
' winsock.listen          passer en mode 'ecoute'
' winsock.accept numID    accepte la connexion du client (numID=n° de la demande)
'
' côté client
' winsock.remotehost=titi nom de l'ordinateur où se trouve le winsock serveur
' winsock.remoteport=452  numero du port du winsock serveur (ici 452)
' winsock.connect         lance une demande d'authentification
'
' C'est plus clair dans le ZIP

Conclusion :


Vous pouvez utiliser le principe pour vous connectez à un serveur sur Internet et recuperer par exemple vos mails sur un serveur POP.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
13
Date d'inscription
samedi 24 juin 2006
Statut
Membre
Dernière intervention
9 juillet 2009

tres simple et interessant comme source! tres bien pour debuter un grand bravo!!

Juste un petit truc plutot que de mettre :

dim essais as string
essais = machin.text
essais = ""
exit sub

utilise plutot Vbnullstring
dim essais as string
essais = machin.text
essais=vbnullstring
exit sub

il me semble que c'est plus rapide, plus claire et plus propre
10/10
Messages postés
46
Date d'inscription
jeudi 15 avril 2004
Statut
Membre
Dernière intervention
9 décembre 2012

Petit tudo tres bien :) For the noob :p
Messages postés
48
Date d'inscription
jeudi 8 septembre 2005
Statut
Membre
Dernière intervention
16 août 2010

merci beaucoup sergentGUS pour ce tuto
Messages postés
174
Date d'inscription
vendredi 26 mai 2006
Statut
Membre
Dernière intervention
9 avril 2014
7
On ne dit pas câble RJ45 mais câble ethernet avec connecteur RJ45 :)
Messages postés
21
Date d'inscription
dimanche 20 février 2005
Statut
Membre
Dernière intervention
20 mars 2006

Salut a tous,

Tout d'abord BRAVO pour ta source : elle est bien faite pour les debutants du VB : je donne 10/10 moi.
Faute de moyen, j'ai pas pu tester....je m'excuse, alors je pose ma question ici. Je voulais juste savoir si ton application marche aussi dans le cas d'une connexion reseau entre 2 PC+carte reseau + Cable RJ45??

MErci d'avance pour une éventuelle réponse

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.