Imprimir Várias Carteirinhas
Ola amigos ,
Mais uma vez venho ao forum pedir a ajuda de vcs, bom tenho um sistema de impressão de carteirinhas que faz a impressão individual porem surgiu a necessidade de imprimir varias de uma vez só ... o sistema é de cadastro de alunos onde tem o horario do aluno e demais dados , o clienque agora que imprima todos os alunos do horario x .....
Abaixo o codigo que utilizo para imprimir individual
<!--#include file="config2.asp"-->
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body leftmargin="0" topmargin="0" onload="self.print()" style="font-family:Arial; font-size:9px; color:#006666 ">
<table width="765" height="231" border="0" cellpadding="0" cellspacing="0" style="background-image:url('carteirinhalre.jpg'); background-repeat:no-repeat">
<tr>
<%sqlstmt = "SELECT * FROM Jogador ORDER BY Id DESC"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, Dados, 3, 3TotalRecs = rs.recordcount
x = 0
For x = 1 to 9999
If rs.eof then
Exit For
Else
id = rs("ID")
name1 = rs("nome")
name2 = rs("nasc")
name3 = rs("categorias")
name4 = rs("equipe")
description = p1 %>
<td valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
<tr valign="bottom">
<td height="231" valign="top"><table width="100%" height="206" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="32%" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="font-family:Arial; font-size:12px; color:#000000" height="203">
<tr>
<td height="83" colspan="3"> </td>
</tr>
<tr>
<td width="24%" height="25"> </td>
<td colspan="2" valign="bottom" height="25"><%=name1%><font color="#000000">
</font> </td>
</tr>
<tr>
<td height="30"> </td>
<td height="30" colspan="2" valign="bottom"><br> <%=name4%><font color="#000000">
</font>
</td>
</tr>
<tr>
<td height="30"> </td>
<td width="11%" height="30"> </td>
<td width="65%" valign="bottom" height="30"><%=name2%><font color="#000000">
</font> </td>
</tr>
<tr>
<td height="35"> </td>
<td height="35"> </td>
<td height="35" valign="bottom"><font color="#000000">
</font> </td>
</tr>
</table></td>
<td width="15%" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="44"> </td>
</tr>
<tr>
<td height="148"><div align="center">
</div></td>
</tr>
<tr>
<td> </td>
</tr>
</table></td>
<td width="53%" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0" style="font-family:Arial; font-size:12px; color:#000000">
<tr>
<td height="165" colspan="5"> </td>
</tr>
<tr>
<td width="2%" height="23"> </td>
<td width="18%"> </td>
<td width="60%">
</td>
<td width="15%"> </td>
<td width="5%"> </td>
</tr> <%
rs.MoveNext
End If
Next%>
<tr>
<td colspan="5"> </td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
AbraçosDiscussão (7)
Carregando comentários...