社区
VB基础类
帖子详情
怎样利用wininet.dll 获得网上文件大小。
qubolz
2003-01-07 07:41:45
怎样利用wininet.dll 获得网上文件大小。
就是想不用控件实现获得网络文件的大小。谢谢了。
...全文
159
2
打赏
收藏
怎样利用wininet.dll 获得网上文件大小。
怎样利用wininet.dll 获得网上文件大小。 就是想不用控件实现获得网络文件的大小。谢谢了。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
fling_boy
2003-01-07
打赏
举报
回复
如何从Internet上有效而稳定地下载文件 ,这是很多网络应用程序要考虑的重要问题,本文提供的代码段针对这个问题进行了初步的探索。希望能够抛砖引玉,对各位编程人员有所帮助。
UINT InternetGetFile (HINTERNET IN hOpen,
CHAR *szUrl,
CHAR *szFileName,
HWND hwndProgress,
int idStatusText,
int idProgressBar);
这里返回值的类型为UINT,如果成功返回0,否则返回非零值。为了使用这个函数,只需要提供一个有效的HINTERNET句柄,这个句柄可以通过标准的InternetOpen()掉用来获得。如果你愿意的话,你还可以将一个句柄提供给进度窗口(ID为一静态控制的标示符,用来显示状态),在这个函数的头几行代码中声明一些变量。
DWORD dwSize;
这个变量被用于存储每次调用InternetReadFile读取了多少数据。
CHAR szHead[] = "Accept: */*\r\n\r\n";
用于存储多个HTTP头信息。如果在调用InternetOpenUrl时不传递着个头信息,则只允许你打开文本文件!
VOID* szTemp[16384];
缓冲变量,可以存储来自Internet的16KB的文件数据。
HINTERNET hConnect;
这是一个HINTERNET句柄,包含请求结果(来自InternetOpenUrl)
FILE * pFile;
标准的C文件句柄(必须包含stdio.h)。如果你愿意,可以使用Win32处理文件的API
if (!(hConnect = InternetOpenUrlA (hOpen, szUrl, szHead, lstrlenA (szHead), INTERNET_FLAG_DONT_CACHE | INTERNET_FLAG_PRAGMA_NOCACHE | INTERNET_FLAG_RELOAD, 0)))
{
return INTERNET_ERROR_OPENURL;
}
此调用可以打开一个使用URL的Internet文件句柄。标志表示这个文件总是被读取,而不是缓存(cache)。如果失败,则此函数返回错误,你可以给定INTERNET_ERROR_OPENURL任何值。必须为这个函数定义所有的错误信息。也可以用一个数字替代。
if(!(pFile = fopen(szFileName, "wb" )))
{
return INTERNET_ERROR_FILEOPEN;
}
此调用根据给定的文件名打开文件。如果失败则返回另一个用户定义的错误。
DWORD dwByteToRead = 0;
DWORD dwSizeOfRq = 4;
DWORD dwBytes = 0;
这三个值分别存储文件的大小,HttpQueryInfo内容的大小和总共读取的字节数。
if (!HttpQueryInfo(hConnect, HTTP_QUERY_CONTENT_LENGTH | HTTP_QUERY_FLAG_NUMBER, (LPVOID)&dwByteToRead, &dwSizeOfRq, NULL))
{
dwByteToRead = 0;
}
此调用可以获得文件的大小。如果失败则dwByteToRead被置为0,并且当文件被下载时不会显示百分比和总数
DWORD start;
DWORD end;
DWORD time;
time = 10;
start = timeGetTime();
使用这些bit必须包含mmsystem.h并链接winmm.lib,它们用于时间选择,告诉用户下载的速度。例子代码只统计了下载速度,你可以扩展这个功能,比如估计还剩多少时间。
do
{
if (!InternetReadFile(hConnect, szTemp, 16384, &dwSize))
{
fclose (pFile);
return INTERNET_ERROR_READFILE;
}
此调用循环中,每次下载一个16KB的数据块。如果download请求失败,则文件被关闭并返回错误。
if (!dwSize)
break;
else
fwrite(szTemp, sizeof(char), dwSize, pFile);
如果dwSize为0,则意味着一个EOF,循环退出。否则由InternetReadFile读取的数据内容被写到本地文件中。
dwBytes+=dwSize;
if(dwByteToRead && hwndProgress)
{
SendDlgItemMessageA(hwndProgress, idProgressBar, WM_USER+2, (dwBytes*100)/dwByteToRead, 0);
UpdateWindow(hwndProgress);
}
这个代码中,dwBytes是从文件读取的数据量,它不断增加,如果文件长度是有效的,则进度窗口句柄被指定,进度条被更新已表示下载进度。
FLOAT fSpeed = 0;
fSpeed = (float)dwBytes;
fSpeed /= ((float)time)/1000.0f;
fSpeed /= 1024.0f;
这些bit代码用于根据所花时间计算下载速度和读取的数据量。
if(hwndProgress)
{
char s[260];
sprintf(s, "%d KB / %d KB @ %1.1f KB/s", dwBytes/1024, dwByteToRead/1024, fSpeed);
SetDlgItemTextA(hwndProgress, idStatusText, s);
UpdateWindow(hwndProgress);
}
设置和处理进度窗口的状态文本,表示下载的文件大小和下载速度。
end = timeGetTime();
time = end - start;
if(time == 0)
time = 10;
时间被更新
} // do
while (TRUE);
循环结束
fflush (pFile);
fclose (pFile);
return 0;
}
最后,函数结束,关闭文件并清除硬件驱动的缓冲。返回0表示成功。
feixuehenshui
2003-01-07
打赏
举报
回复
up
Hook浏览器控件WebBrowser对
WIN
INET
.
dll
的调用
本文介绍了一种通过HOOK技术捕获Web请求中的HTTP Header的方法。
利用
HOOK
Win
Inet
.
dll
中的相关函数,可以在WebBrowser控件发起HTTP请求时拦截并读取HTTP Header,包括SessionID等信息。
计算机丢失
win
inet
,
win
10系统提示因为计算机中丢失
win
inet
.
dll
的解决技巧
本文提供了详细的步骤来解决
Win
10系统提示缺失
win
inet
.
dll
的问题。首先,通过其他电脑下载
win
inet
.
dll
文件并用U盘复制到问题电脑,或者制作PE启动U盘进行文件传输。接着,将
win
inet
.
dll
文件复制到系统目录下,通常是C:/
Win
dows/System32或C:/
Win
dows/SysWOW64(对于64位系统)。最后,使用注册表编辑器注册该
dll
文件,通过运行命令`regsvr32
win
inet
.
dll
`完成修复。
计算机丢失
win
inet
,
win
7系统提示因为计算机中丢失
win
inet
.
dll
的解决方法
本文详细指导如何应对
Win
7系统中
win
inet
.
dll
缺失:通过U盘修复、设置PE启动、复制
DLL
文件并注册,确保系统恢复正常,无论鼠标是否可用。
python无法找到入口
win
inet
.
dll
_
win
inet
.
dll
修复的几种方法
win
inet
.
dll
对系统正常运行很重要,有时会被杀毒软件误杀。本文介绍了几种修复方法,如在任务管理器中运行卡巴斯基恢复该文件;
网上
下载文件并通过PE系统复制;从
dll
cache文件夹复制到system32文件夹等。
VB基础类
7,789
社区成员
197,583
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章