关于adoconnection,请求指点

本人初学,编了个简单的数据联接示例,但出错:Compiler Error Message: BC30002: Type 'ADOConnection' is not defined.源程式如下:<%@ Page Language="vb" %>
<%@ Import Namespace = "System.Data" %>
<%@ Import Namespace = "System.Data.ADO" %>
<html>
  <head>
  <script language="vb" runat="server">
Sub Page_Load(ByVal Sender As Object, ByVal e As EventArgs)
On Error Resume Next 

Dim cn as ADOConnection     是出错提示行
cn = New ADOConnection("provider=Microsoft.Jet.OLEDB.4.0; Data Source=e:\mysite\repair.mdb;")
cn.Open()
If cn.State = 1 Then
lblReturnCode.Text = "The Connection State is: " & cn.State & " - Connection Succeeded"
Else
lblReturnCode.Text = "The Connection State is: " & cn.State & " - Connection Failed"
End If
End Sub
</script>
  </head>
  <body>
<asp:Label id="lblReturnCode" Runat=server />
  </body>
</html>