comparing the structure of 2 tables 1

[primerov]

I am updating and appending 2 idential tables. The functions work fine, but only in case
the tables are identical.For example, if the in the first table Table1, i have added on more row
which doesnt exist in the other table Table2. then i receive an error. I want somehow toi inform the
user that he has to import the right table Table1 with a message. Is it possible to do it
Somehow of the kind :
If Table2 is not equal to Table1 Then............

 

[Blorf]

maybe somethig like this

Function CompareTables()
Set Sele1 = currentdb.openrecordset("Table1")
Set Sele2 = currentdb.openrecordset("Table2")

if Sele1.Fields.Count <> Sele2.Fields.Count then
Bad Not the Same

else

For I = 0 to Sele1.fields.count - 1
if sele1.fields(I).Name <> sele2.fields(I).Name then
Bad Bad Not the Same

and so on...

Hope that helps.


Ascii dumb question, get a dumb Ansi