Пример создания таблицы
conn.Connect() Dim AWDBase As Database = myServer.Databases(«AdventureWorks») Dim DiscountsTable As New Table(AWDBase, «Sales.Discounts») Dim ID As New Column(DiscountsTable, «ID», DataType.Int) Dim Name As New Column(DiscountsTable,»Name», DataType.NVarChar(30)) ID.Identity = True DiscountsTable.Columns.Add(ID) DiscountsTable.Columns.Add(Name) Try DiscountsTable.Create() Catch ex As Exception Console.WriteLine(ex.Message) conn.Disconnect() Return End Try Console.WriteLine(«The table was created») conn.Disconnect()