① VB與sql2014連接
直接使用adodc控制項 右鍵控制項屬性 向導來連接資料庫 控制項會自動生成sql連接語句
② vb.net連接sqlserver的問題
1、在Web.Config文件內配置連接字元串。
<appSettings>
<add key="ConnectString" value="server=127.0.0.1;database=test;uid=sa;pwd= "></add>
</appSettings>
2、拖一個Gridview控制項到頁面上，並將其命名為AAA。用下面代碼來綁定數據。
SqlConnection connection = new SqlConnection(ConfigurationManager.ConnectionStrings["connectionString"].ConnectionString);
SqlCommand command = new SqlCommand("SELECT * from test", connection);
SqlDataAdapter ada = new SqlDataAdapter(command);
DataTable dt = new DataTable();
ada.Fill(dt);
gvImages.DataSource = dt;
gvImages.DataBind();
3、頁面上
<asp:GridView Width="500px" ID="gvImages" runat="server"
AutoGenerateColumns="False" >
<Columns>
<asp:BoundField HeaderText = "顯示欄位名稱" DataField="TestName" />
'HeaderText所在列的標題，DataField中"TestName" 為欄位名稱，
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
③ 如何用vb連接sql server資料庫
一、配置ODBC數據源
1、在控制面板中，雙擊管理工具，然後打開ODBC數據源管理器。
2、在「系統DSN」選項卡中，單擊「添加」按鈕，打開「創建新數據源」對話框，在「名稱」列表框中選擇「SQL Server」。選好單擊完成
3、在打開「建立新的數據源到SQL Server」對話框，在「名稱」文本框輸入新數據源的名稱，描述數據源按你理解的方式來寫(隨意)。「伺服器」就選擇你要連接到的伺服器。
4、選擇使用用戶輸入登錄的ID和密碼的SQL 驗證
。選連接SQL默認設置
5、再下一步下一步，完成。測試數據源看連接是否成功就行了。成功後按確定。
二、VB中設置連接
1、添加部件Mircrosoft ADO Data Control 6.0(OLEDB),把部件拖到窗體。
2、對ADO部件點右鍵選屬性，選擇使用連接字元串，按生成。
3、選擇Mircosoft OLE DB Providar for SQL Server
按下一步
4、
1、輸入伺服器名稱
2、使用指定的伺服器信息
3、在伺服器上選擇資料庫
這時就選擇你在SQL Server建好的資料庫就行了
5、測試連接可以看到連接是否成功！
④ VB如何連接SQL SERVER
打開「控制面板」→「管理工具」→「數據源 (ODBC)」後，出現窗體。 單擊「系統DSN」選項卡後，點擊「添加」按鈕，出現窗體。 選擇其中的「SQL Server」後，單擊「完成」，出現窗體。 單擊「下一步」，。選擇「SQL Server驗證」，一般ID為「sa」，密碼為空（實際要根據具體情況輸入）。 單擊「下一步」。更改默認資料庫為所建立的資料庫。 單擊「下一步」後完成設置。 （2）VB中使用ADO資料庫控制項，實現與資料庫的連接 使用ADO資料庫控制項需要添加組件，控制項工具箱中就出現需要的控制項。 將控制項放在需要的窗體中，。 滑鼠右鍵調出ADODC屬性,進行設置。在未建立數據源的情況下，也可進行「新建」或者使用第三個選擇「使用連接字元串」。 數據源設立完畢，就需要設立身份驗證和記錄源。 以上設置也可在ADODC1控制項的屬性中進行設置(3)代碼實現Public conn As ADODB.ConnectionPublic rs As ADODB.RecordsetPublic addFlag As Boolean '聲明部分Public Function OpenCn(ByVal Cip As String, ByVal users As String, ByVal pw As String) As Boolean '連接模塊 填寫資料庫等信息Dim mag As StringOn Error GoTo strerrmagSet conn = New ADODB.Connectionconn.ConnectionTimeout = 25conn.Provider = "sqloledb"conn.Properties("data source").Value = Cip '伺服器的名字conn.Properties("initial catalog").Value = "pubs" '庫名'conn.Properties("integrated security").Value = "SSPI" '登陸類型conn.Properties("user id").Value = users 'SQL庫名conn.Properties("password").Value = pw '密碼'sql = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;password=;Initial Catalog=pubs;Data Source=127.0.0.1" '如果不用這個模塊也行可以，這一句便是常用的引擎。'conn.ConnectionString = sql conn.OpenOpenCn = TrueIf conn.State = 1 Then addFlag = TrueExit Functionstrerrmag: mag = "Data can't connect" Call MsgBox(mag, vbOKOnly, "Error:Data connect") addFlag = False Exit Function '連接錯誤消息End Function'關閉資料庫，釋放連接Public Sub cloCn()On Error Resume NextIf conn.State <> adStateClosed Then conn.CloseSet conn = NothingEnd SubPublic Function openRs(ByVal strsql As String) As Boolean '連接資料庫記錄集Dim mag As StringDim rpy As BooleanOn Error GoTo strerrmag Set rs = New ADODB.Recordset If addFlag = False Then rpy = True With rs .ActiveConnection = conn .CursorLocation = adUseClient .CursorType = adOpenKeyset .LockType = adLockOptimistic .Open strsql End With addFlag = True openRs = True 'End '將記錄集給rs Exit Functionstrerrmag: mag = "data not connect" Call MsgBox(mag, vbOKOnly, "error:connect") openRs = False End 'Exit Function '連接錯誤消息End FunctionPublic Sub cloRs()On Error Resume NextIf rs.State <> adStateClosed Then rs.CloneSet rs = Nothing '釋放記錄集End Sub
⑤ VB怎麼連接SQL Server資料庫
VB連接資料庫方式主要有兩種，一是通過ODBC介面，ODBC是windows系統里提供的介面，專門連接資料庫的，可以連接多種資料庫，在應用電腦的設置ODBC，也就DSN數據源（下面說到的），連接到伺服器。
第二種就是ADO方式，
VB使用ADO資料庫可以分為有源資料庫和無源資料庫，即是否使用了DSN數據源，如下例：
1、在連接資料庫前首先要在VB菜單中「工程」-「引用」從中選擇 microsoft activeX Data objects 2.6 library和 microsoft activeX Data objects recordset 2.6兩個組件，這是在連接數據前所必做的工作。
2、接下來定義ADO的連接對象，如下所示：
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
第一種方法採用的是無源的資料庫連接方法
conn.ConnectionString = "Driver={sql server};server=JSZX3-11;uid=sa;pwd=;database=wzc"
conn.ConnectionTimeout = 30
conn.Open
rs.Open "select 用戶名,密碼 from login where 用戶名='" & Trim(Combo1.Text) & "' And 密碼='" & Trim(Text1.Text) & "'", conn, adOpenStatic, adLockReadOnly, adCmdText
If rs.EOF = True And rs.BOF Then
m = MsgBox("請重新登錄", vbExclamation)
Text1.Text = ""
Text1.SetFocus
Else
Form1.Hide
End If
rs.Close
這是第二種方法連接資料庫的方法，這一種方法是採用有源的方法與資料庫連接的方法，代碼如下所示：
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.ConnectionString = "DSN=login;uid=sa;pwd=;"
conn.ConnectionTimeout = 30
conn.Open
rs.Open "select 用戶名 from login", conn, adOpenStatic, adLockReadOnly, adCmdText
Dim i As String
For t = 0 To Val(rs.RecordCount) - 1
i = Trim(rs.Fields("用戶名").Value)
rs.MoveNext
Combo1.AddItem i
Next t
rs.Close
連接資料庫的方法很多很多，只要各位去勇敢的償試一下，就可以感覺資料庫的方法並不是很難，本人以前也很想做這方法的工作，只是學識不深，未能完成胸中大志，如今對這些方法的多少有一些了解，特意為那些初學者以供學習之用。
VB使用ADO資料庫可以分為有源資料庫和無源資料庫，即是否使用了DSN數據源，如下例：
1、在連接資料庫前首先要在VB菜單中「工程」-「引用」從中選擇 microsoft activeX Data objects 2.6 library和 microsoft activeX Data objects recordset 2.6兩個組件，這是在連接數據前所必做的工作。
2、接下來定義ADO的連接對象，如下所示：
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
第一種方法採用的是無源的資料庫連接方法
conn.ConnectionString = "Driver={sql server};server=JSZX3-11;uid=sa;pwd=;database=wzc"
conn.ConnectionTimeout = 30
conn.Open
rs.Open "select 用戶名,密碼 from login where 用戶名='" & Trim(Combo1.Text) & "' And 密碼='" & Trim(Text1.Text) & "'", conn, adOpenStatic, adLockReadOnly, adCmdText
If rs.EOF = True And rs.BOF Then
m = MsgBox("請重新登錄", vbExclamation)
Text1.Text = ""
Text1.SetFocus
Else
Form1.Hide
End If
rs.Close
這是第二種方法連接資料庫的方法，這一種方法是採用有源的方法與資料庫連接的方法，代碼如下所示：
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.ConnectionString = "DSN=login;uid=sa;pwd=;"
conn.ConnectionTimeout = 30
conn.Open
rs.Open "select 用戶名 from login", conn, adOpenStatic, adLockReadOnly, adCmdText
Dim i As String
For t = 0 To Val(rs.RecordCount) - 1
i = Trim(rs.Fields("用戶名").Value)
rs.MoveNext
Combo1.AddItem i
Next t
rs.Close
連接資料庫的方法很多很多，只要各位去勇敢的償試一下，就可以感覺資料庫的方法並不是很難，本人以前也很想做這方法的工作，只是學識不深，未能完成胸中大志，如今對這些方法的多少有一些了解，特意為那些初學者以供學習之用。
⑥ vb連接sqlserver
在系統中建立ADO公共查詢模塊
Public Function ExecuteSQL(ByVal SQL _
As String, MsgString As String) _
As ADODB.Recordset '執行SQL語句並返回Recordset對象
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
Dim sTokens() As String
On Error GoTo ExecuteSQL_Error
sTokens = Split(SQL)
Set cnn = New ADODB.Connection
cnn.Open CONN
'打開連接
If InStr("INSERT,DELETE,UPDATE", _
UCase$(sTokens(0))) Then
cnn.Execute SQL
MsgString = sTokens(0) & _
" 查詢成功"
Else
Set rst = New ADODB.Recordset
rst.Open Trim$(SQL), cnn, _
adOpenKeyset, _
adLockOptimistic
Set ExecuteSQL = rst
MsgString = "查詢到" & rst.RecordCount & _
" 條記錄 "
'獲取記錄的條數
End If
ExecuteSQL_Exit:
Set rst = Nothing
Set cnn = Nothing
Exit Function
ExecuteSQL_Error:
MsgString = "查詢錯誤: " & _
Err.Description
Resume ExecuteSQL_Exit
End Function
然後再應用模塊中就可以使用
Dim txtSQL As String
Dim mrc As ADODB.Recordset
Dim MsgText As String
txtSQL = "select * from ... "
Set mrc = ExecuteSQL(txtSQL, MsgText)
查詢了
⑦ vb 連接SQLSERVER
mdf,不能直接用，要帶上sqlserver才能用
在sqlserver附加上這個mdf就行了，
連接句不變
⑧ vb連接資料庫sqlserver的問題
其實不難的，既然你已經會用DATAGRID ADODC1綁定數據，下一不就好辦了。
1、首先添加，判斷是否重復出現(免掉)， adodc1.addnew
adodc1.rcoutset.fileds(0)="插入的數據"
.........
adodc1.update
exit sub
adodc1.rcoutset.recourtsource="recourtsource屬性裡面的語句"
adodc1.refresh
2.刪除語句：
dim st,sql as
string
adodc1.rcoutset.recourtsource="recourtsource屬性裡面的語句"
st=adodc1.recoutset.fileds(0).value
sql="recourtsource屬性裡面的語句 where **='"st"'"
adodc1.delete
3.更新語句:
adodc1.rcoutset.fileds(0)="更新過的數據"
.........
adodc1.update
exit sub
adodc1.rcoutset.recourtsource="recourtsource屬性裡面的語句"
adodc1.refresh 『那些數據來源可以是文本框等，你要自己想了，其實不難的。
4、假如都有判斷是否唯一語句（避免插入刪除異常時），
adodc1.rcoutset.recourtsource="recourtsource屬性裡面的語句 where 條件"
if adodc1.rcoutset.eof=false then
msgbox"出錯"
exit sub
end if '這個條件插在他們的前面就可以判斷了。