ページAは通常のASPデータリストですが、印刷する場合は、印刷用紙のサイズに応じて、ページごとの印刷行の数を制御したいと考えています。この時点でこれを行う必要がありますか?次に、ASPを使用してページごとの印刷行の数を制御する方法を見てみましょう。
<%
pagenum = 55'印刷された行の数を指定します
%>
<html>
<head>
<meta http-equiv = "content-type" content = "text/html; charset = gb2312">
<title>印刷営業利益の詳細レポート</title>
<style type = "text/css">
td {font-size:9pt;色:#000000}
A {テキスト装飾:なし}
A:HOVER {color:#ff0000;テキスト装飾:derline}
.break {page-break-before:常に}
</style>
</head>
<スクリプト言語= "javascript">
window.print()
</script>
<body style = "border:none" topmargin = "0" leftmargin = "6" onload = "javasscript:pagesetup_default();">
<スクリプト言語= "vbscript">
dim hkey_root、hkey_path、hkey_key_key
hkey_root = "hkey_current_user"
hkey_path = "/software/microsoft/internet explorer/pagesetup"
関数pagesetup_default()
エラーの再開時に次に再開します
set regwsh = createObject( "wscript.shell")
hkey_key = "/header"
regwsh.regwrite hkey_root+hkey_path+hkey_key、 "&bpage&p/&p"
hkey_key = "/footer"
regwsh.regwrite hkey_root+hkey_path+hkey_key、 ""
エンド関数
</script>
<%
kdname1 = trim(request( "kdname1"))
kdname2 = trim(request( "kdname2"))
keyword1 = trim(request( "keyword1"))
keyword2 = trim(request( "keyword2"))
keyword1 <> ""の場合
今日= keyword1
それ以外
kdname1 = "" thenの場合
今日= year(date())& " - "&month(date())
それ以外
今日= kdname1& "to"&kdname2
ifを終了します
ifを終了します
%>
<Table CellPacing = "0" CellPadding = "0" align = "center">
<tr>
<td align = "center">営業利益概要レポート</td>
</tr>
</table>
<%
strsql = "select autoid、sellauutoid、productxili、productname、productize、productnum、productdan、productjia、chaoshi、tiaoma、youhui、福祉、moncount1、gongshang、lirun1、username、indate、fudate from sell where Monthjie = '0'および(year(indate)= year(getdate())およびmonth(indate)= month(getDate()))およびZhuofeiはAutoid DESCによるnull順序です」
rs1 = server.createObject( "adodb.Recordset")を設定します
rs1.pen strsql、conn、1,1
%>
<table cellpacing = "0" cellpadding = "0" align = "center" style = "border-collapse:collapse" bordercolor = "#000000">
<tr>
<td align = "center" bgcolor = "#bdcbee">販売注文番号</td>
<td align = "center" bgcolor = "#bdcbee">製品名(spec)</td>
<td align = "center" bgcolor = "#bdcbee"> customer </td>
<td align = "center" bgcolor = "#bdcbee">数量</td>
<td align = "center" bgcolor = "#bdcbee"> unit </td>
<td align = "center" bgcolor = "#bdcbee">販売価格</td>
<td align = "center" bgcolor = "#bdcbee">%</td>
<td align = "center" bgcolor = "#bdcbee">購入価格</td>
<td align = "center" bgcolor = "#bdcbee"> subtotal </td>
<td align = "center" bgcolor = "#bdcbee">利益</td>
<td align = "center" bgcolor = "#bdcbee">支払い</td>
<td align = "center" bgcolor = "#bdcbee">販売日</td>
</tr>
</table>
<%
moncount2 = 0
moncount5 = 0
rs1.eofではありません
%>
<Table CellPadding = "0" cellpacing = "0" align = "center" style = "border-collapse:collapse; font-size:10pt; color:#000000" bordercolor = "#000000">
<%
i = 1からpagenumへ
rs1.eofではない場合
TRIM(rs1( "Fukuan"))= "Arrears"の場合
moncount6 = csng(rs1( "lirun1"))
moncount5 = moncount5+moncount6
それ以外
moncount3 = csng(rs1( "lirun1"))
moncount2 = moncount2+moncount3
ifを終了します
%>
<tr>
<td> <%= rs1( "sellaautoid")%> </td>
<td> <%= decode(rs1( "productname"))%> <%= rs1( "productize")%> </td>
<td> <%= left(rs1( "gongshang")、9)%> </td>
<td align = "center"> <%= rs1( "productnum")%> </td>
<td align = "center"> <%= rs1( "productdan")%> </td>
<td align = "right"> <%= formatnumber(rs1( "chaoshi")、varnum、-1)%> </td>
<td align = "center"> <%= rs1( "youhui")%> </td>
<td align = "right"> <%= formatnumber(rs1( "productjia")、varnum、-1)%> </td>
<td align = "right"> <%= formatnumber(rs1( "moncount1")、varnum、-1)%> </td>
<td align = "right"> <%= formatnumber(rs1( "lirun1")、varnum、-1)%> </td>
<td align = "center"> <%if if trim(rs1( "fukuan"))= "arrears" then%> <font color = blue> <%= rs1( "fukuan")%> </font> <%
<td> <%= rs1( "indate")%> </td>
</tr>
<%
rs1.movenext
ifを終了します
次
%>
</table>
<%
rs1.eofおよびi = pagenum+1ではない場合は、ページネーションマークを追加します
%>
<div> </div>
<table cellpadding = "0" cellpacing = "0" align = "center"> <tr> <td> </td> </tr> </table>
<table cellpacing = "0" cellpadding = "0" align = "center" style = "border-collapse:collapse" bordercolor = "#000000">
<tr>
<td align = "center" bgcolor = "#bdcbee">販売注文番号</td>
<td align = "center" bgcolor = "#bdcbee">製品名(spec)</td>
<td align = "center" bgcolor = "#bdcbee"> customer </td>
<td align = "center" bgcolor = "#bdcbee">数量</td>
<td align = "center" bgcolor = "#bdcbee"> unit </td>
<td align = "center" bgcolor = "#bdcbee">販売価格</td>
<td align = "center" bgcolor = "#bdcbee">%</td>
<td align = "center" bgcolor = "#bdcbee">購入価格</td>
<td align = "center" bgcolor = "#bdcbee"> subtotal </td>
<td align = "center" bgcolor = "#bdcbee">利益</td>
<td align = "center" bgcolor = "#bdcbee">支払い</td>
<td align = "center" bgcolor = "#bdcbee">販売日</td>
</tr>
<%
ifを終了します
ループ
rs1.close
rs1 =何も設定しません
%>
</table>
<table cellpadding = "0" cellpacing = "0" align = "center" style = "border-collapse:collapse" bordercolor = "#000000">
<tr>
<td> <font color = "#ff0000"> <b>現金利益:</b> </font> <b> <%= formatnumber(moncount2、varnum、-1)%> </b> <%if <> "" then%> <b> <font color = "#ff0000" <%= formatnumber(moncount5、varnum、-1)%> </b> <%end if%> <%moncount5 <> "" then%> <b> <font <font>利益路上> color = "#ff0000">総利益:</font> <%= formatnumber(moncount5+moncount2、varnum、-1)%> </b> <%end if> </td>
</tr>
</table>
<%
ifを終了します
conn.close
conn =何も設定しません
%>
</body>
</html>
上記は、この記事のコンテンツ全体です。この記事の内容が、みんなの勉強や仕事に役立つことを願っています〜