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

    推荐阅读