主题：[求助]图片（htm）

 

这样，没办法。

 我测试，显示很快，瞬间显示。

 

 你图片是不是太大？

Dim file As String = ProjectPath & "show"
With Tables("htm数据文件")
    Dim html As String = FileSys.ReadAllText(file)
    html = html.Replace("{body}", .current("内容")).Replace("{title}", .current("标题"))
    FileSys.WriteAllText(ProjectPath & "test.html", html, False)
    e.Form.Controls("WebBrowser1").Address = ProjectPath & "test.html"
    e.Form.text=.current("标题") '窗口标题改为文章标题
End With

 你的show文件在哪里？你用这个文件做什么？

 代码不要照搬人家的，你要看懂和懂得改一改。

 回复25楼，人家设置的html，你尽量就不要改人家的。人家图片链接的是 d:\test.jpg，你要把那个图片拷贝到 Attachments 里面？

 

这个跟图片的存放路径没有任何关系。如果显示慢，就一直会慢。

 你看懂代码，路径随便改啊。

 

http://www.foxtable.com/webhelp/scr/2958.htm

 

比如这句，其余的自己灵活变通

 

Dim fl As String =  ProjectPath &  dr("文件名")

 

改成

 

Dim fl As String =  ProjectPath & "任意的文件夹名/" & dr("文件名")

 1个地方