简单问题求救！等答案

问题：怎么解决下面的问题？编译器错误信息: BC30002: 未定义类型“ADOConnection”。源错误:
行 11： <Script Language="VB" Runat="Server">
行 12： Sub Button1_Click(sender As Object, E As EventArgs)
行 13： Dim cnA As ADOConnection=New ADOConnection 
行 14： Dim cmA As ADOCommand=New ADOCommand
行 15： cnA.Provider="Microsoft.Jet.OLEDB.4.0"源文件: c:\inetpub\wwwroot\cr\ch05\a.aspx    行: 13 代码如下：<%@Import Namespace="System.Data" %>
<%@Import Namespace="System.Data.ADO" %>
<Html>
<Form id="F1" Runat="Server">
请输入SQL 陈述: <Input Type="Text" Id="Text1" Runat="Server" >
<Button ID="Button1" Runat="Server" OnServerClick="Button1_Click">
执行
</Button>
</form>
<Span ID="Sp1" Runat="Server"/>
<Script Language="VB" Runat="Server">
Sub Button1_Click(sender As Object, E As EventArgs)
Dim cnA As ADOConnection=New ADOConnection 
Dim cmA As ADOCommand=New ADOCommand
cnA.Provider="Microsoft.Jet.OLEDB.4.0"
cnA.DataSource="C:\Inetpub\wwwroot\cr\ch05\MyWeb.mdb"
cnA.UserID="Admin"
cnA.Open()
cmA.ActiveConnection=cnA
cmA.CommandType=CommandType.Text
cmA.CommandText=Text1.Value
cmA.Execute()
Sp1.InnerText="这个叙述影响了" & cmA.RecordsAffected & "笔资料"
End Sub
</SCRIPT>
</Html>