以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]pdf  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96757)

--  作者:苏州老街
--  发布时间:2017/2/27 15:41:00
--  [求助]pdf
老师好,又要麻烦你了。我要把pdf文件在窗口中显示阅读。


图片点击可在新窗口打开查看此主题相关图片如下:图像 2.png
图片点击可在新窗口打开查看

--  作者:有点色
--  发布时间:2017/2/27 16:26:00
--  

 显示文件,就用webbrowser,如果用pictureBox,你还得转换一下。

 

 


--  作者:苏州老街
--  发布时间:2017/2/27 16:31:00
--  
老师,我想点击单元格按钮后在窗口控件(webbrowser)中显示


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:pdf.rar


--  作者:KWK001
--  发布时间:2017/2/27 16:46:00
--  
上传附件
--  作者:有点色
--  发布时间:2017/2/27 16:51:00
--  

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:pdf.table


 


--  作者:苏州老街
--  发布时间:2017/2/27 17:20:00
--  
老师,插入文件的同时希望他能同时存储到以下文件夹中“d:\\Attachments\\pdf文件\\
--  作者:有点色
--  发布时间:2017/2/27 17:27:00
--  
以下是引用苏州老街在2017/2/27 17:20:00的发言:
老师,插入文件的同时希望他能同时存储到以下文件夹中“d:\\Attachments\\pdf文件\\

 

去看AfterOpenProject事件,改成你的路径即可。


--  作者:苏州老街
--  发布时间:2017/2/27 18:13:00
--  
以下是引用有点色在2017/2/27 17:27:00的发言:

 

去看AfterOpenProject事件,改成你的路径即可。


老师,下面代码也要修改把。


If e.Col.Name = "第一列" Then

    If Forms("窗口1").opened Then

        If FileSys.FileExists(e.Col.DataCol.DefaultFolder & e.Row("第一列"))

            Forms("窗口1").Controls("WebBrowser1").Address = e.Col.DataCol.DefaultFolder & e.Row("第一列")

        End If

    End If

End If


--  作者:有点色
--  发布时间:2017/2/27 18:17:00
--  
 代码不需要改。
--  作者:苏州老街
--  发布时间:2017/2/27 18:23:00
--  
老师,在控件中打不开。

DataTables("表A").DataCols("第一列").DefaultFolder = "I:\\狐表\\pdf\\Attachments\\pdf文件"