VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 编程开发 >
  • c语言入门之BCB中使用Cookie

一、在活动的应答项中设置cookie,以及在请求中读同样的cookie.把Cookies设置为应答的一部分,使用SetCookieField方法: 

    TStringList* Cookies = new TStringList(); 
  Cookies->Add("Answer=42"); // whatever... 
  Response->SetCookieField(Cookies,NULL,NULL,Now()+1,false); 
  Cookies->Free(); 

    注意:我们使用一个TStringList来设立一列Cookie值。(传递给SetCookieField的第一个参数)。cookies的每一个列可以有一个主域(Domain) (第二个参数) 和路径(第三个参数)联合起来。(象drbob42.com), 标识哪个URL是cookie将要发送去的。你可以留空这两个参数(就象上面代码一样). 第四个参数指定cookie结束日期,这里我设置为“第二天的同个时间” ,使用Now()+1来设置。最后一个参数要指定,如果cookie的使用是通过一个安全的网络(over a secure network)的话。 

    用户如果认可这个cookie, 接着在一个OnAction事件中我们需要读cookie的值。(以便确定回答字段的值)Cookie是请求类(Request class)的一部分,就象ContentFields, 所以可以使用CookieFields 属性来得到: 
    
    int Answer = StrToInt(request->CookieFields->Values["Answer"]); 

    注意:在调用StrToInt() 可能会发生一个例外,(如空的串(string),这种情况下cookie将没被设置,没找到或终止) 所以在这里要使用一个try-except。

  二、使用VCL如何读和写cookies 读一个cookie的值: 

      Request->CookieFields->Values["name of cookie"]; 
  
    向一个 cookie 写值: 

      Response->SetCookieField(TStrings* Values, AnsiString Domain, AnsiString APath, TDateTime AExpires, bool ASecure); 

相关教程