Le numéro de port (1 à 65535) correspond à celui du Socket.
Voici un exemple :
'====================================================================================
' Démarrer serveur
'------------------------------------------------------------------------------------
Public Sub Demarrer_Serveur(Optional ByVal Port As Long = 21)
'------------------------------------------------------------------------------------
Index_Client = 0 'Pas de client
Set Collection_Client = New Collection 'Initialisation de la collection
Set Collection_Utilisateur = New Collection
Canal_Commande(0).LocalPort = Port 'Mise en service du port de commande
Canal_Commande(0).Listen 'Le mettre en écoute
Chargement_Parametres 'Charger les paramètres clients
End Sub
Je voulais trouver une base pour réaliser mon propre
"Mur_Anti_Merdouilles".
Tu trouveras bientôt sue le site :
http://pagesperso-orange.fr/erysoft/ un projet que j'ai commencé ... il y a bien longtemps.
Son nom : EryWeb.
Le canif Suisse du Ouebeurk!
c cool, mais on a pas vraiment la même définition d'un firewall.
mais le code est intéressant. Si quelqu'un sait comment récupérer le numéro du socket associé au port moi je suis preneur !
bonne continuation !
Salut BooLISH
voici une belle petite source.Bon coté graphique cest vrai que cest pas terrible mais sinon par rapport a ma source ya pas eut enormements de changements.
Merci d'avoir dis que le code venait de moi
Bonne continuation !!!!
Le numéro de port (1 à 65535) correspond à celui du Socket.
Voici un exemple :
'====================================================================================
' Démarrer serveur
'------------------------------------------------------------------------------------
Public Sub Demarrer_Serveur(Optional ByVal Port As Long = 21)
'------------------------------------------------------------------------------------
Index_Client = 0 'Pas de client
Set Collection_Client = New Collection 'Initialisation de la collection
Set Collection_Utilisateur = New Collection
Canal_Commande(0).LocalPort = Port 'Mise en service du port de commande
Canal_Commande(0).Listen 'Le mettre en écoute
Chargement_Parametres 'Charger les paramètres clients
End Sub
A plus
Je voulais trouver une base pour réaliser mon propre
"Mur_Anti_Merdouilles".
Tu trouveras bientôt sue le site :
http://pagesperso-orange.fr/erysoft/
un projet que j'ai commencé ... il y a bien longtemps.
Son nom : EryWeb.
Le canif Suisse du Ouebeurk!
A plus
mais le code est intéressant. Si quelqu'un sait comment récupérer le numéro du socket associé au port moi je suis preneur !
bonne continuation !
voici une belle petite source.Bon coté graphique cest vrai que cest pas terrible mais sinon par rapport a ma source ya pas eut enormements de changements.
Merci d'avoir dis que le code venait de moi
Bonne continuation !!!!
SatanCorporation
Super ta source.
Mais j'aimerais savoir comment faire pour fermer par prog une connection ( exemple: localhost:80 ip_Distante:2000 )
A+
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.