Ⅰ 在VB6.0中如何連接Oracle資料庫表，和如何取得表中數據
--先連接資料庫，再打開記錄集，搞定。
Dim conn_ora As New ADODB.Connection '用於連接ORACLE數據源的連接
conn_ora.ConnectionString = "Provider=MSDAORA.1;Password=111;User ID=system ;Data Source=orcl;Persist Security Info=True"
conn_ora.Open
Dim myrs_ora As New ADODB.Recordset '用於連接ORACLE資料庫的記錄集
myrs_ora.ActiveConnection = conn_ora.ConnectionString
myrs_ora.Open ("Select * From AAA")
Ⅱ vb 6.0 如何連接access accdb 資料庫呢
首先要在工程的引用中選上Microsoft ActiveX Data Objects 2.5 Library
然後在事件中就可以定義相關的變數進行連接了
下面的例子可能對您有用：
Private Sub Command1_Click()
Dim Conn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Conn.Open connstring ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & 「資料庫的路徑和名字」 & ";Persist Security Info=True;Jet OLEDB:Database Password= & "資料庫密碼"
sql = "Select * From 「 & 」表名" & where ID=20"
Rs.Open sql, Conn, 1, 3
If NOT rs.eof then
m_date= rs("日期型欄位的名字")
m_data= rs("數值型欄位的名字")
end if
上面的例子實現了查詢
如果是要添加,刪除,更新等操作,只要編寫相應的SQL語句,再用
Conn.Execute SQL 就可以了,如:
添加的:
SQL="Insert Into [UserInfo](User,Password) Values('aaaa','1234')"
Conn.Execute SQL '執行後,就添加了一條記錄
刪除:
SQL="Delete From [UserInfo] Where User='aaaa'"
Conn.Execute SQL '刪除用戶名為aaaa的用戶記錄
更新:
SQL="Update [UserInfo] Set Password='abcdefg' Where User='aaaa'"
Conn.Execute SQL '執行後,修改用戶aaaa的密碼為abcdefg
以上只是示例,在實際使用過程中,可以將一些內容用控制項輸入等方式進行,這樣就有很大的靈活性了
Ⅲ vb6.0 連接資料庫共有那幾種方法
1． 定義連接對象
Global DBconnect As New ADODB.Connection
2． 執行連接語句
If DBconnect.State = adStateOpen And Not IsEmpty(adStateOpen) Then DBconnect.Close
l 連接ODBC
DBconnect.ConnectionString = "dsn=DataAliasName;uid=UserID;pwd=Passwd;"
l 直接連接Access為
Dbconnect.Provider = "Microsoft.jet.OLEDB.4.0" // Access 97為3.51
DBconnect.ConnectionString = "FilePathFileName.mdb"
l 連接Oracle
DBconnect.Provider = "MSADORA"
DBconnect.ConnectionString = "user/mypass@servicename
l 連接SQL Server
DBconnect.Provider = "SQLOLEDB.1"
DBconnect.ConnectionString = "DATABASE= ;SERVER= ;UID= ;PWD= ;"
或者可以使用 DBconnect.Open "SERVER" , "USERID" , "PASSWORD"
DBConnect.Open
3． 取查詢結果集
Global RS As New ADODB.Recordset
Global PS As New ADODB.Recordset
If RS.State = adStateOpen And Not IsEmpty(adStateOpen) Then RS.Close
RS.Open SQLStr, DBconnect, adOpenKeyset
4． 執行SQL語句
DBconn.Execute SQLStr
5． 關閉資料庫
DBconnect.Close
Ⅳ vb中怎樣連接資料庫
可以用ODBC數據源，添加一個SQL的。然後用VB裡面的ADO部件和datagrid部件連接。先在拖出的adodc部件右鍵設置屬性，連接資料庫。再將datagrid連接到adodc就可以看到數據了。
Ⅳ vb6.0怎麼連接網路上的SQLSERVER2005資料庫
10.169.56.22這個地址伺服器要開一些埠的，不開埠是無法連接的。另外，如果確保是公網IP，開了埠就可以連接，不是公網IP，一般無法連，配置還是比較麻煩的。不行就上花生殼域名代理，然後通過HTTP協議連接資料庫。
Ⅵ VB6.0使用什麼方法連接mysql資料庫比較好且不需要再每台客戶端機器上安裝程序
在VB中可以使用ADO數據控制項實現對MySQL資料庫的訪問，但ADO控制項不能直接訪問MySQL，需要安裝MyODBC(可以在網上下載)並在ODBC中注冊一個用戶DSN(控制面板/管理工具/數據源)，這樣就能使VB順利連接到MySQL資料庫了。
連接上了還需要執行SQL查詢操作並能取得查詢結果，可以使用ADODB的Command對象和RecordSet對像。
Ⅶ vb6.0如何連接MYSQL資料庫
最簡單的辦法是：在VB里添加一個ADO部件，將其放到窗體中，然後右鍵選擇屬性，在其屬性頁的下面有個生成連接字元串的項，點擊其後的按鈕，然後一步步的來做（很簡單的），然後連接字元串就會在那裡生成，只要拷貝這個字元串，就可以用ADODB來連接了。。。
Ⅷ VB6.0連接資料庫錯誤
cnnstu.Closecnnstu.Provider = "Microsoft.ACE.OLEDB.12.0" 改成
cnnstu.Closecnnstu.Provider = "Microsoft.Jet.OLEDB.4.0;"
參考實例代碼
Dim Cnnstu As New ADODB.Connection '連接到指定資料庫
Dim Rsstu As New ADODB.Recordset
Dim ConnStr As String, RstSql As String
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\空氣質量數據.mdb"
Cnnstu.Open ConnStr
RstSql = "select 地點," & Combo2.Text & ",質量等級 from " & Combo1.Text & " where 地點 = " & "'" & Combo3.Text & "'"
Rsstu.Open RstSql, Cnnstu, adOpenKeyset, adLockPessimistic
Ⅸ vb6.0中怎麼連接資料庫並調用數據
你先你的程序上添加Activex data object Library 控制項然後你可以連接資料庫， 連接資料庫的時候你要用connection ixiang
我給你寫連接資料庫的代碼
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;User Id=admin;Password=;
這個語句通過連接資料庫
C:\mydatabase.mdb
這個地址你自己換你資料庫文件保存的地址。
好好學習好好努力
Ⅹ VB6.0 如何連接SQL 資料庫
你在SQL SERVER中新建一個資料庫，然後將這個資料庫生成腳本文件，根據情況修改後轉存為MASTER下的一個存儲過程。至於資料庫名和數據文件路徑可以做成參數傳入，然後在VB中用連到MASTER後執行這個存儲過程。
用VB與建立的SQL資料庫連接
1.使用ODBC DSN連接字元串
DSN=mySystemDSN;Uid=myUsername;Pwd=myPassword
----------------------------------------------
2.使用無ODBC DSN的連接字元串
(1)標准安全性
Driver={SQL Server};Server=MyServerName;DataBase=myDatabaseName; _
Uid=myUsername;Pwd=myPassword
------------------------------------------------
(2)信任連接(分兩種）
1）連接字元串1
Driver={SQL Server};Server=MyServerName;DataBase=myDatabaseName;Uid=;Pwd=；
2）連接字元串2
Driver={SQL Server};Server=MyServerName;DataBase=myDatabaseName;Trusted_Connection=yes
---------------------------------------------------------------------------
(3)連接本地SQL SERVER
Driver={SQL Server};Server=(local);DataBase=myDatabaseName; _
Uid=myUsername;Pwd=myPassword
-------------------------------------------------------------
(4)連接遠程SQL SERVER
Driver={SQL Server};Server=xxx.xxx.xxx.xxx; _
Address=xxx.xxx.xxx.xxx,1433; _
Network=DBMMSOCN;DataBase=myDatabaseName; _
Uid=myUsername;Pwd=myPassword
-------------------------------------------------------
3.使用OLEDB PROVIDER FOR SQL SERVER的連接字元串
(1)標准安全性
Provider=SQLOLEDB.1; _
Password=myPassword; _
User ID=myUsername; _
Initial Catalog=myDatabaseName; _
Data Source=MyServerName
-------------------------------------------
(2)信任連接
Provider=SQLOLEDB.1; _
Initial Catalog=myDatabaseName; _
Data Source=MyServerName; _
Integrated Security=SSPI
--------------------------------------
(3)連接到命名實例
Provider=SQLOLEDB.1; _
Initial Catalog=myDatabaseName; _
Data Source=myServerName\myInstanceName; _
Password=myPassword; _
User ID=myUsername
--------------------------------------
(4)連接到本地SQL SERVER
Provider=SQLOLEDB.1; _
Password=myPassword; _
User ID=myUsername; _
Initial Catalog=myDatabaseName; _
Data Source=(local)
-----------------------------------------
（5）連接到遠程SQL SERVER
Provider=SQLOLEDB.1; _
Netwprk Library=DBMMSOCN; _
Data Source=xxx.xxx.xxx.xxx,1433; _
Password=myPassword; _
User ID=myUsername; _
Initial Catalog=myDatabaseName;