老师好!
Word文档转换为单一网页文件mht时,提示如下图,怎样解决?
谢谢!
此主题相关图片如下:截屏图片.jpg
Dim app As New MSWord.Application
app.Visible = False
Dim dlg As New OpenFileDialog
dlg.Filter = "Word文档|*.docx;*.doc"
If dlg.ShowDialog = DialogResult.OK Then
Dim doc = app.Documents.Open(dlg.FileName)
Dim fln_save As String = dlg.FileName.Replace("docx","mht").Replace("doc","mht")
doc.SaveAs2(Filename:=fln_save, FileFormat:=9)
app.quit()
Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
wbr.Address = fln_save
End If