Script méthode
Generates a Transact-SQL script that can be used to re-create the database.
Espace de noms : Microsoft.SqlServer.Management.Smo
Assembly : Microsoft.SqlServer.Smo (dans Microsoft.SqlServer.Smo.dll)
Syntaxe
'Déclaration
Public Function Script As StringCollection
'Utilisation
Dim instance As Database
Dim returnValue As StringCollection
returnValue = instance.Script()
public StringCollection Script()
public:
virtual StringCollection^ Script() sealed
abstract Script : unit -> StringCollection
override Script : unit -> StringCollection
public final function Script() : StringCollection
Valeur de retour
Type : System.Collections.Specialized. . :: . .StringCollection
A StringCollection system object value that contains a list of Transact-SQL statements in the script.
Implémente
Notes
The Script method generates a set of Transact-SQL statements that are used to create the database. This method generates a script that can be used to create the database only. The whole database, including dependent objects such as tables, can be scripted by using the Scripter object. Le script généré contient peut-être des procédures internes non documentées, qui sont nécessaires pour la sortie complète du script.
Exemples
'Connect to the local, default instance of SQL Server.
Dim srv As Server
srv = New Server
'Reference the AdventureWorks database.
Dim db As Database
db = srv.Databases("AdventureWorks")
'Define a Scripter object and set the required scripting options.
Dim scrp As Scripter
scrp = New Scripter(srv)
scrp.Options.ScriptDrops = False
scrp.Options.WithDependencies = True
'Iterate through the tables in database and script each one. Display the script.
'Note that the StringCollection type needs the System.Collections.Specialized namespace to be included.
Dim tb As Table
Dim smoObjects(1) As Urn
For Each tb In db.Tables
smoObjects = New Urn(0) {}
smoObjects(0) = tb.Urn
If tb.IsSystemObject = False Then
Dim sc As StringCollection
sc = scrp.Script(smoObjects)
Dim st As String
For Each st In sc
Console.WriteLine(st)
Next
End If
Next