<%
dim conn,connStr
connStr= "driver={MySQL ODBC 5.2 ANSI Driver};server=127.0.0.1;uid=root;pwd=wang;database=world"
set conn = Server.CreateObject("ADODB.Connection")
conn.open connStr
sql = "select Name,Capital from country"
set rs = conn.execute(sql)
While Not rs.EOF
Response.Write rs.Fields("Name") & ", " & rs.Fields("Capital") & "<br>"
rs.MoveNext
Wend
rs.Close
Set rs = Nothing
rs.Close
Set rs = Nothing
%>
将编写好的ASP文件（mysql_test.asp）放到之前设置的IIS web 服务器的物理路径中（我的是“C:\\MyWebsite”）。之后打开浏览器，在地址栏输入“localhost/mysql_test.asp”后回车，就显示出world数据库中，country表中的Name和Capital字段下的值了。
如果觉得界面比较丑的话，可以增加一些修饰，比如指定网页的title为“ASP MySQL Test”，设置网页内容居中显示等，这些内容请参考html网页设计相关只是，在此不再赘述。加标题和居中后的效果如下图所示。
对应的代码为：
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>ASP MySQL Test</title>
</head>
<body style=" margin:0; padding:0; text-align:center;">
<%
dim conn,connStr
connStr= "driver={MySQL ODBC 5.2 ANSI Driver};server=127.0.0.1;uid=root;pwd=wang;database=world"
set conn = Server.CreateObject("ADODB.Connection")
conn.open connStr
sql = "select Name,Capital from country"
set rs = conn.execute(sql)
While Not rs.EOF
Response.Write rs.Fields("Name") & ", " & rs.Fields("Capital") & "<br>"
rs.MoveNext
Wend
rs.Close
Set rs = Nothing
rs.Close
Set rs = Nothing
%>
</body>
</html>
结语
