---
title: "Loopa ut adresser på papper"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/106403-loopa-ut-adresser-på-papper"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "mattiasnordin"
published: "2004-06-29T11:59:25.000Z"
updated: "2004-06-29T15:07:47.000Z"
replies: 1
views: 207
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/106403-loopa-ut-adresser-på-papper"
---

# Loopa ut adresser på papper

## #1 — mattiasnordin, 2004-06-29T11:59Z

Hej alla!

```
<% 'Input
sSelectedNames = request("req_selected_names")

<% myArray = Split(sSelectedNames, ",")%>
<% For i = 0 To Ubound(myArray) %>

	<% 	sql = "SELECT * FROM T_medlemmar WHERE namn = '" & trim(myArray(i)) &"'"
	response.write sql &"<hr>"
	set rs = Connect.execute(sql)
	if rs.eof then
	response.write "<hr>Ingen träff<hr>"
	else %>
	<!--- Passar A5 fönsterkuvert --->
	<table cellpadding=10 style="position:absolute; left:365px; top:60px; border:1px dotted dddddd; width:280; height:135"><td>
	&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <%=rs("Namn")%><br>
	&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <%=rs("Gatuadress")%><br>
	&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <%=rs("Ort")%><br>
	</td></table>
	
	<script>
	window.print()
	</script>
	
	<% end if %>

<%next%>
```

Använder ovan i mitt försök att skriva ut ett adressregister på papper. Vill alltså skriva ut ett A4 ark per adress. Men det går väl inte att exekvera javascript på detta sätt. 

Är det någon som har ett förslag på något som fungerar ?

Permalänk: https://www.webforum.nu/p/106403

## #2 — mattiasnordin, 2004-06-29T15:07Z

Detta kanske var en javascript fråga igentligen.

Så här löste jag det:

```

<% 'Hämtar input från val
sSelectedNames = request("req_selected_names")
%>

<% 'Delar upp strängen i en array
myArray = Split(sSelectedNames, ",")%>

<SCRIPT LANGUAGE="javascript">
// Skapar en klientarray med alla adresser
myClientArray = new Array(

<% For i = 0 To Ubound(myArray) 
	sql = "SELECT * FROM T_medlemmar WHERE namn = '" & trim(myArray(i)) &"'"
	'response.write sql &"<hr>"
	set rs = Connect.execute(sql)
	if not rs.eof then %>
	
	"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<%=rs("namn")%><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<%=rs("gatuadress")%><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<%=rs("postnummer")%> <%=rs("ort")%>",
	 
	<% end if %>
<%next%>

"Copyright Mattias Nordin.")
</script>

<SCRIPT LANGUAGE="javascript">
// Skriv ut adresserna en och en 
for (i=0; i < myClientArray.length; i++){
	egenskaper="toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes";
	nytt_fonster = window.open("","tmpWindow",egenskaper);
	nytt_fonster.document.open();
	nytt_fonster.document.write('<!--- Passar A5 fönsterkuvert --->')
	nytt_fonster.document.write('<table cellpadding=10 style="position:absolute; left:365px; top:60px; border:1px dotted dddddd; width:280; height:135"><td>')
	nytt_fonster.document.write( myClientArray[i] +'<br>')
	nytt_fonster.document.write(' </td></table> ')
  	nytt_fonster.print();
}
nytt_fonster.close();
document.location.href="personalfunktioner_start.asp"
</script>
```

Är det någon som vet om det går att påverka browsern så att man skriver ut på defaultskrivaren istället för att få upp GUI:t för att välja skrivare?

Permalänk: https://www.webforum.nu/p/1377172

---

Tråden på webben: https://www.webforum.nu/amne/asp/106403-loopa-ut-adresser-på-papper