我用CookList : TStringList;
    iBZ,fcbz:integer;
 begin
    CookList := TStringList.Create;
    try
        CookList.Add('NSRID='+ sNSRID);
        CookList.Add('NSRMC=' + sNSRMC);
        CookList.Add('WJBM=' + sWJBM);
        CookList.Add('YHZH=' + sYHZH);
        iBZ:=0;
        fcbz:=0;
        CookList.Add('BZ=' + IntToStr(iBZ));
        CookList.Add('FCBZ=' + IntToStr(fcbz));
        Response.SetCookieField(cookList,'','',Now+10,False);
  finally
        cookList.Free;
  End;
End;//创建Cookie    iBZ:=StrToInt(Request.CookieFields.Values['BZ']);//使用C我用这个形式读写cookie的
读写cookie都不行 ,哪位大哥帮帮我。