Database.SetDefaultFullTextCatalog Method

public void SetDefaultFullTextCatalog (
	string catalog
)

public void SetDefaultFullTextCatalog (
	String catalog
)

public function SetDefaultFullTextCatalog (
	catalog : String
)

'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 FileGroup object called SECONDARY on the database.
Dim fg1 As FileGroup
fg1 = New FileGroup(db, "FILEGROUP2")

'Call the Create method to create the file group on the 
'instance of SQL Server.
fg1.Create()

'Define a DataFile object on the file group and set 
'the FileName property.
Dim df1 As DataFile
df1 = New DataFile(fg1, "newfile")
df1.FileName = _
"c:\Program Files\Microsoft SQL Server\MSSQL.1\MSSQL\Data\newfile.ndf"

'Call the Create method to create the data file on the 
'instance of SQL Server.
df1.Create()

'Set the new default file group for the database.
db.SetDefaultFileGroup(fg1.Name)