Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

hadnet

Imprimir etiquetas em asp

Por , em ASP Clássico

Recommended Posts

hadnet    1

hadnet
Postado

galera, tenho um sisteminha de cadastro onde preciso adiconar um modulo de impressao de etiquetas, fiz a busca que preciso, e as configuracoes das tabelas conforme a folha das etiquetas o meu problema é o seguinte:

 

na pagina da busca o usuario digita no fromulario a quantidade de etiquetas e assim na proxima pagina terá que ter um contador e repetir a etiqueta a quantidade que ele digitou. segue o codigo da pagina de impressao da etiqueta.

 

acho que tenho que fazer um loop talvez..??

 

<!--#Include file="conexao/conexao.asp"--><%	Codigo = request("Codigo")	quantidade = request("quantidade")				strSQL = "Select * from clientes where Codigo = " &Codigo	set rs = conexao.execute(strSQL)				strSQL = "Select * from contatos where Codigo = " &Codigo	set rsbusca = conexao.execute(strSQL)%><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html><head><title>Etiquetas</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body leftmargin="10" topmargin="25" marginwidth="0" marginheight="0" onload="window.print();"><table width="700" border="0" cellspacing="0" cellpadding="0">  <tr> 			<td width="335"><font size="2" face="Arial, Helvetica, sans-serif"><strong><%=rs("nome")%><br>	  <%=rs("endereco")%>, <%=rs("numero")%> <%=rs("complemento")%><br>	  <%=rs("cep")%> - <%=rs("cidade")%> - <%=rs("estado")%></strong></font></td>		<td width="341"><font size="2" face="Arial, Helvetica, sans-serif"><strong><%=rs("nome")%><br>	  <%=rs("endereco")%>, <%=rs("numero")%> <%=rs("complemento")%><br>	  <%=rs("cep")%> - <%=rs("cidade")%> - <%=rs("estado")%></strong></font></td>  </tr></table></body></html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Guilherme Serrano    0

Guilherme Serrano
Postado

Opa..

 

<!--#Include file="conexao/conexao.asp"-->

<%

Codigo = request("Codigo")

quantidade = request("quantidade")

 

 

 

strSQL = "Select * from clientes where Codigo = " &Codigo

set rs = conexao.execute(strSQL)

 

 

 

strSQL = "Select * from contatos where Codigo = " &Codigo

set rsbusca = conexao.execute(strSQL)

 

 

%><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>

<head>

<title>Etiquetas</title>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>

 

<body leftmargin="10" topmargin="25" marginwidth="0" marginheight="0" onload="window.print();">

<table width="700" border="0" cellspacing="0" cellpadding="0">

<tr>

<% for x = 1 to quantidade %>

<td width="335"><font size="2" face="Arial, Helvetica, sans-serif"><strong><%=rs("nome")%><br>

<%=rs("endereco")%>, <%=rs("numero")%> <%=rs("complemento")%><br>

<%=rs("cep")%> - <%=rs("cidade")%> - <%=rs("estado")%></strong></font></td>

 

<td width="341"><font size="2" face="Arial, Helvetica, sans-serif"><strong><%=rs("nome")%><br>

<%=rs("endereco")%>, <%=rs("numero")%> <%=rs("complemento")%><br>

<%=rs("cep")%> - <%=rs("cidade")%> - <%=rs("estado")%></strong></font></td>

<% next %>

</tr>

</table>

</body>

</html>

Pesquisa sobre mod pra fazer a quebra de linha a cada tantas colunas...

E tem também que dar o rs.movenext, e colocar uma segurança pra não dar erro caso seja eof.

 

Espero te ajudado, dá um upgrade no seu ai e posta denovo se não funcionar

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito