Attribute constant

Attribute constant

Anonymous
Not applicable
429 Views
4 Replies
Message 1 of 5

Attribute constant

Anonymous
Not applicable
Hi,

I used to add a block with attributes to microsoft acces database using vba. No problem here.

However, I editted a atrribute giving it a 'constant' value. So nobody could alter it.
Now the vba doesn't work. the value remains empty.

How do I solve this?

The part spoken about:
If Attributen(I).TagString = "TEKNR" Then
Tabel.Fields("T") = Attributen(I).TextString
teknr = Attributen(I).TextString
End If

Thanks.
0 Likes
430 Views
4 Replies
Replies (4)
Message 2 of 5

Anonymous
Not applicable
A constant attribute does not act like a normal attribute. It can be changed
only on the block definition itself, which then affects *all* its
references.

--
R. Robert Bell


<3Pinter> wrote in message news:5359146@discussion.autodesk.com...
Hi,

I used to add a block with attributes to microsoft acces database using vba.
No problem here.

However, I editted a atrribute giving it a 'constant' value. So nobody could
alter it.
Now the vba doesn't work. the value remains empty.

How do I solve this?

The part spoken about:
If Attributen(I).TagString = "TEKNR" Then
Tabel.Fields("T") = Attributen(I).TextString
teknr = Attributen(I).TextString
End If

Thanks.
0 Likes
Message 3 of 5

Anonymous
Not applicable
Okay,

So how do I get this value to be imported to Acces?

3Pinter
0 Likes
Message 4 of 5

Anonymous
Not applicable
Use the GetConstantAttributes method instead of the GetAttributes method.

<3Pinter> wrote in message news:5360071@discussion.autodesk.com...
Okay,

So how do I get this value to be imported to Acces?

3Pinter
0 Likes
Message 5 of 5

Anonymous
Not applicable
Here is a simple module code
Create database "blocks.mdb" in the same folder you do
working and run this code
Change to your needs the data you send to table or use
selection set to pass all the selected blocks

HTH

Fatty

~'J'~
0 Likes