以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于ＷＯＲＤ报表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69010)
--  作者：wusim
--  发布时间：2015/5/29 7:12:00
--  [求助]关于ＷＯＲＤ报表
有没有生成ＷＯＲＤ报表，打开后，另到ＷＯＲＤ软件没有另存按钮或菜单按键，不想用户另存文件。
--  作者：狐狸爸爸
--  发布时间：2015/5/29 7:48:00
--  

试试：

http://www.foxtable.com/help/topics/2931.htm

http://www.foxtable.com/help/topics/2903.htm

 

 
--  作者：大红袍
--  发布时间：2015/5/29 9:20:00
--  

 你可以去学习vba的知识操作word

 

Dim app As New MSWord.Application
try
    Dim fileName = "d:\\test.doc"
    Dim doc = app.Documents.Open(fileName)
    doc.Protect (Password:="123456", NoReset:=False, Type:= _
        MsWord.WdProtectionType.wdAllowOnlyReading, UseIRM:=False, EnforceStyleLock:=False)
    app.Documents.save
catch ex As exception
    msgbox(ex.message)
finally
    app.Quit
End try