正规方法:
ASP的Session是通过Cookie来实现的,在AcitvexForm中得到当前IE对象,然后就可以读取Cookie值了;
例子:
var
browser: IWebBrowser2;
isp: IServiceProvider;
doc:IHTMLDocument2;
begin
isp := ActiveFormControl.ClientSite as IServiceProvider;
if (isp.QueryService(IWebbrowserApp, IWebbrowser2, browser) = S_OK) then
begin
doc:= browser.Document as IHTMLDocument2;
showmessage(doc.cookie);
end;
end;
正规方法:
ASP的Session是通过Cookie来实现的,在AcitvexForm中得到当前IE对象,然后就可以读取Cookie值了;
例子:
var
browser: IWebBrowser2;
isp: IServiceProvider;
doc:IHTMLDocument2;
begin
isp := ActiveFormControl.ClientSite as IServiceProvider;
if (isp.QueryService(IWebbrowserApp, IWebbrowser2, browser) = S_OK) then
begin
doc:= browser.Document as IHTMLDocument2;
showmessage(doc.cookie);
end;
end