Extract form design from MSys... tables?

Is there any code that will take a form and create a table representing the form design? I'm looking for a result like EITHER:

controlname controltype top left height width and all other relevant properties
textbox1       textbox       10  10  200    2000

OR

controlname propertyname propertyvalue
textbox1       controltype     textbox      
textbox1       top                10
textbox1       left                10
textbox1       height            200
textbox1       width             2000
LVL 17
ramromconsultant Asked:
Who is Participating?
 
Gustav BrockConnect With a Mentor CIOCommented:
It's not that easy. As a start, read out what you will have to extract otherwise by saving the form as a text file:

SaveAsText acForm, Forms(0).Name, "c:\" & Forms(0).Name & ".txt"

It can be loaded into the database with the reverse command: LoadFromText ...

Study the textfile. It contains all info including a bitmap of any pictures (background).

/gustav
0
 
ramromconsultant Author Commented:
I've started to write my own. Turns out that I want container relationships (e.g. tabcontrol is parent of page(s) are parents of control on corresponding tab page.) So a little more complex but doable.  Still open to someone's code.

New table format:
seq property value
    1 Form     Form1
    2 Control  TextBox1
    3 Type     109
    4 Top      10
    5  etc...
    6 Tab1    123
0
 
ramromconsultant Author Commented:
SaveAsText. That does it! Where is this documented? I can't find it in Access Help!

http://www.thescripts.com/forum/thread190534.html says a bit more. Hidden members, eh? Why hidden?

0
 
Gustav BrockCIOCommented:
They are undocumented by MS but have been around since Access 97 so they are widely known among developers.
The purpose for these is probably to enable Access to save and load source code and objects in Visual Source Safe.

/gustav
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.