vb.net连接SQL的简单介绍

请问：VB.NET怎么连接SQL？

Public sqlcon As System.Data.SqlClient.SqlConnection

成都创新互联主营铜鼓网站建设的网络公司,主营网站建设方案,成都app软件开发公司,铜鼓h5微信小程序定制开发搭建,铜鼓网站营销推广欢迎铜鼓等地区企业咨询

Public sqladapter As System.Data.SqlClient.SqlDataAdapter

Public command As System.Data.SqlClient.SqlCommand

Public ds As System.Data.DataSet

Public dr As System.Data.DataTable

sqlcon = New System.Data.SqlClient.SqlConnection

sqlcon.ConnectionString = "Server=(local); Initial Catalog=test1 ; User ID="数据库sa用户"; Password="数据库密码""

ds = New System.Data.DataSet

dr = New System.Data.DataTable(" test2 ")

ds.Tables.Add(dr)

sqladapter = New System.Data.SqlClient.SqlDataAdapter("select * from test2 ", sqlcon)

sqlcon.Open()

sqladapter.Fill(dr)

sqlcon.Close()

界面上控件

DataGridView1.DataSource = dr

VB.NET连接SQL2008数据库的问题

不知道你需要连的是哪个数据库，我以sqlserver数据库为例子

1、sqlconnection类位于名称空间system.data.sqlclient,所以先using

system.data.sqlclient

2、dim

sqlconnection1

sqlclient.sqlconnection

dim

strconnect

string=”data

source=服务器名;initial

catalog=数据库名;user

id=sa;password=;”

sqlconnection1=new

system.data.sqlclient.sqlconnection(strconnect)

sqlconnection1.open

‘打开数据库

sqlconnection1.close

‘关闭连接，释放资源

以上是通用的连库代码。其实你2个问题，只需要改一个地方。

第一个问题

dim

strconnect

string=”data

source=服务器名;initial

catalog=数据库名;user

id=sa;password=;”把这里的data

source=服务器名;改成data

source=.或者data

source=localhost

这是本地服务器，也可以用服务器名

第二个问题，同样也是改data

source=服务器名;改为data

source=192.168.1.1

同理，initial

catalog=数据库名根据是实际的改，第一个问题改成initial

catalog=publs

第二个问题改成initial

catalog=hero

VB.NET对SQL数据库怎样连接啊？求代码？

VB.NET中有控件可以真接接点击属性进行连接配置.

SqlConnect数据连接控件.点击ConnectionString属性进行配置就可以了.

VB.NET中没有RecordSet了.取而代之的是DataSet.

在VB.net中可以先用SqlConnection对像来连接数据库再用SqlDataAdapter对像来读取数据并填充到DataSet里.然后就可以进行数据绑定了.

例:

dim

conn

SqlConnection

dim

SqlDataAdapter

dim

Dataset

set

conn

new

SqlConnection

conn.ConnectionString="server=serverIP;database=databasename;uid=userid;pwd=password";

conn.open

new

SqlDataAdapter

(,conn)

da.fill(ds)

vb.net是怎么样实现与sql的连接的？

ADO.net +SQLSever（比如说你的服务器是：MYSQLSERVER,你要连的数据库是pubs）

首先引入命名空间(在public class ..之上）

imports system.data.sqlclient

⑴信任连接（不用使用用户名，密码）

Dim mycon As New SqlConnection("server=MYSQLSERVER;database=pubs;integrated security=true;")

mycon.open()

....

mycon.close()

⑵采用用户名和密码连接(假如你的数据库登陆用户名为sa,密码为：dorient)：

Dim mycon As New SqlConnection("server=MYSQLSERVER;database=pubs;uid=sa;pwd=dorient;")

vb.net怎么连接SQL数据库

Imports System.Data

Imports System.Data.SqlClient

Public Class Form1

Inherits System.Windows.Forms.Form

'数据库连接对象

'错误的写法

'Dim objConnection As SqlConnection = New SqlConnection("server=(local);database=pubs;user id=sa;password=")

'正确写法

Dim objConnection As New SqlConnection("Data Source=127.0.0.1; Initial Catalog=pubs; user id=sa; password=;")

'数据适配器

Dim objDataAdapter As SqlDataAdapter = New SqlDataAdapter()

'DataSet

Dim objDataSet As DataSet = New DataSet()

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

'设置查询命令属性

objDataAdapter.SelectCommand = New SqlCommand

objDataAdapter.SelectCommand.Connection = objConnection

objDataAdapter.SelectCommand.CommandText = "select au_lname,au_fname,title,price from authors join titleauthor on authors.au_id=titleauthor.au_id join titles on titleauthor.title_id=titles.title_id order by au_lname,au_fname"

objDataAdapter.SelectCommand.CommandType = CommandType.Text

'打开数据库连接

objConnection.Open()

'填充DataSet对象

objDataAdapter.Fill(objDataSet, "authors")

'关闭数据库连接

objConnection.Close()

'给DataGrid绑定数据

grdAuthorTitles.DataSource = objDataSet

grdAuthorTitles.DataMember = "authors"

'清除

objDataAdapter = Nothing

objConnection = Nothing

End Sub

End Class