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的信息别忘了在本站进行查找喔 。
推荐阅读
- 钉钉直播看得到同学吗嘛,钉钉直播时真的能看到学生的屏幕吗?
- html5vr的简单介绍
- 手机模拟经营游戏排行榜,手机模拟经营游戏排行榜前十名
- 史泰龙赛车游戏,史泰龙f1赛车电影
- u盘安装linux命令 u盘安装 linux
- 包含android8.1视频播放流程的词条
- mysql服务器备份,mysql数据库备份方案
- 如何登陆chatGPT网站,国内怎么上chatroulette
- c语言的字符输出函数是6 c语言中字符的输出格式