16,552
社区成员
发帖
与我相关
我的任务
分享
</configSections>
<connectionStrings>
<add name="XU01.My.MySettings.Test_ExamConnectionString" 注意下面的两行插入到这里
connectionString="Data Source='这里是你的数据库';Initial Catalog='数据库名';Integrated Security=True"
providerName="System.Data.SqlClient" />
</connectionStrings>
Dim sqlConnection1 As SqlClient.SqlConnection
Dim strConnect As String="data source=服务器名;initial catalog=数据库名;user id=sa;password=;"
sqlConnection1=New System.Data.SqlClient.SqlConnection(strConnect)
sqlConnection1.open ‘打开数据库
sqlConnection1.close ‘关闭连接,释放资源
VB.NET连接数据库的几种方法
Imports System.Data.OleDb
Imports System.Data.SqlClient
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim cstring As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\db.mdb"
Dim con As New OleDb.OleDbConnection(cstring)
Dim sql As String = "select * from bkstudent"
con.Open()
Dim sales As DataSet = New DataSet
Dim cmd As New OleDb.OleDbCommand(sql, con)
Dim myreader As OleDbDataReader = cmd.ExecuteReader
While myreader.Read
TextBox1.Text = TextBox1.Text & myreader(0) & "-" & myreader(1) & "-" & myreader(2) & "-" & myreader(3) & vbCrLf
End While
con.Close()
End Sub
End Class