mxb.rsp

1、本系统采用B/S架构

<?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>