(Cuatro) a sí mismo, hacer una colección de su propia tabla de informes de epidemia

El código escrito en el capítulo 3 del programa principal

  1. prefacio
  2. Capítulo 1 está configurado para ejecutarse en win10 entorno ASP
  3. Capítulo 2 Requisitos del sistema de análisis
  4. El código escrito en el capítulo 3 del programa principal
  5. epílogo

  En el diseño de la página del programa, creo que principalmente los siguientes aspectos del código para ser registrados.

3.1 muestra una lista de los estudiantes que no llenan las sentencias SQL

select * from xs where xsclass='"&session("jsclass")&"' and not exists(select * from xsq where xs.xsno=xsq.xsno and xstimeid="&ymdnum&" and xsclass='"&session("jsclass")&"')

  // Encuentra XS y datos de los estudiantes indican un cambio XSQ dos tablas por el número de estudiante de los estudiantes no existe en un día determinado.
  // xs estudiantes tabla de información básica es una mesa, mesa XSQ se almacena en los datos del estudiante día. Xs.xsno = xsq.xsno es XS mesa xsno (número de estudiantes) se combina con xsno mesa XSQ, y no hay estudiantes en el emparejamiento de averiguarlo.

3.2 códigos de transmisión de datos estadísticos

rs.open"select * from xsq where xstimeid="&ymdnum&"",conn,1,1
	if not(rs.eof or rs.bof) then
			xsnum1=0   ‘初始化各个变量
			xsnum2=0
……
			xsnum9=0
			xsnum10=0
		do while not rs.eof   ‘逐条计算各项数据的和
		if trim(rs("xsdress"))="A" then
			      xsnum1=xsnum1+1
		else
			      xsnum2=xsnum2+1
		end if			   
		……
		  		if trim(rs("xsq4"))="A" then
			      xsnum9=xsnum9+1
		else
			      xsnum10=xsnum10+1
		end if			   
		rs.movenext
			loop
		else
			xsnum1=0
			xsnum2=0
		    ……
			xsnum9=0
			xsnum10=0		
	end if

Exportación a Excel 3.3 código de registro

  El código principal se muestra a continuación, se deriva informes en formato Excel. El código es relativamente simple, nos fijamos en Baidu también se puede encontrar.

Response.AddHeader "Content-Disposition","attachment;filename="&ymdnum&"-"&jsclass&"-未填报健康数据的学生名单.xls"  ‘导出的文件名称
Response.ContentType = "application/vnd.ms-excel"  ‘以excel的格式导出
	    rs.open"select * from xs where not exists(select * from xsq where xs.xsno=xsq.xsno and xstimeid="&ymdnum&")",conn,1,1
if not(rs.eof or rs.bof) then
response.write "<table width=""100%"" border=""1"" >"  
response.write "<tr>"
response.write "<th width=""40%""><b>学号</b></th>"
response.write "<th width=""30%""><b>姓名</b></th>"
response.write "<th width=""30%""><b>年级</b></th>"
response.write "<th width=""30%""><b>班别</b></th>"
response.write "<th width=""30%""><b>是否填报</b></th>"
response.write "</tr>"
do while not rs.eof
response.write "<tr>"
response.write "<td width=""40%"">"&trim(rs("xsno"))&"</td>"
response.write "<td width=""30%"">"&trim(rs("xsname"))&"</td>"
response.write "<td width=""30%"">"&trim(rs("xsglass"))&"</td>"
response.write "<td width=""30%"">"&trim(rs("xsclass"))&"</td>"
response.write "<td width=""30%"">否</td>"
response.write "</tr>"
rs.movenext
loop
response.write "</table>"
end if
rs.close
set rs=nothing

epílogo

  Arquitectura caso es simple, ni se utiliza lenguaje de programación ahora popular, pero más práctico, y en muchas instituciones educativas, los usos de servidor son relativamente atrasado, los sistemas operativos instalados no pueden ser fecha actual. En tal caso, de acuerdo con la idea, siempre y cuando la demanda se puede lograr en la línea de desarrollo del sistema de información, los datos después de ejecutar más de una semana, para hacer frente a más de 2.000 informes de datos al día, o parecer más que suficiente. Ahora usa el sistema, puede ser el dedo tierra muy elegante, se puede guiar las estadísticas del día de salir, la epidemia remite directamente a la sede de la escuela, y él es finalmente liberada de los organizadores de datos y corrección de pruebas de trabajo fuera.

  Informe sobre la forma final como se muestra en la figura.
Figura 5.1

Publicado cinco artículos originales · ganado elogios 4 · Vistas 161

Supongo que te gusta

Origin blog.csdn.net/ydr888/article/details/105003807
Recomendado
Clasificación