printing copies of 1 record

[cram65]

i want to print more than 1 label of the same record.Which code do i have to write to make copies of an excisting record and sent these to a labelreport.
Thanks for he who can help me.

 

[cram65]

Thanks for helping Pat but this ain't excactly the way i want it.
In my form i have a button besides each record to chose for multiple prints of that record. Your sollution prints every record.
I had the code to do this in Access 97, using a temporary table to copy these records. It was this table i used as base for my labelreport. if i use the same code in access2000 it gives errors. First the declaration as Dbs As Database doesn't seem to work anymore.
Here is a sample of the code i used. Maybe someone can find my errors or can give me some advice on a new code to solve my problem.
Dim Dbs As database
Dim RstTemp As Recordset
Dim StrInput As String
Dim IntCount As Integer
Dim i As Integer
Dim Msg, Style, Title, Response
StrInput = InputBox("How many Labels?", "Labelcount", 0)
IntCount = Val(StrInput)
If IntCount > 0 Then
Set Dbs = curentdb
Set RstTemp = Dbs.openrecordset("temptabel", dbopendynaset)
With RstTemp
For i = 1 To IntCount
.AddNew
!test1 = Me!test1
!test2 = Me!test2
.Update
Next i
End With
End Sub

Thanks again

 

[Rich]

Can't give you the exact answer I don't have 2K but it's something like
Dim db As DAO database, it has been answered here several times if you search you'll find the correct reference.
HTH

 

[cram65]

After all your suggestions it finnaly works. Thanks.
For those who are following my problem. i solved it by changing
Dim dbs as Database
to
Dim dbs as DAO.database
but also had to select DAO3.6 OBJECT LIBRARY
which was not done during installing Access2000
I hope this may help others with te same problem.

Marc Collet Belgium