Search results

When I execute the below function I get an error. If I use the commented out "Open" line it works fine. I get Run-time error '52'. Bad file name or number. Private Sub GenerateSSA_Click() Dim strRA As Variant, strFileNew As String, strFileBlank As String Dim intFileOut As Integer...

Why do I get an error on last line? Function UserPasswordCk(strUser As String, strPassword As String, strMachName As String, strUserName As String) Dim qdf As DAO.QueryDef Set db = CurrentDb 'Get the parameter query (This line results in 424 error "Object Required") Set qdf =...