No it didn't help. Access doesn't appear to have TableDefs.
The reply I added about OpenSchema is the way Access seems to want to do things.
I would love to be able to use an SQLOLEDB connection directly to the Server, but linking the tables into Access is the way the Client wants this done, so I'm limited with the possibilities.. .
Thanks for all the suggestions. I've got enough information to force the round...
User Profile
Collapse
-
I've sort of worked it out. Access doesn't give you as much information as SQLServer does, but it does give you some...
Code:Dim cn As ADODB.Connection Dim rs As ADODB.Recordset Set cn = CurrentProject.AccessConnection Set rs = cn.OpenSchema(ADODB.SchemaEnum.adSchemaColumns, Array(Empty,Empty,Empty,"tablename")) Debug.Print rs!COLUMN_NAME
Leave a comment:
-
Dynamically Access 2007 Get Column Names (+other info) for table
Is there any way to dynamically get information about a table in Access 2007?
I know I can do this with SQLServer.
I'm linking to SQLServer tables from Access 2007.
The SQLServer 2005 SELECT statement is:
Code:SELECT [name],[system_type_id],[max_length],[precision],[scale],[is_nullable],[is_identity],[column_id] FROM sys.Columns WHERE object_id =object_id('[<table name>]')
-
Sorry. The form is bound to an updatable table. The comboBoxes are bound to queries that reference queries that are UNION statements.Leave a comment:
-
My problem is, is that as long as the query attached to the FORM is updateable, I see no reason why the queries attached to comboboxes should be updateable. That is not logical at all. Why is Access trying to UPDATE the lists attached to a comboBox?Leave a comment:
-
Apparently because one of the queries embedded three levels down uses UNION, the query is ReadOnly.
I need to use the UNION to create a single record from a lookup on 3 different tables that each contain address fields (I know, but the client wants to keep historical data on the records), so the UNION select was the perfect way to go about this...Leave a comment:
-
Access 2007 locking fields
I apologise in advance if my previous question has got itself held up in a queue, but there's been no sign of it for over 3 hours now...
I have a MAJOR problem, that I'm sure has a simple solution, but I've been hitting my head against this particular "brick" wall too often and I need to find a solution.
I create a form, with a combination of text boxes and combo boxes. All the Add/Edit/Delete options for... -
Code:Worksheets("planning").Range("P7:P355").Copy Worksheets("Sheet2").Range("C2:C355").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
Code:Sheets("planning").Range("P7:P355").Select Selection.copy Sheets("Sheet2").Range("C2:C355").PasteSpecial Paste:=xlPasteAll, etc
Leave a comment:
No activity results to display
Show More
Leave a comment: