如何读取 后缀名为*.mht文件里面的所有图片？

Question

后缀名为*.mht文件是用浏览器保存为单一的网页文件。

Answer 1

Dim strFile As Stringopen strPath & "\test.htm" for input as #1
strFile = input(lof(1), #1)
close #1然后用
img src=" 和 " 去搜索，或用正则表达式提取文件名。问题是，如果网页中原来使用的是相对路径，而又没有基准地址信息的话，就无法找到这些文件了。所以，如果你要取得图片，最好保存“网页，全部”。