数据库连接vb.net 数据库连接失败

vb.net 使用模块连接数据库

你说这么一大篇全是业务逻辑，没说明你遇到的技术性问题在哪

.net自带的config文件来配置连接字符串，比ini好N倍，如果你非要用ini那么自己解决问题

检测是否能连接用Connection.Open加try catch就可以

vb.net的数据库连接

1·绑定数据源来进行连接

2.用代码连接

先到数据库建立一个数据库和相应的表

连接数据库的代码：

Dim str As String = "Data Source=服务器名;Initial Catalog=数据库名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

try

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

Return True

Catch ex As Exception

MsgBox(ex.ToString)

Return False

End Try

登录代码：Dim str As String = "Data Source=服务器名;Initial Catalog=数据库名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

sqlstr = "Select * From Amd Where AmdName='" TextBox1.Text "' And AmdPwd = '" TextBox2.Text "'"

Dim sqlcmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(sqlstr, conn)

Dim dr As SqlClient.SqlDataReader

dr = sqlcmd.ExecuteReader

If dr.Read = True Then '判断一条记录为真

kf.Show() '显示下个窗体

Me.Hide() ’隐藏当前窗体

Else

MessageBox.Show("输入信息有误！", "提示")

TextBox1.Text = ""

TextBox2.Text = ""

End If

vb.net的数据库怎么连接啊?

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

‘关闭连接，释放资源

1)连接Sql

Server数据库

Dim

odbcDbConnetion1

As

Microsoft.Data.OdbcConnection

　Dim

strConnect

As

Sting=”Driver={SQL

Server};Server=服务器名;Uid=sa;pwd=;Database=

数据库名;”

　odbcDbConnetion1=New

Microsoft.Data.OdbcConnection(strConnect)

数据库连接vb.net的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于数据库连接失败、数据库连接vb.net的信息别忘了在本站进行查找喔。