Serveur renvoie avec THTTPClient.post "enable Javascript"

Bonjour,

Je n'arrive pas à envoyer les deux valeurs Value1 et Value2 par
"http.Post(..." sur un Serveur en PHP
je reçois comment erreur "please enable Javascript.."

J'ai bien cherché et si j'ai bien compris je devrais envoyer mes variables en plein texte ou .. ?!,
mais je ne sais pas comment...

J'utilise "Firemonkey 10.2" pour une application multi device.
Que dois-je changer ou ajouter dans mon code.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
var
  http: THTTPClient;
  params: TStringList;
  LResp: IHTTPResponse;
begin
 
    sUrl := 'http://srvDB.MonSite.com/login.php';
 
    http := THTTPClient.Create;
 
    params := TStringList.Create;
    params.Add( 'Value1=12345');
    params.Add( 'Value2=email');
 
    http.ConnectionTimeout := 3000;
    http.ResponseTimeout := 3000;
 
    LResp := http.Post(sUrl, params, nil, TEncoding.UTF8);
    Result := LResp.ContentAsString;
 
    http.Free;
 
end;

Entre autres j'ai aussi essayé ceci, mais l'erreur persiste toujours.

Code:

1
2
3
 
      http.UserAgent := 'Mozilla/5.0 (Windows NT 10.0; WOW64)' ;
      http.Accept := 'text/html';

Voici le résultat de retour du serveur PHP.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
<html>
	<body>
		<script type="text/javascript" src="/aes.js" ></script>
<script>
   function toNumbers(d){var e=[];d.replace(/(..)/g,
   function(d){e.push(parseInt(d,16))});return e}function toHex(){for(var d=[]
   d=1==arguments.length&&arguments[0].constructor==Array?arguments[0]:arguments,e="",
   f=0;
   f<d.length;f++)e+=(16>d[f]?"0":"")+d[f].toString(16);return e.toLowerCase()}
   var 
	a=toNumbers("f655ba9d09a112d4968c63579db590b4"),
	b=toNumbers("98344c2eee86c3994890592585b49f80"),
	c=toNumbers("c2f6ffa715a49499b0f9d11384c676c3");
	document.cookie="__test="+toHex(slowAES.decrypt(c,2,a,b))+";
	expires=Thu, 31-Dec-37 23:55:55 GMT; path=/";
	location.href="http://srvDB.MonSite.com/login.php?i=1";
</script>
	<noscript>This site requires Javascript to work, please enable Javascript in your browser 
					or use a browser with Javascript support
	</noscript>
	</body>
</html>

Je vous remercie beaucoup pour votre aide et votre assistance.
Cordialement

le serveur en question utilise Javascript pour valider le login...sois tu embarque un moteur JS, soit tu truandes en recalculant sous Delphi ce qu'il fait...mais tu n'est pas à l'abris d'un changement d'algorithme qui rendrait ton code incompatible avec le serveur.

je vois pas bien l'intérêt mais bon..

tu peux avec Chrome voir ce qui passe dans tes requêtes (F12, onglet réseau)

tu as trois variables a, b, c et un algorithme (AES), et tu dois produire le même résultat que ce que contiendra le cookie __test :)
Code:

1 2 cookie := AES('c2f6ffa715a49499b0f9d11384c676c3', 2, 'f655ba9d09a112d4968c63579db590b4', '98344c2eee86c3994890592585b49f80');
ensuite il suffit d'invoquer http://srvDB.MonSite.com/login.php?i=1

bon courage :D

Merci beaucoup pour votre réponse si rapide.

Pour éviter ses problèmes je me suis inscrit sur un autre serveur.
Je suis entrains de faire des tests et le tout me semble fonctionner.

Cordialement