|
|
Our Hot Pick: Rising Antivirus 2006 - Certified by TUV & Checkmark! Get 10% discount by entering this coupon code: ONDISCOUNT10
Hi,
i've created a selfcontained module (tested with Access2003) for download which allows you to document your systems (done via two tables) here a short description:
'####################################################################################### ' mdlCreateObjectListingInTables '####################################################################################### ' ' Attention: You have to call this Module "mdlCreateObjectListingInTables" ' otherwise it may not work - it can't call it's own module ... ' It's based on DAO so sorry, no ADP ' '####################################################################################### ' 'I needed a possibillity to describe a new version of a database, which is a toolset of functions 'the mdb is rather well known in the two german access newsgroups, and it´s called "KnowHow.mdb" 'You´ll find it in http://www.freeaccess.de or at http://www.mvps.org/access So i created this set of functions.
'This functions will create a table "A_tblObjIntFunktionsNamen" which contains some useful info about the 'system - mainly modulenames, functionnames and subnames 'A second table "A_tblObjInttblTabellenBeschreibung" also is created. It shows all field descriptions of the table, 'which you need, to rebuild the tables from scratch. 'Function DescTableCreate(strTable As String) As Boolean 'May also be called "stand alone" for a single table, but it ALWAYS 'creates or enhances (if table exist) to the table "A_tblObjInttblTabellenBeschreibung"
' It also creates 6 "System"-Queries which are based on MSysObjects (Forms, Tables, Macros, Tables, Queries, Reports)
'Just call the function ModList in Debug-Window and wait
' ?Modlist()
'Autor: Klaus Oberdalhoff kobd[ at ]gmx.de Vers. 2.0 24.8.2006 '#######################################################################################
Download / save:
http://hco.dyndns.org/~kobd/mdlCreateObjectListingInTables.txt
mfg
Klaus Oberdalhoff KObd[ at ]gmx.de
Ich beantworte keine NG-Fragen und -Nachfragen per Mail! Newbie-Info: http://www.doerbandt.de/Access/Newbie.htm KnowHow-mdb und andere Beispiele: http://www.freeaccess.de Sofern Access 200x bitte beachten: http://www.freeaccess.de/MS-Access-Artikel.asp?ID=99
Ich unterstütze PASS Deutschland e.V. (http://www.sqlpass.de)
|
|
|