还是COOKIE的问题，希望大家帮忙啊！急得很

Question

有谁知道，自动覆盖COOKIE处理是怎么回事啊？就是IE里面有的这个设置，用程序怎么控制啊，谢谢，很急的

Answer 1

Public Declare Function InternetSetCookie Lib "wininet.dll" Alias "InternetSetCookieA" _
        (ByVal lpszUrlName As String, _
        ByVal lpszCookieName As String, _
        ByVal lpszCookieData As String) As BooleanPublic Declare Function InternetGetCookie Lib "wininet.dll" _
        Alias "InternetGetCookieA" _
        (ByVal lpszUrlName As String, _
        ByVal lpszCookieName As String, _
        ByVal lpszCookieData As String, _
        lpdwSize As Long) As BooleanPublic Function SetCookie(ByVal UrlName As String, ByVal CookieName As String, ByVal CookieData As String)
  Dim blnReturn As Boolean  blnReturn = InternetSetCookie(UrlName, CookieName, CookieData)  If blnReturn = False Then MsgBox "Make Cookie Operation Failed!", vbCritical
End FunctionPublic Function GetCookie(ByVal UrlName As String, ByVal CookieName As String) As String
   Dim strCookieText As String * 256
   Dim blnReturn As Boolean   blnReturn = InternetGetCookie(UrlName, CookieName, strCookieText, 255)
   
   If blnReturn = False Then
     MsgBox "Get Cookie Operation Failed", vbCritical
     GetCookie = "Error"
   Else
     MsgBox strCookieText, vbInformation
     GetCookie = strCookieText
   End If
   
End Function