那位大虾能告诉我那里有关于wininet.dll的详细资料?

码农猿圈圈 2000-06-23 01:51:00
...全文
250 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
码农猿圈圈 2001-05-15
  • 打赏
  • 举报
回复
to Un1:
我找到了!谢谢你!!!
Un1 2001-05-12
  • 打赏
  • 举报
回复
这里有一些:

'wininet.bas

Option Explicit

Public Declare Function InternetOpen Lib "wininet.dll" Alias "InternetOpenA" (ByVal sAgent As String, ByVal lAccessType As Long, ByVal sProxyName As String, ByVal sProxyBypass As String, ByVal lFlags As Long) As Long
Public Declare Function InternetOpenUrl Lib "wininet.dll" Alias "InternetOpenUrlA" (ByVal pub_lngInternetSession As Long, ByVal lpszUrl As String, ByVal lpszHeaders As String, ByVal dwHeadersLength As Long, ByVal dwFlags As Long, ByVal dwContext As Long) As Long
Public Declare Sub InternetSetStatusCallback Lib "wininet.dll" (ByVal pub_lngInternetSession As Long, ByVal lpfnInternetCallback As Long)
Public Declare Function InternetConnect Lib "wininet.dll" Alias "InternetConnectA" (ByVal pub_lngInternetSession As Long, ByVal sServerName As String, ByVal nServerPort As Integer, ByVal sUsername As String, ByVal sPassword As String, ByVal lService As Long, ByVal lFlags As Long, ByVal lContext As Long) As Long
Public Declare Function HttpOpenRequest Lib "wininet.dll" Alias "HttpOpenRequestA" (ByVal hHttpSession As Long, ByVal sVerb As String, ByVal sObjectName As String, ByVal sVersion As String, ByVal sReferer As String, ByVal something As Long, ByVal lFlags As Long, ByVal lContext As Long) As Long
Public Declare Function HttpSendRequest Lib "wininet.dll" Alias "HttpSendRequestA" (ByVal hHttpRequest As Long, ByVal sHeaders As String, ByVal lHeadersLength As Long, sOptional As Any, ByVal lOptionalLength As Long) As Integer
Public Declare Function HttpQueryInfo Lib "wininet.dll" Alias "HttpQueryInfoA" (ByVal hHttpRequest As Long, ByVal lInfoLevel As Long, ByRef sBuffer As Any, ByRef lBufferLength As Long, ByRef lIndex As Long) As Integer
'Public Declare Function InternetReadFile Lib "wininet.dll" (ByVal hFile As Long, ByVal sBuffer As String, ByVal lNumBytesToRead As Long, lNumberOfBytesRead As Long) As Integer
Public Declare Function InternetReadFile Lib "wininet.dll" (ByVal hFile As Long, Buffer As Any, ByVal lNumBytesToRead As Long, lNumberOfBytesRead As Long) As Integer
'Public Declare Function InternetWriteFile Lib "wininet.dll" (ByVal hFile As Long, ByVal sBuffer As String, ByVal lNumBytesToWrite As Long, dwNumberOfBytesWritten As Long) As Integer
Public Declare Function InternetWriteFile Lib "wininet.dll" (ByVal hFile As Long, Buffer As Any, ByVal lNumBytesToWrite As Long, dwNumberOfBytesWritten As Long) As Integer
Public Declare Function InternetCloseHandle Lib "wininet.dll" (ByVal hInet As Long) As Integer
Public Declare Function InternetQueryDataAvailable Lib "wininet.dll" (ByVal hInet As Long, dwAvail As Long, ByVal dwFlags As Long, ByVal dwContext As Long) As Boolean

Public Declare Function InternetTimeToSystemTime Lib "wininet.dll" (ByVal lpszTime As String, ByRef pst As SYSTEMTIME, ByVal dwReserved As Long) As Long

