哪位高手帮忙看下，这代码哪出错？我连接到的是空白网页，
本人使用的是SQL 2000 个人版
<!--#include File="adovbs.inc"-->
<HTML>
<HEAD>
<TITLE> 使用Connection对象连接到SQL Server数据库 </TITLE>
</HEAD>
<BODY>
<%
Dim conn,StrConn
Set coon=Server.CreatObject("ADODB.Connection")
strConn="Driver={SQL Server};Server=local;Database=asp;UID=sa;PWD="
conn.ConnectionString=strConn
conn.Open
Response.Write("<P>连接对象状态: ")
If conn.State=adStateOpen Then
Response.Write("打开</P>")
ElseIf conn.State=adStateClosed Then
Response.Write("关闭</p>"
End If
Response.Write("数据提供者" &conn.Provider&"<BR>")
Response.Write("ADO版本: "&conn.Version&"<BR>")
Response.Write("默认数据库: "&conn.DefaultDatabase&"<BR>")
conn.Close
Set conn=Nothing
%>
</BODY>
</HTML>