Sorry to be a pain, but I am still getting the same error. I even cut and pasted your code in with no success.
Here's the code
Private Sub Command1_Click()
Dim je As New JRO.JetEngine, srcdb As String, string1 As String, string2 As String, strfrom As String, strto As String, strKillfile As...