请教:以下2种方式都可以,目的是服务器上的excel文件必须加密。
1、直接在线生成excel文件并加密,
2、给服务器上已经生成的excel文件加密。
若以上不行,excel在线压缩到rar,在线给rar文件加密的办法也行。
求解~~~分数可追加!
------解决方案--------------------
看这个
http://club.excelhome.net/thread-220350-1-1.html
------解决方案--------------------
先去提取winrar.exe程序放到网站里或者是c:\windows\system32
- VB code
<% s_path=server.mappath("./")&"\" Set WshShell = Server.CreateObject("WScript.Shell") IsSuccess = WshShell.Run ("winrar a -pABC "&s_path&"\abc.rar "&s_path&"\Book1.xls",1, False) if IsSuccess = 0 Then Response.write "成功压缩!" else Response.write "压缩失败!权限不够或者该程序无法运行" end if %>
------解决方案--------------------
如果觉得压缩路径太深可以省略路径:
WshShell.Run ("winrar a -pABC -ep "&s_path&"\abc.rar "&s_path&"\Book1.xls",1, False)
// -ep表示压缩文件时不会包含路径信息(压缩多个文件时注意不要同名哦)