<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="System.Data.ado"%>
改为
<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="System.Data.OleDb"%>
sub page_load(src as object,e as eventargs)
dim connectionstring,sqlstring as string
dim myconnection as OleDbConnection
dim mycommand as OleDbCommand
dim dr OleDbDataReader
...你看的书是bate1版的吧