数据库连接的问题

出错提示：
行 12：   strConnString="Provider=SQLOLEDB;Persist Security Info=True;Data Source=192.168.0.245;Initial Catalog=pubs;User ID=saa;Password=liang;"
行 13：   '创建对象ADOConnection
行 14：   Dim objConn as ADOConnection
行 15：   objConn = New ADOConnection
行 16： 
程序：<%@ Import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb"%><%
  '设置连接串...
  Dim strConnString as String
  strConnString="Provider=SQLOLEDB;Persist Security Info=True;Data Source=192.168.0.245;Initial Catalog=pubs;User ID=saa;Password=li;"
  '创建对象ADOConnection
  Dim objConn as ADOConnection
  objConn = New ADOConnection  '设置ADOCOnnection对象的连接串
  objConn.ConnectionString = strConnString  objConn.Open()  '打开数据链路  '创建SQL字符串
  Dim strSQL as String = "SELECT * FROM authors"  '创建对象ADODatasetCommand 和Dataset 
  Dim objDSCommand as ADODatasetCommand
  Dim objDataset as Dataset = New Dataset
  objDSCommand = New ADODatasetCommand(strSQL, objConn)  '填充数据到Dataset
  '并将数据集合命名为 "Author Information"
  objDSCommand.FillDataSet(objDataset, "Author Information")  objConn.Close()    '关闭数据链路
  objConn = Nothing  '清除对象
  Authors.DataSource = _
          objDataset.Tables("Author Information").DefaultView
  Authors.DataBind()%><HTML>
<BODY>
<asp:DataGrid id="Authors" runat="server"/>
</BODY>
</HTML>请问：错在哪里？谢谢啦

解决方案 »

  1.   

    编译错误 
    说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。 编译器错误信息: BC30002: 未定义类型“ADOConnection”。源错误:
    行  12：      strConnString="Provider=SQLOLEDB;Persist  Security  Info=True;Data  Source=192.168.0.245;Initial  Catalog=pubs;User  ID=saa;Password=liang;"  
    行  13：      '创建对象ADOConnection  
    行  14：      Dim  objConn  as  ADOConnection  
    行  15：      objConn  =  New  ADOConnection  
    行  16：    
      

  2.   

    修改后，程序如下：
    <%@ Import Namespace="System.Data" %>
    <%@ import Namespace="System.Data.OleDb"%><%
      '设置连接串...
      Dim strConnString as String
     
      strConnString="Provider=SQLOLEDB;Persist Security Info=True;Data Source=192.168.0.245;Initial Catalog=pubs;User ID=saa;Password=liang;"
      '创建对象ADOConnection
      Dim objConn as OleDbConnection
      objConn = New OleDbConnection  '设置ADOCOnnection对象的连接串
      objConn.ConnectionString = strConnString  objConn.Open()  '打开数据链路  '创建SQL字符串
      Dim strSQL as String = "SELECT * FROM authors"  '创建对象ADODatasetCommand 和Dataset 
      Dim objDSCommand as OleDbCommand
      Dim objDataset as Dataset = New Dataset
      objDSCommand = New OleDbCommand(strSQL, objConn)  '填充数据到Dataset
      '并将数据集合命名为 "Author Information"
      objDSCommand.Fill(objDataset,"Author Information")
      objConn.Close()    '关闭数据链路
      objConn = Nothing  '清除对象
      Authors.DataSource = _
              objDataset.Tables("Author Information").DefaultView
      Authors.DataBind()%><HTML>
    <BODY>
    <asp:DataGrid id="Authors" runat="server"/>
    </BODY>
    </HTML>
    错误提示：
    编译错误 
    说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。 编译器错误信息: BC30456: “Fill”不是“System.Data.OleDb.OleDbCommand”的成员。源错误: 行 27：   '填充数据到Dataset
    行 28：   '并将数据集合命名为 "Author Information"
    行 29：   objDSCommand.Fill(objDataset,"Author Information")
    行 30：   objConn.Close()    '关闭数据链路
    行 31：   objConn = Nothing  '清除对象
     
    请问错在哪里？谢谢
      

  3.   

    楼主，你的代码不太象asp.net的呀．
    还有你的数据库是sql还是access的呀？这一句明显是sql数据库的呀．
    strConnString="Provider=SQLOLEDB;Persist Security Info=True;Data Source=192.168.0.245;Initial Catalog=pubs;User ID=saa;Password=liang;"怎么要导入System.Data.OleDb呢？给你个例子，是连SQL Server的，你参考一下．<%@ Page Language="VB" AutoEventWireup="True" Debug="true"%>
    <%@ Import Namespace="System.Data" %>
    <%@ Import Namespace="System.Data.SQLClient" %>
    <script runat="server">
          Dim MyConnection as SQLConnection
          Dim MyCommand As SQLDataAdapter      Sub Page_Load(sender As Object, e As EventArgs) 
      MyConnection = New SqlConnection("server=localhost;Initial Catalog=pubs;uid=sa;pwd=")
              If Not IsPostBack Then 
                 BindGrid()
              End If
          End Sub      Sub BindGrid() 
          Dim MyCommand As SQLDataAdapter = new SQLDataAdapter("SELECT * FROM authors", MyConnection)
              Dim DS As DataSet = new DataSet()
              MyCommand.Fill(DS,"min") 
              MyDataGrid.DataSource = DS.Tables("min").DefaultView
              MyDataGrid.DataBind()
          End Sub
    </script>
    <form runat="server">
        <asp:DataGrid id="MyDataGrid" 
               runat="server"
       AutoGenerateColumns="true"
       Width="200">
             <HeaderStyle BackColor="Navy" 
                          ForeColor="White" 
                          Font-Bold="True" 
      HorizontalAlign="Center"/>
             <PagerStyle Mode="NextPrev"
                         HorizontalAlign="Right" 
     NextPageText="下一页"
                         PrevPageText="上一页"/>
          </asp:DataGrid>
    </form>
      

  4.   

    数据库连接字符串参考
    www.connectionstrings.com