Access the answers to your technology questions today.
Subscribe Now
30-day free trial. Register in 60 seconds.
What Makes Experts Exchange Unique?
Members of the expert community talk about why the experience at Experts Exchange is different than what you will find anywhere else.
Try it out and discover for yourself.
Subscribe Now
30-day free trial. Register in 60 seconds.
Join the Community
Give a Little. Get a Lot.
Join the community of experts here and help other tech pros by answering question in your area of expertise. You can earn FREE access to all Experts Exchange's premium features and resources.
Join the Community
by: RadikalQ3Posted on 2005-06-21 at 14:00:22ID: 14270413
You can use the Indy library of internet VCL components. /
: TObject); ; .Create;
sername', 'TheUserName...'); assword', 'ThePassword..');
ampleWeb.c om/login.p hp',Parame ters);
If your Delphi does not have them, you can download it from its homepage: http://www.indyproject.org
Then you can use a TidHTTP client component for make the post of the login form
Here you have an example of Put with parameters:
procedure TForm1.Button1Click(Sender
var
Parameters: TIdMultiPartFormDataStream
begin
Parameters := TIdMultiPartFormDataStream
try
//Add the used parameters for the script
//See all the parameters used in your case!
//including hide parameters...
Parameters.AddFormField('u
Parameters.AddFormField('p
//Call the Post method of TIdHTTP and read the result into TMemo
Memo1.Lines.Text := IdHTTP1.Post('http:/www.Ex
finally
Parameters.Free;
end;
end;
Later, in the Memo1 you have the result of the form send.
Instead of a Tmemo, you can save it in a file.
You must provide to the script the required parameters present in the html page that contains the form.