Recent content by vpelleri

Check the reference for the FileSystemObject. It might have been removed. Vince

Add the line below to the Open event of your form as code. DoCmd.GoToRecord acActiveDataObject, "YourFormName", acNewRec

Not sure how to do what you asked but as I remember, an object's ordinal position is dependent on the order it was added to the collection (beginning with 0). So you could loop through the collection and assign numbers corresponding to the ordinal position as an array. Vince

Add this to the code I posted above. Dim prp As ADOX.Property For Each prp In col.Properties If prp.Name = "Description" Then Debug.Print prp.Value End If Next prp Vince

I forgot to mention that to use ADOX you will need to include the Microsoft ADO ext. 2.5 for DDL and Security reference under Tools/References... in the VBA coding environment. Vince

Here is an example of how to do it using code with ADO. Private Sub DataDictionary() Dim cat As ADOX.Catalog Dim col As ADOX.Column Dim tbls As ADOX.Tables Dim tbl As ADOX.Table Set cat = New ADOX.Catalog cat.ActiveConnection = CurrentProject.Connection Set tbls =...

It seems to me that validation would be take care of if you establish a relationship between the two tables, where Table 1 represents the parent side of the relationship and table two represents the child. If the field in table 1 is a key field, than you can establish such a relationship with...

Maybe try simplifying the DLookup expression by setting your 4 combobox entries as a concatenated string. ********* Dim strDP As String strDP = Me.lstbox1.Value & Me.lstbox2.Value & Me.lstbox3.Value & Me.lstbox4.Value ********* Then set your DLookup criteria using the string, strDP. If the...