Re: appcontrols.com - out of business -?
From: Aleksey Kuznetsov (nospam_at_nospam.org)
Date: 08/04/04
- Next message: Viatcheslav V. Vassiliev: "ANN: Advanced guide to interop (.Net and COM) in Delphi is published"
- Previous message: Viatcheslav V. Vassiliev: "Re: TWebBrowser and SelectAll"
- In reply to: vmars: "ANN: appcontrols.com - out of business -?"
- Next in thread: vmars: "Re: appcontrols.com - out of business -?"
- Reply: vmars: "Re: appcontrols.com - out of business -?"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Date: Wed, 4 Aug 2004 19:37:08 +0300
My apologies for delay with response. I have answered also by email. In
general, the PostData is normal string, which can be extracted from PostData
using following code:
function PostDataToStr(PostData: WideString): String;
begin
SetLength(Result, Length(PostData) shl 1 - 1); // -1 tailing #0
Move(PostData[1], Result[1], Length(Result));
end;
Example how to use PostDataToStr:
procedure TMainForm.IESniffer1WBBeforeNavigate2(Sender: TObject;
const URL: String; const Browser: IWebBrowser2; const pDisp: IDispatch;
var NewURL, Flags, TargetFrameName, PostData, Headers: OleVariant;
var Cancel: WordBool);
begin
ShowMessage('PostData = ' + PostDataToStr(PostData));
Thanks,
Aleksey Kuznetsov
http://www.appcontrols.com
"vmars" <vm@verizon.net> wrote in message
news:4110686c@newsgroups.borland.com...
> Since i can't get support from the folks at appcontrols.com , UtilMind
> Solutions ,
> i am assuming that they have gone out of business.
> SO:
> anyone that can help me
> i can give you my source for IESNIFFER
> if you can help me with this problem: Thanks!
> ****
>
> Please, i need some help to use the PostData variable:
> I have been sending this same email to the folks at
> 'http://www.appcontrols.com/contact.html'
> many times in the past three months,
> but have gotten ZERO response.
> Is there anyone out there with a successful 'IESniffer's PostData'
> experience?...Thanks in advance!
>
> In your .hlp Docs for 'OnWBBeforeNavigate2event' it says:
> "PostData contains the data sent to the server when the underlying
operation
> is an
>
> HTTP post message. The event handler can change this value before it is
sent
> to the
>
> target URL. "
>
> When i try this i get all ?????????????????????????
>
> Below is my code for this:
> Can you please show me what is wrong with my code,
> or aim me at the appropriate help info?
>
> For example: How could i read the data from your contact site's .html
page:
> 'http://www.appcontrols.com/contact.html' in my iesniffer BEFORE it is
> sent to the server?
>
> THANK YOU VERY MUCH !
>
> procedure TMainForm.IESniffer1WBBeforeNavigate2(Sender: TObject;
> const URL: String; const Browser: IWebBrowser2; const pDisp: IDispatch;
> var NewURL, Flags, TargetFrameName, PostData, Headers: OleVariant;
> var Cancel: WordBool);
> begin
> IF Browser.Toolbar = 0 Then Cancel := True; // Kill PopUps
> InTrustFile := False;
> // ShowMessage('PostData = ' + PostData);
> Log('vm **** BeforeNavigate2 PostData ', PostData);
> Log('vm **** BeforeNavigate2 AddBar= ', URL);
> Log('vm **** BeforeNavigate2 NewURL= ', NewURL);
> AttemptedURL := NewURL;
>
> ****
> Thanks!
>
>
- Next message: Viatcheslav V. Vassiliev: "ANN: Advanced guide to interop (.Net and COM) in Delphi is published"
- Previous message: Viatcheslav V. Vassiliev: "Re: TWebBrowser and SelectAll"
- In reply to: vmars: "ANN: appcontrols.com - out of business -?"
- Next in thread: vmars: "Re: appcontrols.com - out of business -?"
- Reply: vmars: "Re: appcontrols.com - out of business -?"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Relevant Pages
|
|
