<?php echo $LindemanAdmin?>

[显示菜单]

导出csv
<% '下拉菜单设定 DownMenuName="单据类型" '菜单名称 DownMenuNameID="OrdClassType" '菜单ID DownMenuOldName=OrdClassTypeName '默认值名称 DownMenuOldID=OrdClassType '默认值ID %>

<%=DownMenuName%>：<%=DownMenuOldName%>

<%for z = 0 to UBOUND(OrdClassTypesPS) OrdClassTypesPS1=SPLIT(OrdClassTypesPS(z),",") vID=OrdClassTypesPS1(0) vtext=OrdClassTypesPS1(1) %> ','<%=DownMenuOldID%>','<%=DownMenuNameID%>','<%=vID%>')" class="list-option<%if vID=DownMenuOldID then Response.Write " option"%>"><%=vtext%> <%next%>
期间：<%=OrdDateTypeName%>

<%for z = 0 to UBOUND(OrdDateTypesPS) OrdDateTypesPS1=SPLIT(OrdDateTypesPS(z),",") vID=OrdDateTypesPS1(0) vtext=OrdDateTypesPS1(1) %> "><%=vtext%> <%next%> 自定义

<%'数据读取 is_CSV=0%>

<%If SystemMessageType<>"2" then%> <% For X=Lbound(FormArray)+1 to Ubound(FormArray) If X=Ubound(FormArray) Then 'classHtml=" class=""last""" ElseIf X=1 Then classHtml=" class=""selected""" Else classHtml="" End If Response.Write ""&FormArray(X,0)&"" Next%> <% For Y=Lbound(FormArray,2)+2 to Ubound(FormArray,2)%> <% For X=Lbound(FormArray)+1 to Ubound(FormArray) If X=Ubound(FormArray) Then classHtml=" class=""category category2 last""" ElseIf X=1 Then classHtml=" class=""selected""" Else classHtml=" class=""category category2""" End If Response.Write ""&FormArray(X,Y)&"" Next%> <%Next%> <%End If%> <%for j=Y to 20%> <%next%>

<% ShowingLeast = (acc1-1)*QuantityInt+1 ShowingMax = QuantityInt*acc1 if ShowingMax>acc3 then ShowingMax=acc3 %> <%="显示 "& ShowingLeast &"-"& ShowingMax &" of "&acc3%>

<%if acc2>1 then%> <%end if%>