VBA Access convert from MDB to Accdb

hadadi10

New member
מעבר מ Access2003 לAccess2013 דורש המרת פורמט קובץ המסד. לאחר המרת הקובץ לפורמט accdb
פונקציה שעבדה טוב בקובץ בפורמט MDB הפסיקה לעבוד בפורמט accdb.
האם היה שינוי ב VBA שאינו מטופל נכון בתהליך ההמרה?

הפונקציה (התחלה שלה כאן למטה) נעצרת בשורה הרביעית ונותנת הודעה זו:
שגיאה: 13
Type mismatch


Sub MovePointer(p_form As Form, p_direction As Variant)
Dim l_frm As Form
On Error GoTo Error_MovePointer
Set l_frm = p_form
Set g_rs = l_frm.RecordsetClone
g_rs.Bookmark = l_frm.Bookmark

תודה על כל עזרה.
 

hadadi10

New member
מצאתי את הבעיה, חסרה הכרזה של g_rs כאובייקט.
משום מה זה לא הפריע לקוד לרוץ 20 שנה תחת פורמט MDB.
 
למעלה