<%@Import Namespace="System.Data"%>
<%@Import Namespace="System.Data.OLEDb"%>
<Script Language="VB" Runat="Server">
Sub Page_Load(sender As Object, E As EventArgs)
Dim cnA as oledbConnection
cnA=New oledbConnection
cnA.ConnectionString= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("infodb.mdb")&";"

cnA.Open

Dim strSQL as String = "SELECT * FROM Info_User"

'创建对象ADODatasetCommand 和 Dataset
Dim objDSCommand as oledbCommand
Dim objDataset as Dataset = New Dataset
objDSCommand = New oledbCommand(strSQL, cnA)

objDSCommand.Fill(objDataset,"User_Information")

cnA.Close() '关闭数据链路
cnA = Nothing '清除对象

user1.DataSource = objDataset.Tables("User_Information").DefaultView
user1.DataBind()

End Sub
</SCRIPT>

我这里错误是出在objDSCommand.Fill(objDataset,"User_Information")

编译器错误信息: BC30456: “Fill”不是“System.Data.OleDb.OleDbCommand”的成员。
我试过用FillDataSet 也不行
555