Visual Basic - Error raro en INSERT

Hola gente

Estoy programando VB contra sql 2000 sp3 y al ejecutar la siguiente INSERT

Con.Execute "INSERT INTO Prod (CodProd, CodRubro, DescProd, Stock, Lote, FechaRecuento) VALUES ('" & txtCodProd.Text & "', '" & CodRubro & "', '" & DescProd & "', " & Stock & ", '" & Lote & "' ,'" & dtpFechaRecuento & "' ) "

me da el error:

Error de sintaxis al convertir una cadena de caracteres a datetime
-2147217913(80040e07)

ya probe todo pero sigo sin resolver...
la fecha la paso como yyyy-mm-dd y el campo en sql es datetime

ayuda por favor

pedro

proba si asi te sunciona

Con.Execute "INSERT INTO Prod (CodProd, CodRubro, DescProd, Stock, Lote, FechaRecuento) VALUES ('" & txtCodProd.Text & "', '" & CodRubro & "', '" & DescProd & "', " & Stock & ", '" & Lote & "' ,#" & format(dtpFechaRecuento,"mm/dd/yyyy") & "# ) "

gon, gracias x la ayuda

pedro