Page 1 sur 1
Ports Network
Publié : lun. 27/août/2012 19:43
par SPH
Voici un code qui determine si les 6 ports (entre 1 et 7000) sont pret pour un network :
Code : Tout sélectionner
If InitNetwork() = 0
MessageRequester("Error", "Can't initialize the network !", 0)
End
EndIf
Debug("Ports : ")
Debug("")
For i = 1 To 6
Read port.l
ConnectionID = OpenNetworkConnection("127.000.000.001", Port)
If ConnectionID
Debug(Str(port)+" : ouvert")
CloseNetworkConnection(ConnectionID)
Else
Debug(Str(port)+" : fermé")
EndIf
Next
Repeat
ForEver
; ports ouverts : 135, 445, 4664, 5151, 5939, 6832
DataSection
Data.l 135, 445, 4664, 5151, 5939, 6832
EndDataSection
Re: Ports Network
Publié : lun. 27/août/2012 19:57
par Ar-S
Le vieux testeur d'emule
Des années que j'avais pas vu ces ports...
Re: Ports Network
Publié : mar. 28/août/2012 12:53
par SPH
Ports :
135 : ouvert
445 : ouvert
4664 : ouvert
5151 : ouvert
5939 : ouvert
6832 : fermé
Et vous ?
ps : ce matin, mon port 6832 est fermé alors qu'hier, il etait ouvert !!
Re: Ports Network
Publié : dim. 16/sept./2012 20:25
par Golfy
Tu peux émettre sur un port et recevoir sur ce port mais il s'agit de la même session.
Plusieurs sessions sur un même port me parait impossible... ceci étant, c'est un peu comme dériver les actions d'un clavier : un spyware prend les touches pour lui puis renvoie au programme d'origine : un chaînage quoi !
Re: Ports Network
Publié : lun. 17/sept./2012 5:39
par falsam
SPH a écrit :ps : ce matin, mon port 6832 est fermé alors qu'hier, il etait ouvert !!
Il est ouvert si ton serveur de chat que tu essayes de faire fonctionner est en cours d'éxécution. Ton code n'examine pas les ports ouverts de ton routeur, mais ceux de ton ordinateurs. (je me demande si ce sujet n'as pas déjà été traité dans différents sujet que tu postes
