高手指教:有没有办法把网上的 ..../234234.swf 文件弄下来啊?如果没有只好用WINSOCK了啊

tanyx 2003-08-21 12:02:00
主要是为了离线使用。
...全文
96 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
flyingscv 2003-08-21
  • 打赏
  • 举报
回复
查找234234[1].swf
lxcc 2003-08-21
  • 打赏
  • 举报
回复
添加Microsoft Internet transfer Controls控件
Private Sub Command1_Click()

Dim b() As Byte
Dim strURL As String
'自己找URL
strURL = "http://www.csdn.net/adv//web4banner0730-.swf"

b() = Inet1.OpenURL(strURL, icByteArray)

Open "C:\web4banner0730-.swf" For Binary Access _
Write As #1
Put #1, , b()
Close #1
End Sub

longyangyang 2003-08-21
  • 打赏
  • 举报
回复
在Windows下的上网临时文件夹中该文件可以拷贝出来
射天狼 2003-08-21
  • 打赏
  • 举报
回复
用IE浏览完了之后上IE缓存目录里面去查找*.SWF文件,按文件大小浏览,找比较大的.
tanyx 2003-08-21
  • 打赏
  • 举报
回复
lxcc(虫莲) 还是棋高一着啊,我把 openurl的第二个参数给忘记了。
结,看来分也不都是混来的啊。
射天狼 2003-08-21
  • 打赏
  • 举报
回复
IE缓存里不一定存的就是显示的文件名,98下是在WINDOWS目录下,2000是在
C:\Documents and Settings\Administrator\Local Settings\Temporary Internet Files

看你用什么用户登录了,就到登录用户那个目录下找就可以了.

7,759

社区成员

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

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