以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  EXCEL转变成PDF出错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=190982)

--  作者:温馨的大树
--  发布时间:2024/3/18 17:12:00
--  EXCEL转变成PDF出错
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:修改ddsc.txt

网址访问变成:
127.0.0.1/Reportsddsc.pdf

--  作者:有点蓝
--  发布时间:2024/3/18 17:17:00
--  
不能使用case的

if e.parh like "Reports\\*" then \'所有execl报表的网页
 Functions.Execute("ddsc", e)
else \'其它网页的处理
    Select Case e.Path
        Case  "123.htm"
……
end if

js
function ddsc(){
   location="Reports/ddsc.pdf?oid=" + table1.primarykey;
}

--  作者:温馨的大树
--  发布时间:2024/3/18 22:06:00
--  
还有其它的内部函数的话,应该怎么写呢?
if e.parh like "Reports\\*" then \'所有execl报表的网页
 Functions.Execute("ddsc", e)
其它内部函数
else \'其它网页的处理

--  作者:有点蓝
--  发布时间:2024/3/18 22:38:00
--  
if e.parh like "Reports\\*" then \'所有execl报表的网页
 Functions.Execute("ddsc", e)
else \'其它网页的处理
    Select Case e.Path
        Case  "1.htm"
其它内部函数1
        Case  "2.htm"
其它内部函数2
……
end if

--  作者:温馨的大树
--  发布时间:2024/3/19 2:09:00
--  
我的意思是有多个EXCEL报表,不只是ddsc这个
 Functions.Execute("ddsc", e)

--  作者:有点蓝
--  发布时间:2024/3/19 8:46:00
--  
if e.parh like "Reports\\*" then \'所有execl报表的网页
e.Resp
    Select Case e.Path
        Case  "Reports\\ddsc.htm"
 Functions.Execute("ddsc", e)
        Case  "Reports\\2.xls"
 Functions.Execute("其它函数", e)
case .......
 Functions.Execute("其它函数....", e)
        Case Else
            e.AsReportServer("Reports\\")
    End Select

else \'其它网页的处理