Copying forms

[LynnaM]

When I place the dot in front of name and deptno in the above code it comes back Compile error:Method or data member not found. Thanks

[This message has been edited by LynnaM (edited 05-17-2001).]

 

[charityg]

dim db as database
dim rst as recordset
dim i as integer


onclick
set db=currentdb
set rst=db.openrecordset("tablename")
i=inputbox("Please enter number of copies")
for 1 to i
with rst
.addnew
.name=me!name
.deptno=me!deptno
.update
end with
next
something like this. of course you would need to validate that they input a number and not text but you get the general idea.