ADOConnection的问题,请教,给高分
panwy 2002-11-06 07:15:53 我写了下面这段代码:
<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="System.Data.ADO"%>
<script Language="VB" runat="server">
Sub Page_Load(src As Object,e As EventArgs)
Dim strConnString As string
strConnString = "Provider=SQLOLEDB;Data Source=(local);Initial Catalog=pubs;User ID=sa"
Dim objConn as ADOConnection
objConn = New ADOConnection
objConn.ConnectionString = strConnString
objConn.Open()
Dim strSQL As String = "select * from authors"
Dim ObjDSCommand As ADODataSetCommand
Dim objDataSet As DataSet = New DataSet
objDSCommand = New ADODataSetCommand(strSQL,objConn)
objCSCommand.FillDataSet(objDataSet,"Author Information")
objConn.Close()
objConn = Nothing
Authors.DataSource = objDataSet.Tables("Author Information").DefaultView
Authors.DataBind()
End sub
</script>
<html>
<body>
<asp:DataGrid id="Authors" runat="server" />
</body>
</html>
运行时 Dim objConn as ADOConnection 这句错,说 ADOConnection 没有定义,
请教高手,在线,给高分。