Declare Function FtpFindFirstFile Lib "wininet.dll" Alias "FtpFindFirstFileA" (ByVal hFtpSession As Long, ByVal lpszSearchFile As String, lpFindFileData As WIN32_FIND_DATA, ByVal dwFlags As Long, ByVal dwContext As Long) As Long
Declare Function InternetFindNextFile Lib "wininet.dll" Alias "InternetFindNextFileA" (ByVal hFind As Long, lpvFindData As WIN32_FIND_DATA) As Long
Declare Function InternetGetLastResponseInfo Lib "wininet.dll" Alias "InternetGetLastResponseInfoA" (lpdwError As Long, ByVal lpszBuffer As String, lpdwBufferLength As Long) As Long
Declare Function FtpOpenFile Lib "wininet.dll" Alias "FtpOpenFileA" (ByVal hFtpSession As Long, ByVal lpszFileName As String, ByVal fdwAccess As Long, ByVal dwFlags As Long, ByVal dwContext As Long) As Long
Declare Function FtpGetFile Lib "wininet.dll" Alias "FtpGetFileA" (ByVal hFtpSession As Long, ByVal lpszRemoteFile As String, ByVal lpszNewFile As String, ByVal fFailIfExists As Long, ByVal dwFlagsAndAttributes As Long, ByVal dwFlags As Long, ByVal dwContext As Long) As Long
Declare Function FtpPutFile Lib "wininet.dll" Alias "FtpPutFileA" (ByVal hFtpSession As Long, ByVal lpszLocalFile As String, ByVal lpszNewRemoteFile As String, ByVal dwFlags As Long, ByVal dwContext As Long) As Long
Declare Function FtpCreateDirectory Lib "wininet.dll" Alias "FtpCreateDirectoryA" (ByVal hFtpSession As Long, ByVal lpszDirectory As String) As Long
Declare Function FtpDeleteFile Lib "wininet.dll" Alias "FtpDeleteFileA" (ByVal hFtpSession As Long, ByVal lpszFileName As String) As Long
Declare Function FtpRemoveDirectory Lib "wininet.dll" Alias "FtpRemoveDirectoryA" (ByVal hFtpSession As Long, ByVal lpszDirectory As String) As Long
Declare Function FtpRenameFile Lib "wininet.dll" Alias "FtpRenameFileA" (ByVal hFtpSession As Long, ByVal lpszExisting As String, ByVal lpszNew As String) As Long
Declare Function FtpSetCurrentDirectory Lib "wininet.dll" Alias "FtpSetCurrentDirectoryA" (ByVal hFtpSession As Long, ByVal lpszDirectory As String) As Boolean
Declare Function FtpGetCurrentDirectory Lib "wininet.dll" Alias "FtpGetCurrentDirectoryA" (ByVal hFtpSession As Long, ByVal lpszCurrentDirectory As String, lpdwCurrentDirectory As Long) As Long

' Use registry access settings.
Public Const INTERNET_OPEN_TYPE_PRECONFIG = 0
Public Const INTERNET_OPEN_TYPE_DIRECT = 1

' Number of the TCP/IP port on the server to connect to.
Public Const INTERNET_INVALID_PORT_NUMBER = 0
Public Const INTERNET_DEFAULT_FTP_PORT = 21
Public Const INTERNET_DEFAULT_GOPHER_PORT = 70
Public Const INTERNET_DEFAULT_HTTP_PORT = 80
Public Const INTERNET_DEFAULT_HTTPS_PORT = 443
Public Const INTERNET_DEFAULT_SOCKS_PORT = 1080

' Type of service to access.
Public Const INTERNET_SERVICE_FTP = 1
Public Const INTERNET_SERVICE_GOPHER = 2
Public Const INTERNET_SERVICE_HTTP = 3

' Brings the data across the wire even if it locally cached.
Public Const INTERNET_FLAG_RELOAD = &H80000000
Public Const ERROR_NO_MORE_FILES = 18

Public Const FTP_TRANSFER_TYPE_UNKNOWN As Long = &H0 '0x00000000
Public Const FTP_TRANSFER_TYPE_ASCII As Long = &H1 '0x00000001
Public Const FTP_TRANSFER_TYPE_BINARY As Long = &H2 '0x00000002

