设置CookIE的问题,300分求助!(200分)

  • 主题发起人 主题发起人 我爱大咪咪
  • 开始时间 开始时间

我爱大咪咪

Unregistered / Unconfirmed
GUEST, unregistred user!
function THTTPClass.GetIeCookIE(Url:String;CookIE:string):Boolean;
var
lpvBuffer : array[0..1000] of Byte;
lpdwBufferLength : Cardinal;
begin
lpdwBufferLength := SizeOf(lpvBuffer);
Result := InternetGetCookie(PChar(Url),nil,@lpvBuffer,lpdwBufferLength);
if Result then
CookIE := PChar(@lpvBuffer);
end;

....
....
if GetIeCookIE(UserGetUrl,CookIEStr) then
_HTTP.Request.CustomHeaders.Text := 'cookie: '+CookIEStr;



这是参考网上的一个例子设置CookIE的,好像没什么用处

网站是asp.net开发的,各位有什么高招没有?请赐教
 
没人回答?
 
var
ParamStr : TStrings;
TempHTML : String;
begin
ParamStr := TStringList.Create;
ParamStr.Clear;
ParamStr.add(#Input Parameters#);
...
...
IdHTTP.Request.CustomHeaders.Add(#CookIEStr#);
try
TempHTML := IdHTTP.Post(#Url#,ParamStr);
except
MessageBox(Application.Handle,'Error #..#','MsgBox',mb_ok);
end;
....
....
end;
 
接受答案了.
 
后退
顶部