El codebehind significa que separas el código (vb o cs) de la presentación(pagina.aspx), me interpretaste mal. El ejemplo que muestras no es codebehind, es al estilo de las páginas asp.
Volviendo al tema anterior, si tomaste atención al mensaje que envié diciendo que: "los DataReader's (SQL u OleDb) son interfaces y estas no pueden ser creadas directamente a partir de
New"
Lo siguiente está mal
Cita:
Iniciado por univercity dim dr as OleDbDataReader = new OleDbDataReader()
debería ser:
Código:
dim dr as OleDbDataReader
Intenta con los siguientes códigos:
Código:
<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<html>
<head>
<script language="VB" runat="server">
Sub Page_Load(Sender As Object, E As EventArgs)
Dim strConexion As String
Dim DS As DataSet
Dim MyOledbDA As OleDbDataAdapter
strConexion = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("../bdwine/clientes.mdb")
MyOledbDA = New OleDbDataAdapter("select top 1 * from tabla1 ", strConexion)
MyOledbDA.Fill(DS,"tabla1")
MyDataGrid.DataSource = DS
MyDataGrid.DataBind()
End Sub
</script>
</head>
...
o
Código:
<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<html>
<head>
<script language="VB" runat="server">
Sub Page_Load(Sender As Object, E As EventArgs)
Dim strConexion As String
Dim MyConnection As OleDbConnection
Dim MyOledbCommand As OleDbCommand
strConexion = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("../bdwine/clientes.mdb")
MyConnection = New OleDbConnection(strConexion)
MyOledbCommand = New OleDbCommand("select top 1 * from tabla1 ", MyConnection)
MyConnection.Open()
dim dr as OleDbDataReader = MyOledbCommand.ExecuteReader(CommandBehavior.CloseConnection)
MyDataGrid.DataSource = dr
MyDataGrid.DataBind()
End Sub
</script>
</head>
...