| Rubrik: Datenbanken · SQL-Server | VB-Versionen: VB6 | 29.12.11 |
 SQL-Datenbank verkleinern und neu reorganisierenMit diesem Einzeiler lässt sich eine MS SQL-Datenbank verkleinern und neu reorganisieren. | ||
Autor:  Dieter Otter | Bewertung:  | Views: 18.184 |
| www.tools4vb.de | System: WinXP, Win7, Win8, Win10, Win11 |  Beispielprojekt auf CD |
Mit nachfolgendem Einzeiler lässt sich eine beliebige Datenbank innerhalb des Microsoft SQL-Servers reorganisieren und verkleinern. Dies ist immer dann sinnvoll, wenn eine Datenbank längere Zeit intensiv in Gebrauch war und führt anschließend zu einer deutlichen Leistungssteigerung.
' Datenbankname Dim sDBName As String sDBName = "MeineDatenbank" ' Hinweis: Die Verbindung zum MS-SQL Server muss bereits bestehen oConn.Execute "DBCC SHRINKDATABASE ('" & sDBName & "')"
Es gibt auch noch eine weitere Variante des Befehls: durch zusätzliche Angabe eines Prozentsatzes kann man den SQL-Server dazu veranlassen, eine bestimmte Größe automatisch für zukünftiges Wachstum im Voraus zu reservieren.
' 10% der Größe im Voraus reservieren oConn.Execute "DBCC SHRINKDATABASE ('" & sDBName & "', 10)"
Wenn die Datenbank nach dem Reorganisieren eine Größe von 250 MB hat werden autom. 10% davon (=25 MB) reserviert, d.h. als freier Speicherplatz angehängt.
Hinweis:
Das Verkleinern der Datenbank sollte wenn möglich nur dann ausgeführt werden, wenn kein anderer User die SQL-Datenbank verwendet, da der Vorgang die Leistung für verbundene Benutzer stark beeinträchtigt!
