I keep getting the following error message

-2147217904
No Value given for one or more required parameters

The code I am using is as follows

Dim rs As New ADODB.Recordset

rs.Open "insert into data_delete(ID,FullName,ShortName,Contact,OwnerCo,Pref,Fax1,Fax2,Telex1,Telex2,Memonic1,Memonic2,Ema il,Groups,CortexAccountNo) Values(DataRange.ID,datarange.Fullname,datarange.shortname,datarange.contact,datarange.OwnerCo,datar ange.Pref,datarange.fax1,datarange.fax2,datarange.telex1,datarange.telex2,datarange.memonic1,dataran ge.menonic2,datarange.Email,datarange.groups,datarange.cortexaccountno)", CONNECTIONSTRING, adOpenDynamic, adLockOptimistic

The basic idea behind this is to copy a deleted record into another table, but I am only bring across certain fields



Thanks