标题：用文件的形式保存邮件

1楼

newsun2k 发表于：2024/11/18 15:58:00

用户想把邮件导入到系统中，跟项目挂钩，要求可以在系统中随时查看邮件。

我目前的做法是把邮件的内容以文本的形式保存到备注列中。

这种做法导致整个数据库非常庞大，而且表的加载和处理都很慢。

那我是不是可以把邮件保存为文件，以文件的形式保存在服务器上，用户读邮件的时候，再从服务器下载下来，然后用浏览器打开这个文件？

邮件保存为文件不会操作，求指导。

2楼

有点蓝 发表于：2024/11/18 16:17:00

2、保存到word：

Dim app As New MSWord.Application

Try

Dim fileName = "D:\123.docx"

Dim doc = app.Documents.add

doc.Paragraphs.Last.Range.Text = "需要保存的内容"

doc.SaveAs2(fileName)

Catch ex As exception

msgbox(ex.message)

Finally

app.Quit

End Try

共2 条记录, 每页显示 10 条, 页签: [1]