Access - retriving primary key ...

[Neven Klofutar]

Hi,

I'm trying to get a primary key from a table via openSchema method, but it
seems that I can do that on Access DB.
I only get a error:
"ADODB.Connection (0x800A0CB3)
Object or provider is not capable of performing requested operation."

Code:
**************************
set rs = Server.CreateObject("ADODB.Recordset")
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConnString

Set rs = Conn.OpenSchema(adSchemaPrimaryKeys)

for each element in rs.fields
Response.Write element & "<br>"
next


rs.Close: set rs = nothing
Conn.Close: set Conn = nothing

[Bob Barrows]

Two options, neither of which I've tried (I always seem to know which field
is the primary key in the tables i've designed for some reason <wink>)

1. Open a recordset on the table using a sql statement with "WHERE 1=2" so
you get an empty recordset. Then loop through the Fields collection,
checking the Attributes property until you find the dey field(s).

2. Use ADOX.

HTH,
Bob Barrows
Neven Klofutar wrote:

> Hi,
>
> I'm trying to get a primary key from a table via openSchema method,
> but it seems that I can do that on Access DB.
> I only get a error:
> "ADODB.Connection (0x800A0CB3)
> Object or provider is not capable of performing requested operation."
>
> Code:
> **************************
> set rs = Server.CreateObject("ADODB.Recordset")
> set Conn = Server.CreateObject("ADODB.Connection")
> Conn.Open ConnString
>
> Set rs = Conn.OpenSchema(adSchemaPrimaryKeys)
>
> for each element in rs.fields
> Response.Write element & "<br>"
> next
>
>
> rs.Close: set rs = nothing
> Conn.Close: set Conn = nothing