' The possible values for the lInfoLevel parameter include:
Public Const HTTP_QUERY_CONTENT_TYPE = 1
Public Const HTTP_QUERY_CONTENT_LENGTH = 5
Public Const HTTP_QUERY_EXPIRES = 10
Public Const HTTP_QUERY_LAST_MODIFIED = 11
Public Const HTTP_QUERY_PRAGMA = 17
Public Const HTTP_QUERY_VERSION = 18
Public Const HTTP_QUERY_STATUS_CODE = 19
Public Const HTTP_QUERY_STATUS_TEXT = 20
Public Const HTTP_QUERY_RAW_HEADERS = 21
Public Const HTTP_QUERY_RAW_HEADERS_CRLF = 22
Public Const HTTP_QUERY_FORWARDED = 30
Public Const HTTP_QUERY_SERVER = 37
Public Const HTTP_QUERY_USER_AGENT = 39
Public Const HTTP_QUERY_SET_COOKIE = 43
Public Const HTTP_QUERY_REQUEST_METHOD = 45

' Add this flag to the about flags to get request header.
Public Const HTTP_QUERY_FLAG_REQUEST_HEADERS = &H80000000

' flags for InternetOpenUrl
Public Const INTERNET_FLAG_RAW_DATA = &H40000000
Public Const INTERNET_FLAG_EXISTING_CONNECT = &H20000000
Public Const INTERNET_FLAG_TRANSFER_ASCII = &H1&
Public Const INTERNET_FLAG_TRANSFER_BINARY = &H2&

' flags for InternetOpen
Public Const INTERNET_FLAG_ASYNC = &H10000000
Public Const INTERNET_FLAG_PASSIVE = &H8000000
Public Const INTERNET_FLAG_DONT_CACHE = &H4000000
Public Const INTERNET_FLAG_MAKE_PERSISTENT = &H2000000
Public Const INTERNET_FLAG_OFFLINE = &H1000000

Public Type INTERNET_ASYNC_RESULT
dwResult As Long
dwError As Long
End Type

Public Const INTERNET_FLAG_NO_CACHE_WRITE = &H4000000 ' don't write this item to the cache
Public Const INTERNET_STATUS_RESOLVING_NAME = 10
Public Const INTERNET_STATUS_NAME_RESOLVED = 11
Public Const INTERNET_STATUS_CONNECTING_TO_SERVER = 20
Public Const INTERNET_STATUS_CONNECTED_TO_SERVER = 21
Public Const INTERNET_STATUS_SENDING_REQUEST = 30
Public Const INTERNET_STATUS_REQUEST_SENT = 31
Public Const INTERNET_STATUS_RECEIVING_RESPONSE = 40
Public Const INTERNET_STATUS_RESPONSE_RECEIVED = 41
Public Const INTERNET_STATUS_CTL_RESPONSE_RECEIVED = 42
Public Const INTERNET_STATUS_PREFETCH = 43
Public Const INTERNET_STATUS_CLOSING_CONNECTION = 50
Public Const INTERNET_STATUS_CONNECTION_CLOSED = 51
Public Const INTERNET_STATUS_HANDLE_CREATED = 60
Public Const INTERNET_STATUS_HANDLE_CLOSING = 70
Public Const INTERNET_STATUS_REQUEST_COMPLETE = 100
Public Const INTERNET_STATUS_REDIRECT = 110
Public Const INTERNET_STATUS_STATE_CHANGE = 200
Public Const INTERNET_ERROR_BASE = 12000

Public Const ERROR_INTERNET_OUT_OF_HANDLES = 12001
Public Const ERROR_INTERNET_TIMEOUT = 12002
Public Const ERROR_INTERNET_EXTENDED_ERROR = 12003
Public Const ERROR_INTERNET_INTERNAL_ERROR = 12004
Public Const ERROR_INTERNET_INVALID_URL = 12005
Public Const ERROR_INTERNET_UNRECOGNIZED_SCHEME = 12006
Public Const ERROR_INTERNET_NAME_NOT_RESOLVED = 12007
Public Const ERROR_INTERNET_PROTOCOL_NOT_FOUND = 12008
Public Const ERROR_INTERNET_INVALID_OPTION = 12009
Public Const ERROR_INTERNET_BAD_OPTION_LENGTH = 12010
Public Const ERROR_INTERNET_OPTION_NOT_SETTABLE = 12011
Public Const ERROR_INTERNET_SHUTDOWN = 12012
Public Const ERROR_INTERNET_INCORRECT_USER_NAME = 12013
Public Const ERROR_INTERNET_INCORRECT_PASSWORD = 12014
Public Const ERROR_INTERNET_LOGIN_FAILURE = 12015
Public Const ERROR_INTERNET_INVALID_OPERATION = 12016
Public Const ERROR_INTERNET_OPERATION_CANCELLED = 12017
Public Const ERROR_INTERNET_INCORRECT_HANDLE_TYPE = 12018
Public Const ERROR_INTERNET_INCORRECT_HANDLE_STATE = 12019
Public Const ERROR_INTERNET_NOT_PROXY_REQUEST = 12020
Public Const ERROR_INTERNET_REGISTRY_VALUE_NOT_FOUND = 12021
Public Const ERROR_INTERNET_BAD_REGISTRY_PARAMETER = 12022
Public Const ERROR_INTERNET_NO_DIRECT_ACCESS = 12023
Public Const ERROR_INTERNET_NO_CONTEXT = 12024
Public Const ERROR_INTERNET_NO_CALLBACK = 12025
Public Const ERROR_INTERNET_REQUEST_PENDING = 12026
Public Const ERROR_INTERNET_INCORRECT_FORMAT = 12027
Public Const ERROR_INTERNET_ITEM_NOT_FOUND = 12028
Public Const ERROR_INTERNET_CANNOT_CONNECT = 12029
Public Const ERROR_INTERNET_CONNECTION_ABORTED = 12030
Public Const ERROR_INTERNET_CONNECTION_RESET = 12031
Public Const ERROR_INTERNET_FORCE_RETRY = 12032
Public Const ERROR_INTERNET_INVALID_PROXY_REQUEST = 12033
Public Const ERROR_INTERNET_NEED_UI = 12034

Public Const ERROR_INTERNET_HANDLE_EXISTS = 12036
Public Const ERROR_INTERNET_SEC_CERT_DATE_INVALID = 12037
Public Const ERROR_INTERNET_SEC_CERT_CN_INVALID = 12038
Public Const ERROR_INTERNET_HTTP_TO_HTTPS_ON_REDIR = 12039
Public Const ERROR_INTERNET_HTTPS_TO_HTTP_ON_REDIR = 12040
Public Const ERROR_INTERNET_MIXED_SECURITY = 12041
Public Const ERROR_INTERNET_CHG_POST_IS_NON_SECURE = 12042
Public Const ERROR_INTERNET_POST_IS_NON_SECURE = 12043
Public Const ERROR_INTERNET_CLIENT_AUTH_CERT_NEEDED = 12044
Public Const ERROR_INTERNET_INVALID_CA = 12045
Public Const ERROR_INTERNET_CLIENT_AUTH_NOT_SETUP = 12046
Public Const ERROR_INTERNET_ASYNC_THREAD_FAILED = 12047
Public Const ERROR_INTERNET_REDIRECT_SCHEME_CHANGE = 12048

'//
'// FTP API errors
'//

Public Const ERROR_FTP_TRANSFER_IN_PROGRESS = 12110
Public Const ERROR_FTP_DROPPED = 12111

'//
'// gopher API errors
'//

Public Const ERROR_GOPHER_PROTOCOL_ERROR = 12130
Public Const ERROR_GOPHER_NOT_FILE = 12131
Public Const ERROR_GOPHER_DATA_ERROR = 12132
Public Const ERROR_GOPHER_END_OF_DATA = 12133
Public Const ERROR_GOPHER_INVALID_LOCATOR = 12134
Public Const ERROR_GOPHER_INCORRECT_LOCATOR_TYPE = 12135
Public Const ERROR_GOPHER_NOT_GOPHER_PLUS = 12136
Public Const ERROR_GOPHER_ATTRIBUTE_NOT_FOUND = 12137
Public Const ERROR_GOPHER_UNKNOWN_LOCATOR = 12138

'//
'// HTTP API errors
'//

Public Const ERROR_HTTP_HEADER_NOT_FOUND = 12150
Public Const ERROR_HTTP_DOWNLEVEL_SERVER = 12151
Public Const ERROR_HTTP_INVALID_SERVER_RESPONSE = 12152
Public Const ERROR_HTTP_INVALID_HEADER = 12153
Public Const ERROR_HTTP_INVALID_QUERY_REQUEST = 12154
Public Const ERROR_HTTP_HEADER_ALREADY_EXISTS = 12155
Public Const ERROR_HTTP_REDIRECT_FAILED = 12156
Public Const ERROR_HTTP_NOT_REDIRECTED = 12160 '// BUGBUG

