aspcommon.asp

AspMaker调用的自定义包

<!--##session aspcommon-setup##-->
<!--##
ewCSSTableClass = " class=""ewTable"""
ewCSSTableHeaderClass = " class=""ewTableHeader"""
ewCSSCaptionSpanClass = ""
ewCSSTableRowClass = " class=""ewTableRow"""
ewCSSTableAltRowClass = " class=""ewTableAltRow"""
ewCSSItemSpanClass = ""
'ewCSSItemRowClass = DoubleQuote(" class="" & rowclass & """,1)
ewCSSEditItemRowClass = " class=""ewTableEditRow"""
ewCSSHighlightClass = " class=""ewTableHighlightRow"""
ewCSSSelectClass = " class=""ewTableSelectRow"""
ewCSSTableFooterClass = " class=""ewTableFooter"""
'ewCSSTablePagerClass = " class=""ewTablePager"""
' Report
ewCSSGroupField = " class=""ewGroupField"""
ewCSSGroupName = " class=""ewGroupName"""
ewCSSGroupHeader = " class=""ewGroupHeader"""
ewCSSGroupSummary = " class=""ewGroupSummary"""
ewCSSGroupAggregate = " class=""ewGroupAggregate"""
ewCSSGrandSummary = " class=""ewGrandSummary"""
ewCSSGroupIndent = " style=""width: " & TABLE.TblRptIndent & "px;"""
' Message
ewCSSMsg = " class=""ewmsg"""
If DB.DBDBMSName = "ACCESS" Or DB.DBDBMSName = "MS Jet" Then
	ewCursorLocation = 2
Else
	ewCursorLocation = 3
End If
##-->
<!--##/session##-->
<!--##session aspcommon-directive##-->
<!--##=ASPDirective##-->
<!--## If PROJ.OptionExplicit Then ##-->
<% Option Explicit %>
<%
Dim sExport, sTmp, sTmp1, sTmpFolder, sAction
Dim conn, rs, sSql, i, rsChk, sSqlChk
%>
<!--## End If ##-->
<!--##/session##-->
<!--##session aspcommon-code##-->
<!--##=Session_Timeout##-->
<!--##=No_Cache##-->
<!--##/session##-->