|
| Iniciado por Olivier LUBET, ago., 02 2004 1:04 PM - 5 respostas |
| |
| | | |
|
| |
Publicado em agosto, 02 2004 - 1:04 PM |
Avez-vous une idée sur la façon de récupérer une variable HTTP header ?
La fonction pageparamètre ne semble pas prévue à cet effet. |
| |
| |
| | | |
|
| | |
| |
Publicado em agosto, 04 2004 - 4:54 PM |
"Olivier LUBET" <lubetolivier@johndeere.com> wrote:
Avez-vous une idée sur la façon de récupérer une variable HTTP header ?
La fonction pageparamètre ne semble pas prévue à cet effet.
Solution du support direct : passer par un DLL windows.
pour cela une petite fonction vous renvoi la valeur de la variable d'environnement
:
PROCEDURE GetVarEnv(paNOMVAR)
NomVariable est une chaîne ASCIIZ sur 64
ValeurVariable est une chaîne ASCIIZ sur 1024
TailleMaxVariable est un entier
TailleResultat est un entier
TailleMaxVariable = 1024
NomVariable = paNOMVAR
TailleResultat = 0
//Fonction de récupération d'une variable d'environnement
TailleResultat=AppelDLL32("kernel32","GetEnvironmentVariableA",...
&NomVariable,&ValeurVariable,TailleMaxVariable)
SI TailleResultat > 0 ALORS
RENVOYER ValeurVariable
SINON
RENVOYER ""
FIN |
| |
| |
| | | |
|
| | |
| |
Publicado em agosto, 12 2004 - 1:05 AM |
Bonjour,
Meme en copiant la procedure, je n'arrive pas a retourner la valeur de
"REMOTE_ADDR" et de "HTTP_USER_AGENT".
Une petite aide?
Carine 
"Olivier LUBET" <lubetolivier@johndeere.com> wrote in message
news:4110dc9b$1@news.pcsoft.fr...
"Olivier LUBET" <lubetolivier@johndeere.com> wrote:
Avez-vous une idée sur la façon de récupérer une variable HTTP header ?
La fonction pageparamètre ne semble pas prévue à cet effet.
Solution du support direct : passer par un DLL windows.
pour cela une petite fonction vous renvoi la valeur de la variable
d'environnement
:
PROCEDURE GetVarEnv(paNOMVAR)
NomVariable est une chaîne ASCIIZ sur 64
ValeurVariable est une chaîne ASCIIZ sur 1024
TailleMaxVariable est un entier
TailleResultat est un entier
TailleMaxVariable = 1024
NomVariable = paNOMVAR
TailleResultat = 0
//Fonction de récupération d'une variable d'environnement
TailleResultat=AppelDLL32("kernel32","GetEnvironmentVariableA",...
&NomVariable,&ValeurVariable,TailleMaxVariable)
SI TailleResultat > 0 ALORS
RENVOYER ValeurVariable
SINON
RENVOYER ""
FIN
|
| |
| |
| | | |
|
| | |
| |
Publicado em agosto, 14 2004 - 3:33 AM |
Hello!
Voilà un bout de code qui affiche dans une table à 2 colonnes le nom et la
valeur de TOUTES les variables d'environnement (reçues dans le header HTTP)
// Variables d'environnement
sEnv = SysEnvironnement()
BOUCLE
iJ++
sNoms = ExtraitChaîne(sEnv, iJ, RC)
SI sNoms = EOT ALORS SORTIR
TableAjoute(TBL_RESULTATS, Remplace(ExtraitChaîne(sNoms, 1, "="), " ", Caract(160))
+ TAB + ExtraitChaîne(sNoms, 2, "="))
FIN
Tintin
_______________________
"nospam" <nospam@nowhere.com> wrote:
Bonjour, Meme en copiant la procedure, je n'arrive pas a retourner la valeur de "REMOTE_ADDR" et de "HTTP_USER_AGENT". Une petite aide? Carine "Olivier LUBET" <lubetolivier@johndeere.com> wrote in message news:4110dc9b$1@news.pcsoft.fr... "Olivier LUBET" <lubetolivier@johndeere.com> wrote:
Avez-vous une idée sur la façon de récupérer une variable HTTP header
?
La fonction pageparamètre ne semble pas prévue à cet effet.
Solution du support direct : passer par un DLL windows. pour cela une petite fonction vous renvoi la valeur de la variable d'environnement :
PROCEDURE GetVarEnv(paNOMVAR)
NomVariable est une chaîne ASCIIZ sur 64
ValeurVariable est une chaîne ASCIIZ sur 1024
TailleMaxVariable est un entier
TailleResultat est un entier
TailleMaxVariable = 1024
NomVariable = paNOMVAR
TailleResultat = 0
//Fonction de récupération d'une variable d'environnement
TailleResultat=AppelDLL32("kernel32","GetEnvironmentVariableA",...
&NomVariable,&ValeurVariable,TailleMaxVariable)
SI TailleResultat > 0 ALORS
RENVOYER ValeurVariable
SINON
RENVOYER ""
FIN
|
| |
| |
| | | |
|
| | |
| |
Publicado em agosto, 16 2004 - 11:09 AM |
Salut Tintin
Tintin avait écrit le 14/08/2004 :
Hello!
Voilà un bout de code qui affiche dans une table à 2 colonnes le nom et la
valeur de TOUTES les variables d'environnement (reçues dans le header HTTP)
// Variables d'environnement
sEnv = SysEnvironnement()
BOUCLE
iJ++
sNoms = ExtraitChaîne(sEnv, iJ, RC)
SI sNoms = EOT ALORS SORTIR
TableAjoute(TBL_RESULTATS, Remplace(ExtraitChaîne(sNoms, 1, "="), " ",
Caract(160)) + TAB + ExtraitChaîne(sNoms, 2, "="))
FIN
Tintin
_______________________
Ton code me paraît interressant.
Dés mon retour de vacances, je le testerai et si tu es d'accord, je le
mettrai bien dans les WTablettes si tu m'en donnes l'autorisation.
Eric
--
Cordialement
Eric |
| |
| |
| | | |
|
| | |
| |
Publicado em agosto, 16 2004 - 7:42 PM |
Ton code me paraît interressant.
Dés mon retour de vacances, je le testerai et si tu es d'accord, je le
mettrai bien dans les WTablettes si tu m'en donnes l'autorisation.
Eric
--
Cordialement
Eric
No problem, va pour les WTablettes, fort interressantes au demeurant !
Tintin |
| |
| |
| | | |
|
| | | | |
| | |
|