>From: Aaron Bratcher <[EMAIL PROTECTED]>
>
>Anyone have an example of how to handle cookies with a HTTP server
>written in RB?
>
>Thanks.
in the HeadersReceived event:
dim i as integer
if pCookieON then//your own created boolean property
if headers.nameCount("Set-Cookie") > 0 then
me.clearRequestHeaders
me.SetRequestHeader("User-Agent", mAgent)//Mozilla/5.0 etc
for i = 0 to headers.nameCount("Set-Cookie")-1
me.requestHeaders.appendHeader
"Cookie",trim(nthField(headers.value("Set-Cookie",i),";",1))
next
end if
end if
--
Carlo
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>