- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]窗口文档存储pdf (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=109098)
-- 发布时间：2017/11/4 10:08:00
-- [求助]窗口文档存储pdf
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:webbrowser控制word_测试 (1).table |
请教老师，把word存储为pdf，看了很多帮助，还是不会弄。
-- 发布时间：2017/11/4 10:25:00
--
保存按钮：
Dim doc = vars("doc")
Dim dlg As new SaveFileDialog
dlg.Filter = "pdf|*.pdf"
If dlg.ShowDialog = DialogResult.OK Then
doc.ExportAsFixedFormat(dlg.FileName, MSWord.WdExportFormat.wdExportFormatPDF)
End If
-- 发布时间：2017/11/4 11:53:00
--
老师，我要是不需要对话框，直接把文件保存成pdf格式，文件名不变怎么改，我去掉对话框保存时提示文件为只读。
[此贴子已经被作者于2017/11/4 11:56:27编辑过]
-- 发布时间：2017/11/4 12:01:00
--
贴出代码，保存的时候，PDF文件不能处于打开状态
-- 发布时间：2017/11/4 15:28:00
--
Dim doc = vars("doc")
doc.ExportAsFixedFormat( ProjectPath & "attachments\\Reports\\fxreports\\" & Forms("窗口1").controls("TextBox1").Text & ".pdf" , MSWord.WdExportFormat.wdExportFormatPDF)
因为窗口是上一个条件打开的，所以每次加载的文档都不同，我不知道把当前文件转PDF后文件名和路径都不变该怎么弄，出现错误，
.NET Framework 版本：2.0.50727.8794
Foxtable 版本：2017.10.26.1
错误所在事件：窗口,检测报告,Button1,Click
详细错误信息：
未设置对象变量或 With 块变量。
-- 发布时间：2017/11/4 15:54:00
--
if Forms("窗口1").opened then
doc.ExportAsFixedFormat( ProjectPath & "attachments\\Reports\\fxreports\\" & Forms("窗口1").controls("TextBox1").Text & ".pdf" , MSWord.WdExportFormat.wdExportFormatPDF)
end if
-- 发布时间：2017/11/4 16:03:00
--
老师出现如下错误
.NET Framework 版本：2.0.50727.8794
Foxtable 版本：2017.10.26.1
错误所在事件：窗口,检测报告,Button1,Click
详细错误信息：
未设置对象变量或 With 块变量。
-- 发布时间：2017/11/4 16:16:00
--
上传实例测试
-- 发布时间：2017/11/4 16:34:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目10.rar |
-- 发布时间：2017/11/4 17:09:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目10.zip |