Potresti sfruttare l'output generato dalla pagina ASP, per capire se l'utente é abilitato all'area riservata.
Analizzando meglio il problema, potresti sviluppare una pagina ASP che restituisce come output un solo valore booleano : "1" per accesso all'area oppure "0" per accesso negato.
Per quanto riguarda la parte in Delphi, devi utilizzare il metodo Get anziché l'attuale Post per ottenere il risultato della pagina asp, sottoforma di codice HTML.
In codice:
codice:
procedure TForm1.Button1Click(Sender: TObject);
var
Params: TStringList;
Url, myValue: string;
begin
Url := 'http://x.xxx.xx.xxx/login.asp?
username=ciccio&'password=htmlit;
myValue := http.Get(Url)
if myValue = "1" then
begin
... utente valido
end
else
begin
... utente non valido
end;
end;
end.
L'importante é che la pagina ASP restituisca come output un solo carattere e che corrisponda a 1 o a 0.