שלום,
אני מנסה להשתמש בפקד הנ"ל, לפי הקוד הבא ואני מקבל את השגיאה
User defined type not defined
מה שמוזר הוא - שזה קטע קוד שהעתקתי מsample code של microsoft וכשאני מריץ את הדוגמא שלהם זה עובד...
מה אני אמור לעשות?
יכול להיות שפקד ADOX לא קיים אצלי ואני צריך להוסיף אותו??
לציין שאני חדש בעסק ולומד לבד - כך שגם אם הפתרון טריויאלי... תגידו.
תודה
אלעד

דרך אגב - מה שאני מנסה לעשות זה ליצור טבלה בDATABASE של ACCES... אם יש דרך פשוטה יותר...

Sub ADOCreateTable()

If gbBreakEach Then Stop

Dim cat As New ADOX.Catalog
Dim tbl As New ADOX.Table

' Open the catalog
cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=.\NorthWind.mdb;"

' Create a new Table object.
With tbl
.Name = "Contacts"
' Create fields and append them to the new Table
' object. This must be done before appending the
' Table object to the Tables collection of the
' Catalog.
.Columns.Append "ContactName", adVarWChar
.Columns.Append "ContactTitle", adVarWChar
.Columns.Append "Phone", adVarWChar
.Columns.Append "Notes", adLongVarWChar
.Columns("Notes").Attributes = adColNullable
End With

' Add the new table to the database.
cat.Tables.Append tbl

Set cat = Nothing

End Sub