来吧,我摆不平了!!!(50分)

  • 主题发起人 主题发起人 chinapig
  • 开始时间 开始时间
C

chinapig

Unregistered / Unconfirmed
GUEST, unregistred user!
大哥,大姐们:
请您们给看一下这段代码有什么问题:
MyCookies := TStringList.Create;
try
if (comparetext(request.ContentFields.Values['uid'], 'UserId') = 0) and
(comparetext(request.contentfields.values['password'], 'PassWord') = 0) then
begin
mycookies.Add('IsLogon=Logoned');
response.Cookies.Clear;
response.SetCookieField(mycookies, '', '/', -1, false);
response.SendRedirect('http://chinesepig/email.exe/MailList');
end
else
begin
response.SendRedirect('http://chinesepig/email.exe');
end;
finally
mycookies.free;
end;
问题:
有时能读出cookies,但大多数时候读不出,我看资料说时因为sendredirect与cookies
冲突,如果真是这样如何解决呢?
 
为什么受伤的总是我!!!
 
to chinapig
你的代码好像不太好!另外请全部帖出来
 
to duducat:
什么不太好!
如果解决此问题!
 
用TAdoQuery好
 
分给delphiprogramer吧!虽然没解决问题,但精神可佳,希望以后多帮我,谢谢!
 
后退
顶部