使用ADODC控件，设置adodc控件的ConnectionString 属性为"Provider=SQLOLEDB.1;Password=数据库登录密码;Persist Security Info=True;User ID=数据库登录名;Initial Catalog=数据库名称;Data Source=服务器名称或IP地址"
然后设置Adodc1.CommandType=表名或者SQL数据源
Adodc1.RecordSource=表名或者SQL语句
adodc1.Refresh
以上就已经连接上一个指定的数据源了，接下来就可以进行各种操作啦
② vb 连接sql数据库的控件 全名是什么
微软公司
的ADO
(ActiveX
Data
Objects)
是一个用于存取数据源的
COM组件
。它提供了编程语言和统一数据访问方式OLE
DB的一个
中间层
。
③ 如何VB连接SQL
用adodc和datagrid控件
④ 如何将VB和SQL数据库进行连接
Dim
oleDbConnection1
As
OleDb.OleDbConnection
Dim
strConnect
As
Sting="Provider=SQLOLEDB；Persist
Security
Info=False；
Data
Source=服务器名；Initial
Catalog=数据库名；User
ID=sa；Password=；"
oleDbConnection1=New
System.Data.OleDb.OleDbConnection（strConnect）
填上的服务器名
和数据库名
用户名
和密码
后用这个语句可以进行连接
⑤ VB使用ADO控件怎么连接SQL数据库
右键ado-属性-通用-生成提供连接access选择microsoft
jet
4.0或者3.51sql
server
选择
microsoft
ole
db
provider
for
sql
server下一步
选择你的数据库就可以了。
⑥ VB和SQL如何连接
dim
cn
as
adodb.connection
dim
rs
as
adodb.recordset
set
cn=new
adodb.connection
cn.open
"数据库连接套接字"
set
rs=new
adodb.recordset
rs.open
"select
sp
from
b1
where
sno='"+tbox1.text"'",cn,4,2
if
tbox2.text=rs.fields("sp")
then
'登录成功
……
else
'密码错误
……
end
if
set
rs=nothing
set
cn=nothing
⑦ VB如何连接SQL SERVER
打开“控制面板”→“管理工具”→“数据源 (ODBC)”后，出现窗体。 单击“系统DSN”选项卡后，点击“添加”按钮，出现窗体。 选择其中的“SQL Server”后，单击“完成”，出现窗体。 单击“下一步”，。选择“SQL Server验证”，一般ID为“sa”，密码为空（实际要根据具体情况输入）。 单击“下一步”。更改默认数据库为所建立的数据库。 单击“下一步”后完成设置。 （2）VB中使用ADO数据库控件，实现与数据库的连接 使用ADO数据库控件需要添加组件，控件工具箱中就出现需要的控件。 将控件放在需要的窗体中，。 鼠标右键调出ADODC属性,进行设置。在未建立数据源的情况下，也可进行“新建”或者使用第三个选择“使用连接字符串”。 数据源设立完毕，就需要设立身份验证和记录源。 以上设置也可在ADODC1控件的属性中进行设置(3)代码实现Public conn As ADODB.ConnectionPublic rs As ADODB.RecordsetPublic addFlag As Boolean '声明部分Public Function OpenCn(ByVal Cip As String, ByVal users As String, ByVal pw As String) As Boolean '连接模块 填写数据库等信息Dim mag As StringOn Error GoTo strerrmagSet conn = New ADODB.Connectionconn.ConnectionTimeout = 25conn.Provider = "sqloledb"conn.Properties("data source").Value = Cip '服务器的名字conn.Properties("initial catalog").Value = "pubs" '库名'conn.Properties("integrated security").Value = "SSPI" '登陆类型conn.Properties("user id").Value = users 'SQL库名conn.Properties("password").Value = pw '密码'sql = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;password=;Initial Catalog=pubs;Data Source=127.0.0.1" '如果不用这个模块也行可以，这一句便是常用的引擎。'conn.ConnectionString = sql conn.OpenOpenCn = TrueIf conn.State = 1 Then addFlag = TrueExit Functionstrerrmag: mag = "Data can't connect" Call MsgBox(mag, vbOKOnly, "Error:Data connect") addFlag = False Exit Function '连接错误消息End Function'关闭数据库，释放连接Public Sub cloCn()On Error Resume NextIf conn.State <> adStateClosed Then conn.CloseSet conn = NothingEnd SubPublic Function openRs(ByVal strsql As String) As Boolean '连接数据库记录集Dim mag As StringDim rpy As BooleanOn Error GoTo strerrmag Set rs = New ADODB.Recordset If addFlag = False Then rpy = True With rs .ActiveConnection = conn .CursorLocation = adUseClient .CursorType = adOpenKeyset .LockType = adLockOptimistic .Open strsql End With addFlag = True openRs = True 'End '将记录集给rs Exit Functionstrerrmag: mag = "data not connect" Call MsgBox(mag, vbOKOnly, "error:connect") openRs = False End 'Exit Function '连接错误消息End FunctionPublic Sub cloRs()On Error Resume NextIf rs.State <> adStateClosed Then rs.CloneSet rs = Nothing '释放记录集End Sub
⑧ VB连接SQL server方法要详解
1，你现在VB的工程中下的引用按钮添加Microsoft
ADO
data控件和Microsoft
datagird控件
2，然后把ADO控件添加到界面中，然后右击ADO控件出现ADO属性，在“使用连接字符串”中单击生成，在下面找SOL，基本上就行了
⑨ VB与SQL Server连接的问题
1。可能与sql数据库有关，既然可以正常连接到数据库，vb的连接代码应该没有问题。
2
.data控件是vb5的控件，adodc控件是vb6新增的，功能比data控件强大，adodc控件可以连接access2003数据库，vb6推荐使用ado
3
用代码就是adodb对象，使用前要先引用ado2.0～2.8，好像现在最高的版本是2.8，要看你安装的数据库引擎，使用的语法与adodc控件是一样的，adodc控件代码简单，adodb对象使用灵活。各有优点。出血建议用adodc控件做，熟悉了可以用adodb做。
4
触发器可以在dim
定义时设定，现在没有vb程序，忘记了命令，看看msdn就知道了，事件与adodc控件是一样的。
⑩ 如何用vb链接sql的数据库
这段代码写在模块中,可以连接一个数据库
Public
DBConnct
As
New
ADODB.Connection
'连接数据库
Public
Function
Connt()
As
Boolean
'数据库连接函数
Dim
splstr
As
String
'App.Path
&
"\db\123.mdb为数据库路径
splstr
=
"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source="
& App.Path
&
"\db\123.mdb"
& ";Persist
Security
Info=False"
DBConnct.Open
splstr
'连接数据库
Connt
=
True
End
Function