推薦：ASP實(shí)現(xiàn)access隨機(jī)顯示不重復(fù)記錄解決方案
以下為引用的內(nèi)容： <% '-------------------------數(shù)據(jù)庫(kù)連接----------------------- Set objConn = Server.CreateObject("ADODB.Connection"

　　怎樣在vc、delphi、vb等程序中使用mysql呢(mysql odbc驅(qū)動(dòng)程序的使用)？我們經(jīng)常會(huì)遇到這樣問(wèn)題，怎樣在非web程序或asp程序中使用mysql數(shù)據(jù)庫(kù)呢？對(duì)于這個(gè)問(wèn)題有兩個(gè)解決方案：

　　1、使用mysql提供的api函數(shù)庫(kù)。

　　很多有名的mysql客戶(hù)端工具就是這樣實(shí)現(xiàn)的，大名鼎鼎的winmysql工具就是這樣的。這在大部分的開(kāi)發(fā)工具中都可以實(shí)現(xiàn)。

　　比如vc,bcb,delphi,vb等，只要能調(diào)用第三方的api就能實(shí)現(xiàn)。但對(duì)程序員的要求很高，而且要熟悉一套mysql的api函數(shù)集，這不是對(duì)每個(gè)人都 很輕松的事。而且這種方法不能用于asp等程序，因?yàn)樗�不支持com對(duì)象。

　　2、第二種是使用myodbc驅(qū)動(dòng)程序。

　　你可以到www.mysql.com下載myodbc驅(qū)動(dòng)程序，然后照著下面的做就可以了 第一種選擇是下載完全安裝包，這種包很大，但對(duì)于我們來(lái)說(shuō)有用的只有myodbc.dll這個(gè)文件，卻要下載這么大的文件，不太合適。當(dāng)然，如果你 很菜的話(huà)，我建議你選擇這種方式，這樣容易些，但不符合cfans的作風(fēng)，是吧。

　　第二種是直接下載myodbc.dll文件，只有幾百k,但不太容易使用，本人經(jīng)過(guò)很久摸索才找到使用它的方法。

　　首先你將包解開(kāi)，將myodbc.dll 文件放到windowssystem 或 winntsystem32目錄下，這取決于你的系統(tǒng)是win9x還是winnt(win2k)，你應(yīng)該 知道吧。然后打開(kāi)一純文本編輯器，如editplus,notpad之類(lèi)，(取決于你的喜好)將下面一段話(huà)保存為一文件，擴(kuò)展名為.reg,知道了吧，這是注冊(cè)表文件，不要搞錯(cuò)呀(不包括下面的一長(zhǎng)串等號(hào)) 如果你用的是win2k請(qǐng)將第一行換成 Windows Registry Editor Version 5.00

==========================================================從下行開(kāi)始

Windows Registry Editor Version 4.00

[HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INImyodbc driver]
"UsageCount"=dword:00000002
"Driver"="C:\WINNT\System32\myodbc.dll"
"Setup"="C:\WINNT\System32\myodbc.dll"
"SQLLevel"="1"
"FileUsage"="0"
"DriverODBCVer"="02.50"
"ConnectFunctions"="YYY"
"APILevel"="1"
"CpTimeout"="120"
[HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INIODBC Drivers]
"myodbc driver"="installed"

=======================================結(jié)束于上一行

　　(bill.gates)就這樣吧.保存后，雙擊剛才的文件，應(yīng)該叫 xxx.reg 吧，然后選擇確定，ok，搞定了。然后你打開(kāi)odbc設(shè)置程序，建一新數(shù)據(jù)源，選擇myodbc驅(qū)動(dòng)程序,剩下的就看你自己了。

分享：通過(guò)查詢(xún)返回?cái)?shù)據(jù)庫(kù)對(duì)象的名稱(chēng)
使用下列 SQL 語(yǔ)句來(lái)獲取你想要的 查詢(xún)： SELECT MSysObjects.Name FROM MsysObjects WHERE (Left$([Name],1)<>"~") AND (MSysObjects.Type)=5 ORDER BY MSysObjects.Name;