PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WEBDEV 2024 → Connaitre le port actuellement utilisé.
Connaitre le port actuellement utilisé.
Iniciado por Mathieu BROUSSEAU, 30,jul. 2015 19:37 - 1 respuesta
Miembro registrado
204 mensajes
Popularité : +4 (8 votes)
Publicado el 30,julio 2015 - 19:37
Est-ce qu'il existe une fonction webdev que j'ignore, ou une façon quelconque de savoir le port que l'usager utilise pour se connecté à mon site web?

Je sais que dans 99% des cas, ça va retourner le port 80, mais j'ai un site web qui a un comportement légèrement différent si on se connecte sur le port 81 (et non sur le port 80).

J'aimerais avoir un code similaire à ças

SI HPort() = "81" ALORS
// code
FIN
Miembro registrado
204 mensajes
Popularité : +4 (8 votes)
Publicado el 30,julio 2015 - 20:17
Un collège m'a répondu.

La fonction SysEnvironnement() contient plusieurs informations utiles.

Je me suis créer une collection de procédure qui permet de réutiliser le code un peu partout

APP_POOL_ID = "APP_POOL_ID"
AUTH_TYPE = "AUTH_TYPE"
AUTH_USER = "AUTH_USER"
LOCAL_ADDR = "LOCAL_ADDR"
LOGON_USER = "LOGON_USER"
PATH_INFO = "PATH_INFO"
PATH_TRANSLATED = "PATH_TRANSLATED"
REMOTE_ADDR = "REMOTE_ADDR"
REMOTE_USER = "REMOTE_USER"
SERVER_PORT = "SERVER_PORT"
HTTPS = "HTTPS"

tabVariableEnvironnement est une tableau associatif de chaîne
POUR TOUTE CHAINE sLigne DE SysEnvironnement() SÉPARÉE PAR RC
sCle est une chaîne = ExtraitChaîne(sLigne, 1, "=")
sValeur est une chaîne = ExtraitChaîne(sLigne, 2, "=")
tabVariableEnvironnement[sCle] = sValeur
FIN


Ensuite pour les procédures

Procedure Port()

RENVOYER tabVariableEnvironnement[SERVER_PORT]