Vous pouvez mettre en forme le résultat pour votre estimation de taille de base de données. Les sous-objets (par exemple les colonnes et les index) contenus dans une table sont affichés en décalé, et vous pouvez imprimer des informations supplémentaires après le total.
[taille-objet][:compartiment]|[ObjectID][|libellé]where:
message = CStr(TableSize) & "||" & objTable.ShortDescription & vbCrLf
message = message & CStr(LongSize) & "||Colonnes de type LONG" & vbCrLf
message = message & CStr(IndexSize) & "|" & objIndex.ObjectID & vbCrLf
Dans le gestionnaire d'événement défini sur la métaclasse Tablespace (en ayant calculé et stocké la taille d'un tablespace), nous créons un message variable pour imprimer cette information après avoir imprimé le calcul de la taille de base de données.
message = ":1||Des tables sont allouées aux tablespaces suivants :"
message = message + CStr(tablespaceSize) & ":1||" & objTablespace.ShortDescription
Estimation de la taille de la base de données "Sales"...
Nombre Taille estimée Objet
------- -------------- ------------------------------------
10,000 6096 Ko Table 'Invoices'
Colonnes de type LONG (35 KB)
Index 'customerFKeyIndex' (976 KB)
Index 'descriptionIndex' (1976 KB)
[...etc...]
Des tables sont allouées aux tablespaces suivants :
Taille estimée Objet
-------------- ------------------------------------
6096 Ko Tablespace 'mainStorage'
[...etc...]