Table containing only the last record

[canett]

I need to copy the tables orders and orderdetails containng only the last order.I am copying them to another database using the formula
DoCmd.CopyObject db.Name, "orders", acTable, "orders"
DoCmd.CopyObject db.Name, "orderdetails", acTable, "orderdetails"

I want to use the criteria (SELECT Max([orderid]) FROM orders) in order to send the tables with only the last order,but i do not know how to build the code.Can you help me ?

 

[canett]

In adition to my question,I guess that i should build a make table query that contains only the last order.
To this end i have tried to build the following function:
Public Function Alan()
Dim SQL As String
SQL = "SELECT * INTO orders1 FROM orders WHERE orders1.orderid = DMax(orderid,orders)"
CurrentDb.Execute SQL
End Function

However i get the error "too few parameters".Where am i
wrong and i can i do in that way ?

 

[stix4t2]

Pass DMAX strings DMAX("OrderID", "Orders")

 

[canett]

Thank you.There must be also some other error in my lines, since i get now "syntax error " in the following"
Public Function Alan()
Dim SQL As String
SQL = "SELECT * INTO orders1 FROM orders WHERE orders1.orderid = DMax("orderid","orders")"
CurrentDb.Execute SQL
End Function

 

[Zion7]

Try this,
SQL = "SELECT * INTO orders1 FROM orders WHERE orders1.orderid = " & DMax("orderid","orders")

 

[canett]

Tahn you so much. Thats exactly what i needed