Public Const ERROR_INTERNET_SECURITY_CHANNEL_ERROR = 12157 '// BUGBUG
Public Const ERROR_INTERNET_UNABLE_TO_CACHE_FILE = 12158 ' // BUGBUG
Public Const ERROR_INTERNET_TCPIP_NOT_INSTALLED = 12159 '// BUGBUG

Public Const INTERNET_ERROR_LAST = 12159
码农猿圈圈 2001-05-10
  • 打赏
  • 举报
回复
x86 2000-06-23
  • 打赏
  • 举报
回复
在MSDN中的WinInet API不知是否你想要的东西。
注意了,装MSDN的时候一定要选上Platform SDK
码农猿圈圈 2000-06-23
  • 打赏
  • 举报
回复
谢谢x86,
我就去查!
嘻嘻,看来你的汇编不错吧!?
RAD Studio 10.2 Toyko Update2 10.2.2 KEYGEN 一键激活,安装时选择试用,安装完毕后一键激活即可。亲测可用!! Win10 Build 16299 旗舰版 亲测可用!!! 为了便于在 Lite 14.x 中使用大侠们的特别补丁,初步写成这个:Activator.exe 他的主要作用: 1、整合 elseif、unis、x-force、cjack 大虾的 Keygen 相对原始部署方式,这个 Activator 实现“一键激活”! 使用方法: 1、执行 Activator.exe 发布历史: 2017.12.14 - v14.2 1、根据 25.0.28979.1978 原版制作,基于 RadStudioKeygenSourceCodeTokyo10.2Update2CorrectedSetup.zip 的成果 2017.08.11 - v14.1 1、根据 25.0.27659.1188 原版制作,基于 elseif-Rad-Studio-Keygen-master upto 10.2.1 的成果 2017.03.26 - v14.0 1、根据 25.0.26309.314 原版制作,基于 elseif、unis、x-force、cjack 等大虾的成果 已知问题: 1、在一些操作系统上如果出现安全提示,直接确定即可。 特别感谢: 1、elseif、unis、x-force、cjack、crackerjack、dr、freecat、gateway、huayan889、kerlingen、sinner、yuto 等大侠的特别补丁,感谢诸位我知道的不知道的的大虾们的辛勤劳动! 2、iny、nevergrief、snakejiao、star5、tintin1943、ti9er、wang_80919、wuxiangyang 等等我知道的不知道的的网友们的热情测试! 3、andreas hausladen 等大虾们的无私贡献! O(∩_∩)O~ Delphi 10.2 and C++Builder 10.2 Updata2 亲测可用! Embarcadero® C++Builder 10.2 Version 25.0.28979.1978 Copyright © 2017 Embarcadero Technologies, Inc. All Rights Reserved. advapi32.dll, 10.0.16299.15, C:\WINDOWS\System32\ AEPIC.dll, 10.0.16299.15, C:\WINDOWS\SYSTEM32\ androiddebugide250.bpl, 25.0.28979.1978, d:\program files (x86)\embarcadero\studio\19.0\Bin\ appanalytics250.bpl, 25.0.28979.1978, D:\Program Files (x86)\Embarcadero\Studio\19.0\bin\ apphelp.dll, 10.0.16299.98, C:\WINDOWS\SYSTEM32\ applet250.bpl, 25.0.28979.1978, d:\program files (x86)\embarcadero\studio\19.0\bin\ asmview250.bpl, 25.0.28979.1978, d:\program files (x86)\embarcadero\studio\19.0\Bin\ ATL.DLL, 3.5.2284.0, C:\Windows\System32\ bcbandroid250.bpl, 25.0.28979.1978, d:\program files (x86)\embarcadero\studio\19.0\Bin\ bcbcoment250.bpl, 25.0.28979.1978, d:\program files (x86)\embarcadero\studio\19.0\Bin\ bcbcompro250.bpl, 25.0.28979.1978, d:\program files (x86)\embarcadero\studio\19.0\Bin\ bcbent250.bpl, 25.0.28979.1978, d:\program files (x86)\embarcadero\studio\19.0\Bin\ bcbfmxide250.bpl, 25.0.28979.1978, d:\program files (x86)\embarcadero\s

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