dofiledownload
dofiledownload,该函式是VB的一个用来调用API进行网路下载的函式。
基本介绍
- 外文名:dofiledownload
- 易语言:调用IE下载
- 语言:中文
- 版本:2
声明
Private Declare Function DoFileDownload Lib "shdocvw.dll"(ByVal lpszFile As String) As Long
'//调用
然后在代码里直接调用:
Dim gourl As String
AdUrl = StrConv("网页地址", vbUnicode) ’在使用时会出现对话框询问用户保存路径
Call DoFileDownload(AdUrl)
易语言 调用IE下载
.版本 2
.DLL命令 外部_转换为宽字元, 整数型, "Kernel32.dll", "MultiByteToWideChar", , 将多媒体字元串映像为通配字元串 _取目标编码长度
.参数 代码页, 整数型, , CP_ACP CP_UTF8
.参数 字元类型, 整数型
.参数 文本, 文本型
.参数 文本长度, 整数型
.参数 快取, 位元组型
.参数 快取大小, 整数型
.DLL命令 下载档案, 整数型, "shdocvw.dll", "DoFileDownload"
.参数 url, 文本型
.版本 2
.子程式 _按钮1_被单击
下载 ()
.子程式 下载
.局部变数 url, 文本型
.局部变数 u, 文本型
url = 编辑框1.内容
u = 取空白文本 (1024)
unicode (1, 2, url, -1, u, 1024)
下载档案 (u)