VB 6 で URL を押して Cookie を読み取ろうとしています。これについて多くのことを検索しましたが、解決策を見つけることができませんでした。
1 に答える
1
これは、ブラウザで開かずにURLにアクセスして、そのURLに保存されているCookie情報を取得するために探していたものです....
コメントをくださった皆様、ありがとうございました..
Const scUserAgent = "API-Guide test program"
Const INTERNET_OPEN_TYPE_DIRECT = 1
Const INTERNET_OPEN_TYPE_PROXY = 3
Const INTERNET_FLAG_RELOAD = &H80000000
Const sURL = "url"
Dim TargetUrl As String
Dim hOpen As Long
Dim hFile As Long
Dim abc As String
TargetUrl = "url"
hOpen = InternetOpen(scUserAgent, INTERNET_OPEN_TYPE_DIRECT, vbNullString, vbNullString, 0)
hFile = InternetOpenUrl(hOpen, sURL, vbNullString, ByVal 0&, INTERNET_FLAG_RELOAD, ByVal 0&)
abc = GetCookies("url", "CookieName")
MsgBox "The cookie= " & abc
于 2013-09-10T11:44:44.193 に答える