vb6 - URLを叩いてVB6でクッキーを読む方法

Question

VB 6 で URL を押して Cookie を読み取ろうとしています。これについて多くのことを検索しましたが、解決策を見つけることができませんでした。

Answer 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