使用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