Gustav Brock
Gustav at cactus.dk
Tue May 2 03:54:05 CDT 2006
Hi Daniel
These lines should not be needed:
Dim objAo As AccessObject
Dim objCP As Object
db.Close
Also, you are mixing up Me (a form object) and strFormName which you declare as a Form while you (correctly) think it is a string:
Public Function changeFormLanguage(strLang As String, strFormName As Form)
.Seek "=", strFormName, strFormName
/gustav