السلام عليكم
اخواني الكرام
لدي هذا الكود وهو يعمل بشكل جيد على اكسس 97 ولكنه لا يعمل على اكسس 2003 فهل يوجد به مشكلة تجعله لا يتوافق مع اكسس 2003
وشكرا لتعاونكم
If [IfFormReady] = -1 Then
If DocName <> "" Then
Me(DocName).Visible = False
Me(DocName & 1).Visible = False
End If
DocName = Me![FormName]
Me(DocName).Visible = True
Me(DocName).Top = 0
Me(DocName & 1).Top = 0
Else
If DocName <> "" Then
Me(DocName).Visible = False
Me(DocName & 1).Visible = False
DocName = ""
End If
End If
