代码如下:
<%@ import namespace="system.data.oledb %>
<%@ import namespace="system.data" %>
<html>
<script language="vb" runat="server">
sub b1(obj as object,e as eventargs)
  dim str2 as string="select * from xsqkb where id>100000"
  dim str1 as string
  dim conn as oledbconnection
  dim cd as oledbcommand
  dim ad as oledbdataadapter
  dim ds as new dataset()
  str1="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("bo_store.mdb")
  conn=new oledbconnection()
  conn.connectionstring=str1
  conn.open()
  cd=new oledbcommand(str2,conn)
  ad=new oledbdataadapter(cd)
  ad.fill(ds,"xsqkb")
  la3.text="取得的记录数为: "+ds.tables("xsqkb").rows.count.tostring()
  end sub
  sub b2(obj as object,e as eventargs)
  dim str1 as string
  dim conn as oledbconnection
  dim cd as oledbcommand
  dim ad as oledbdataadapter
  dim ds as new dataset()
  str1="provider=microsoft.jet.oledb.4.0; data source=" & server.mappath("bo_store.mdb")
  conn=new oledbconnection()
  conn.connectionstring=str1
  conn.open()
  cd=new oledbcommand()
  cd.commandtext="xsqkb"
  cd.connmandtype=commandtype.tabledirect
  cd.connection=conn
  ad=new oledbdataadapter(cd)
  ad.fill(ds,"xsqkb")
  la3.text="取得的记录数为: "+ds.tables("xsqkb").rows.count.tostring()
  end sub
 </script>
 <asp:label id="la1" runat="server" text="SQL语名为: select * from xsqkb where id>100000" />
 <form id="form1" runat="server">
 <asp:button id="button1" runat="server" onclick="b1" text="执行sql语名" />
 <asp:button id="button2" runat="server" onclick="b2" text="直接打开数据表" />
  </form>
  <asp:label id="la3" runat="server" />
  </html>
错误如下:编译器错误信息: BC30002: 未定义类型“oledbconnection”。源错误: 行 6:    dim str2 as string="select * from xsqkb where id>100000"
行 7:    dim str1 as string
行 8:    dim conn as oledbconnection
行 9:    dim cd as oledbcommand
行 10:   dim ad as oledbdataadapter
 源文件: D:\cz_asp.net\kb\kb_test7-2.aspx    行: 8 显示详细的编译器输出:
C:\WINDOWS\system32> "c:\windows\microsoft.net\framework\v1.1.4322\vbc.exe" /t:library /utf8output /R:"c:\windows\assembly\gac\system.enterpriseservices\1.0.5000.0__b03f5f7f11d50a3a\system.enterpriseservices.dll" /R:"c:\windows\assembly\gac\system\1.0.5000.0__b77a5c561934e089\system.dll" /R:"c:\windows\assembly\gac\system.web\1.0.5000.0__b03f5f7f11d50a3a\system.web.dll" /R:"c:\windows\assembly\gac\system.web.services\1.0.5000.0__b03f5f7f11d50a3a\system.web.services.dll" /R:"c:\windows\assembly\gac\system.xml\1.0.5000.0__b77a5c561934e089\system.xml.dll" /R:"c:\windows\assembly\gac\system.web.mobile\1.0.5000.0__b03f5f7f11d50a3a\system.web.mobile.dll" /R:"c:\windows\assembly\gac\system.drawing\1.0.5000.0__b03f5f7f11d50a3a\system.drawing.dll" /R:"c:\windows\assembly\gac\system.data\1.0.5000.0__b77a5c561934e089\system.data.dll" /out:"C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\Temporary ASP.NET Files\root\5fd45d1a\82ad265a\2bcdikgn.dll" /debug-  "C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\Temporary ASP.NET Files\root\5fd45d1a\82ad265a\2bcdikgn.0.vb"
Microsoft (R) Visual Basic .NET 编译器版本 7.10.3052.4
用于 Microsoft (R) .NET Framework 版本 1.1.4322.573
版权所有 (C) Microsoft Corporation 1987-2000。保留所有权利。C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\Temporary ASP.NET Files\root\5fd45d1a\82ad265a\2bcdikgn.0.vb(14) : error BC30648: 字符串常数必须以双引号结束。Imports "system.data.oledb
        ~~~~~~~~~~~~~~~~~~
D:\cz_asp.net\kb\kb_test7-2.aspx(8) : error BC30002: 未定义类型“oledbconnection”。  dim conn as oledbconnection
              ~~~~~~~~~~~~~~~
D:\cz_asp.net\kb\kb_test7-2.aspx(9) : error BC30002: 未定义类型“oledbcommand”。  dim cd as oledbcommand
            ~~~~~~~~~~~~
D:\cz_asp.net\kb\kb_test7-2.aspx(10) : error BC30002: 未定义类型“oledbdataadapter”。  dim ad as oledbdataadapter
            ~~~~~~~~~~~~~~~~
D:\cz_asp.net\kb\kb_test7-2.aspx(13) : error BC30002: 未定义类型“oledbconnection”。  conn=new oledbconnection()
           ~~~~~~~~~~~~~~~  
D:\cz_asp.net\kb\kb_test7-2.aspx(16) : error BC30002: 未定义类型“oledbcommand”。  cd=new oledbcommand(str2,conn)
         ~~~~~~~~~~~~           
D:\cz_asp.net\kb\kb_test7-2.aspx(17) : error BC30002: 未定义类型“oledbdataadapter”。  ad=new oledbdataadapter(cd)
         ~~~~~~~~~~~~~~~~    
D:\cz_asp.net\kb\kb_test7-2.aspx(23) : error BC30002: 未定义类型“oledbconnection”。  dim conn as oledbconnection
              ~~~~~~~~~~~~~~~
D:\cz_asp.net\kb\kb_test7-2.aspx(24) : error BC30002: 未定义类型“oledbcommand”。  dim cd as oledbcommand
            ~~~~~~~~~~~~
D:\cz_asp.net\kb\kb_test7-2.aspx(25) : error BC30002: 未定义类型“oledbdataadapter”。  dim ad as oledbdataadapter
            ~~~~~~~~~~~~~~~~
D:\cz_asp.net\kb\kb_test7-2.aspx(28) : error BC30002: 未定义类型“oledbconnection”。  conn=new oledbconnection()
           ~~~~~~~~~~~~~~~  
D:\cz_asp.net\kb\kb_test7-2.aspx(31) : error BC30002: 未定义类型“oledbcommand”。  cd=new oledbcommand()
         ~~~~~~~~~~~~  
D:\cz_asp.net\kb\kb_test7-2.aspx(35) : error BC30002: 未定义类型“oledbdataadapter”。  ad=new oledbdataadapter(cd)
         ~~~~~~~~~~~~~~~~     
是哪里错了,,,急啊~~!!!