2 svar · 186 visningar · startad av arvjos
Hejsan
Säg att jag har en adressbok i en databas. Jag vill kunna skriva ut ett brev till var och en av dem som finns och deras namn ska stå i början av brevet. Hur kan jag göra detta med bara ett musklick. Jag vill alltså skriva ut det på papper via skrivaren. Jag tänker mej nån loop av nåt slag men jag får inte ihop det i huvudet riktigt. Någon som har en bra idé
Tack
/Arvid
hanger inte riktigt med?
men om jag fattat det ratt sa borde du val kunna gora en querystring-lank som har loopat ut alla namn i fran db, nar du klickar pa dom sa kommer du till brevet och te x i borjan av det sa kanske du har sa har:
Hej <%=request.querystring("namn")%>!
eller?
Har gjort en liknande funktion en gång.. såg ut ungefär så här:
Sida 1:
[RED]<html>
<head>
<title>Adresser</title>
</head>
<body>
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("adresser.mdb")
Set RecSet = Connect.Execute("SELECT ID, fldNamn, fldAdress, fldPost FROM adress ORDER BY fldNamn")
If NOT RecSet.EOF Then arrRecSet = RecSet.GetRows()
RecSet.Close : Set RecSet = Nothing
Connect.Close : Set Connect = Nothing
If IsArray(arrRecSet) Then
For i = 0 To UBound(arrRecSet, 2)
intID = arrRecSet(0,i)
strName = arrRecSet(1,i)
strAdress = arrRecSet(2,i)
strPost = arrRecSet(3,i)
Response.Write ""&_
"<a href=""print.asp?name="& Server.URLEncode(strName) &_
"&adress="& Server.URLEncode(strAdress) &_
"&post="& Server.URLEncode(strPost) &_
""">Skriv ut</a> | "& strName &", "& strAdress &", "& strPost &"<br>"
Next
End If
%>
</body>
</html>[/RED]
Sida 2: (print.asp)
[RED]<html>
<head>
<title>Print</title>
</head>
<body onload="window.print();history.back();">
<%
Response.Write ""&_
trim(Request.Querystring("name")) &"<br>"& _
trim(Request.Querystring("adress")) &"<br>"&_
trim(Request.Querystring("post"))
%>
</body>
</html>[/RED]