?? mxb.rsp
字號:
<?xml version='1.0' encoding='GB2312' ?>
<!DOCTYPE report SYSTEM 'print_report.dtd' >
<report name='報表'>
<report_script>
<![CDATA[
dim rs,con,DBPath
dim temp
dim s,h,l
s=1
set con =CreateObject("ADODB.Connection")
con.ConnectionString = "DBQ=d:\a3\cjtj\cjtj\2001s.mdb;DRIVER={Microsoft Access Driver (*.mdb)};"
con.open
Set rs=CreateObject("ADODB.Recordset")
rs.open "select 學號,姓名,語文,數學 from xxcjxxda where 學校='"+Request1("xx")+"' and 年級='"+Request1("nj")+"' and 班級='"+Request1("bb")+"' order by 學號",con,1,3
]]></report_script>
<report_head height='12'>
<text name='vfptext' top='3' left='75' width='35' height='5' font_name='宋體' font_size='14' font_weight='700' font_italic='0' font_underline='0' >
學生成績明細表
</text>
<text name='vfptext' top='10' left='12' width='6' height='3' font_name='宋體' font_size='9' font_weight='700' font_italic='0' font_underline='0' >
<report_script>
<![CDATA[Report.Write cstr(Request1("xx")+Request1("nj")+"級"+Request1("bb")+"班")]]>
</report_script>
</text>
</report_head>
<page_head height='13'>
<line name='vfpline' top='4' left='8' width='178' height='0' weight='2'>
</line>
<line name='vfpline' top='12' left='8' width='178' height='0' weight='2'>
</line>
<text name='vfptext' top='7' left='21' width='6' height='3' font_name='宋體' font_size='9' font_weight='700' font_italic='0' font_underline='0' >
姓名
</text>
<text name='vfptext' top='7' left='34' width='6' height='3' font_name='宋體' font_size='9' font_weight='700' font_italic='0' font_underline='0' >
語文
</text>
<text name='vfptext' top='7' left='45' width='6' height='3' font_name='宋體' font_size='9' font_weight='700' font_italic='0' font_underline='0' >
數學
</text>
<text name='vfptext' top='7' left='55' width='6' height='3' font_name='宋體' font_size='9' font_weight='700' font_italic='0' font_underline='0' >
合計
</text>
<text name='text14' top='7' left='10' width='7' height='3' font_name='宋體' font_size='9' font_weight='700' font_italic='0' font_underline='0' >
學號
</text>
<line name='line3' top='4' left='18' width='0' height='8' weight='1'>
</line>
<line name='line4' top='4' left='31' width='0' height='8' weight='1'>
</line>
<line name='line8' top='4' left='42' width='0' height='8' weight='1'>
</line>
<line name='line9' top='4' left='53' width='0' height='8' weight='1'>
</line>
<line name='line12' top='4' left='8' width='0' height='8' weight='2'>
</line>
<line name='line12' top='4' left='65' width='0' height='8' weight='2'>
</line>
</page_head>
<page_body height='5'>
<text name='vfptext' top='1' left='20' width='10' height='4' font_name='宋體' font_size='9' font_weight='100' font_italic='0' font_underline='0' >
<report_script>
<![CDATA[Report.Write cstr(rs("姓名"))]]>
</report_script>
</text>
<text name='vfptext' top='1' left='34' width='10' height='3' font_name='宋體' font_size='9' font_weight='100' font_italic='0' font_underline='0' >
<report_script>
<![CDATA[Report.Write cstr(rs("語文"))]]>
</report_script>
</text>
<text name='vfptext' top='1' left='45' width='9' height='3' font_name='宋體' font_size='9' font_weight='100' font_italic='0' font_underline='0' >
<report_script>
<![CDATA[Report.Write cstr(rs("數學"))]]>
</report_script>
</text>
<text name='vfptext' top='1' left='55' width='11' height='3' font_name='宋體' font_size='9' font_weight='100' font_italic='0' font_underline='0' >
<report_script>
<![CDATA[Report.Write cstr(rs("語文")+rs("數學"))]]>
</report_script>
</text>
<text name='text15' top='1' left='12' width='10' height='5' font_name='宋體' font_size='9' font_weight='100' font_italic='0' font_underline='0' >
<report_script>
<![CDATA[Report.Write cstr(s)]]>
</report_script>
</text>
<line name='line5' top='-1' left='18' width='0' height='6' weight='1'>
</line>
<line name='line6' top='-1' left='31' width='0' height='6' weight='1'>
</line>
<line name='line7' top='5' left='8' width='57' height='0' weight='1'>
</line>
<line name='line11' top='-1' left='42' width='0' height='6' weight='1'>
</line>
<line name='line12' top='-1' left='53' width='0' height='6' weight='1'>
</line>
<line name='line12' top='-1' left='8' width='0' height='6' weight='2'>
</line>
<line name='line12' top='-1' left='65' width='0' height='6' weight='2'>
</line>
</page_body>
<page_foot height='33'>
<text name='vfptext' top='2' left='12' width='13' height='3' font_name='宋體' font_size='9' font_weight='100' font_italic='0' font_underline='0' >
<report_script>
<![CDATA[report.write "打印日期:"+formatdatetime(date(),1)]]>
</report_script>
</text>
<text name='vfptext' top='2' left='137' width='50' height='3' font_name='宋體' font_size='9' font_weight='100' font_italic='0' font_underline='0' >
共%Pages%頁,第%Page%頁
</text>
<line name='vfpline' top='0' left='8' width='178' height='0' weight='2'>
</line>
</page_foot>
<report_script>
<![CDATA[do while not rs.eof
if s<41 then
page_body()
else
end if
s=s+1
rs.movenext
loop
rs.close
set rs=nothing
con.close
set con=nothing
]]></report_script>
</report>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -