共6 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：EXCEL转变成PDF出错
1楼
温馨的大树 发表于：2024/3/18 17:12:00
2楼
有点蓝 发表于：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"
Case "123.htm"
……
end if
js
function ddsc(){
location="Reports/ddsc.pdf?oid=" + table1.primarykey;
}
3楼
温馨的大树 发表于：2024/3/18 22:06:00还有其它的内部函数的话，应该怎么写呢？
if e.parh like "Reports\*" then '所有execl报表的网页
Functions.Execute("ddsc", e)
其它内部函数
else '其它网页的处理
4楼
有点蓝 发表于：2024/3/18 22:38:00if e.parh like "Reports\*" then '所有execl报表的网页
Functions.Execute("ddsc", e)
else '其它网页的处理
Select Case e.Path
Case "1.htm"
Case "1.htm"
其它内部函数1
Case "2.htm"
其它内部函数2
……
end if
5楼
温馨的大树 发表于：2024/3/19 2:09:00我的意思是有多个EXCEL报表，不只是ddsc这个
Functions.Execute("ddsc", e) |
6楼
有点蓝 发表于：2024/3/19 8:46:00if e.parh like "Reports\*" then '所有execl报表的网页
e.Resp
Select Case e.Path
Case "Reports\ddsc.htm"
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 '其它网页的处理
共6 条记录, 每页显示 10 条, 页签:
[1]