MySQL數(shù)據(jù)庫以它短小、方便、速度快、免費(fèi)等優(yōu)點(diǎn)成為很多網(wǎng)站目前的首選數(shù)據(jù)庫，但一般都是用
PHP+MySQL相結(jié)合來開發(fā)各種動(dòng)態(tài)頁面，其實(shí)ASP也可以。最新的配置是Windows 2000/2003+IIS+MySQL-
5.0.26-Win+PHP5，還需要下載一個(gè)myodbd3.0.
⑴安裝MySQL ODBD 的驅(qū)動(dòng)程序，將下載的myodbd文件復(fù)制到Windows\System 32目錄下，然后建立
一個(gè)新文件，擴(kuò)展名為reg（就是注冊(cè)表文件），將一下內(nèi)容復(fù)制到該文件中。
REGEDIT4
[HKEY_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\myodbc driver]
"UsageCount"=dword:00000002
"Driver"="C:\\WINDOWS\\System32\\myodbc.dll"
"Setup"="C:\\WINDOWS\\System32\\myodbc.dll"
"SQLLevel"="1"
"FileUsage"="0"
"DriverODBCVer"="02.50"
"Connectfunctions"="YYY"
"APILevel"="1"
"CpTimeout"="120"
[HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\OCBC Drivers]
"myodbc driver"="installed"
保存后雙擊該文件，將上面代碼注冊(cè)到Windows注冊(cè)表中。
如果成功，在控制面板/ODBC數(shù)據(jù)源中簡(jiǎn)歷一個(gè)系統(tǒng)DSN。也可以在ASP中使用MySQL，打開控制面板
/ODBC數(shù)據(jù)源，選擇系統(tǒng)DSN，然后添加一個(gè)新的DSN，驅(qū)動(dòng)程序選擇myodbd driver，會(huì)彈出一個(gè)對(duì)話框
供輸入MySQL相關(guān)信息。
Windows DSN Name：所要建立DSN的名稱。
MySQL Host（Name or IP）:MySQL服務(wù)器的名稱或者是IP地址，通常填localhost。
MySQL DataBase Name：需要使用數(shù)據(jù)庫的名稱，數(shù)據(jù)庫在MySQL管理程序中建立。這里我們使用一
個(gè)例子。
數(shù)據(jù)庫名：mydatabase里面有數(shù)據(jù)表users，users數(shù)據(jù)表有兩個(gè)字段，分別是Username和password
。
Username：連接數(shù)據(jù)庫的用戶名，默認(rèn)為root超級(jí)用戶。
password：鏈接數(shù)據(jù)庫用戶密碼，如果沒有，可以不填。
Port（if not 3306）：MySQL在服務(wù)器的端口，如果不填默認(rèn)為3306.
SQL Command on Connect：使用SQL命令連接數(shù)據(jù)庫，這項(xiàng)可以不填。
下面是連接數(shù)據(jù)庫的ASP代碼。
<%
'**************************************
'文件名: mysql.asp
'描 述:
' 文本存入
'**************************************
%>
<%
Connstr="dsn=mydsn;driver={myodbd
driver};server=localhost;uid=root;pwd=;database=mydatabase"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Connstr
strQuery = "SELECT * FROM users"
Set rs = Conn.Execute(strQuery)
If Not rs.eof Then
%>
<TABLE>
<TR>
<TD<b>用戶名</b></TD>
<TD><b>密碼</b></TD>
</TR>
<%
Do While Not rs.EOF
%>
<TR>
<TD><%=rs("username")%></TD>
<TD><%=rs("password")%></TD>
</TR>
<%
rs.MoveNext
Loop
%>
</TABLE>
<%
Else
Response.Write("沒有記錄")
End If
rs.Close
Conn.Close
Set Conn = Nothing
Set rs = Nothing
%>