教你建立動態 MSSQL 資料庫表 (5) — 新增資料、建立預存程序/檢視表/索引/規則、修改/刪除表

本系列第五部分，示範新增多筆測試資料、建立預存程序、檢視表、唯一索引、規則、修改資料表結構、刪除資料表的 VB.NET 程式碼片段。

批次新增測試資料

sql = "INSERT INTO myTable(myId, myName, myAddress, myValues) " & _
      "VALUES (1003, '【孟憲會之精彩世界】之三', 'https://XML.sz.luohuedu.Net/', 99)"
cmd = New SqlCommand(sql, conn)
cmd.ExecuteNonQuery()
' ... 續增 1004 ...

建立預存程序

Private Sub CreateSPBtn_Click(...) Handles CreateSPBtn.Click
    sql = "CREATE PROCEDURE myProc AS SELECT myName, myAddress FROM myTable"
    ExecuteSQLStmt(sql)
End Sub

建立檢視表

Private Sub CreateViewBtn_Click(...) Handles CreateViewBtn.Click
    sql = "CREATE VIEW myView AS SELECT myName FROM myTable"
    ExecuteSQLStmt(sql)
End Sub

修改資料表 (新增欄位)

Private Sub btnAlterTable_Click(...) Handles btnAlterTable.Click
    sql = "ALTER TABLE MyTable ADD newCol datetime NOT NULL DEFAULT (getdate())"
    ExecuteSQLStmt(sql)
End Sub

建立唯一索引與規則

Private Sub btnCreateOthers_Click(...) Handles btnCreateOthers.Click
    sql = "CREATE UNIQUE INDEX myIdx ON myTable(myName)"
    ExecuteSQLStmt(sql)
    sql = "CREATE RULE myRule AS @myValues >= 90 AND @myValues < 9999"
    ExecuteSQLStmt(sql)
End Sub

刪除資料表

Private Sub btnDropTable_Click(...) Handles btnDropTable.Click
    Dim sql As String = "DROP TABLE MyTable"
    ExecuteSQLStmt(sql)
End Sub

所有操作均透過第六部分定義的 ExecuteSQLStmt 統一執行，錯誤以 MessageBox 提示。