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:
L'importante é che la pagina ASP restituisca come output un solo carattere e che corrisponda a 1 o a 0.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.
![]()

Rispondi quotando