F
fth
Hi,
My proc stop and I don't know why ...
Private Sub copyFile_Click()
Dim MyAcc As Access.Application
Set MyAcc = New Access.Application
Dim rst As DAO.Recordset
Dim strSQL As String
strSQL = "SELECT AppliPath, AppliName From NetworkSearchAppli "
strSQL = strSQL & "WHERE peridicity between 1 and 3;"
Set rst = CurrentDb.OpenRecordset(strSQL)
'error 3464 data mismatch in criteria expression' ?
If rst.BOF And rst.EOF Then
Set rst = Nothing
many thnaks by advance
Fred
My proc stop and I don't know why ...
Private Sub copyFile_Click()
Dim MyAcc As Access.Application
Set MyAcc = New Access.Application
Dim rst As DAO.Recordset
Dim strSQL As String
strSQL = "SELECT AppliPath, AppliName From NetworkSearchAppli "
strSQL = strSQL & "WHERE peridicity between 1 and 3;"
Set rst = CurrentDb.OpenRecordset(strSQL)
'error 3464 data mismatch in criteria expression' ?
If rst.BOF And rst.EOF Then
Set rst = Nothing
many thnaks by advance
Fred