2014年7月15日 星期二

VB.NET:MSSQL資料庫連線

http://edcsofi.pixnet.net/blog/post/45574664-vb.net%3Amssql%E8%B3%87%E6%96%99%E5%BA%AB%E9%80%A3%E7%B7%9A

1.
Imports System.Data
Imports System.Data.SqlClient

2.
Dim conn = New SqlConnection '設"Conn"為新的SQL連線
conn.ConnectionString = "Data Source=伺服器名稱;Initial Catalog=資料庫;PersistSecurity Info=True;User ID=帳號;Password=密碼"   '指定SQL Server MDF檔來源
conn.Open() '開啟連線

Dim strinsert As String = "insert into account (account,password)"      '把SQL指令先轉成字串

strinsert &= "Values ('" & TextBox1.Text & "','" & TextBox2.Text & "')"
Dim cmnd As SqlCommand = New SqlCommand(strinsert, conn)   '定義cmnd為SqlCommand指令
cmnd.ExecuteNonQuery()  '呼叫Cmnd執行Sql指令
MessageBox.Show("Insert Complete")
conn.Close()  '結束連線

沒有留言: