vb.net数据连接 vb数据库连接( 二 )


2.用代码连接
先到数据库建立一个数据库和相应vb.net数据连接的表
连接数据库的代码vb.net数据连接:
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
登录代码vb.net数据连接: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("输入信息有误vb.net数据连接!", "提示")
TextBox1.Text = ""
TextBox2.Text = ""
End If
vb.net 使用模块连接数据库你说这么一大篇全是业务逻辑,没说明你遇到的技术性问题在哪
.net自带的config文件来配置连接字符串,比ini好N倍 , 如果你非要用ini那么自己解决问题
检测是否能连接用Connection.Open加try catch就可以
关于vb.net数据连接和vb数据库连接的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。

推荐阅读