Como se hace esto con .NET 2005 Express Edition?

Hola ... en Realidad hay varias formas de hacer eso...
tomando en cuenta que hay varios controles definidos que
lo pueden hacer y tambien a la estructura de elementos de
ADO.NET (ya que ahora no hay Recordset.

Te recomiendo que que veas un poco la información del
DataGrid y de los elementos de ADO.NET. de todas formas
la liga que te pongo es del control datagrid (Te va
ayudar mucho).

http://es.gotdotnet.com/quickstart/...ebdataacce
ss.aspx

Ahora si no es lo que buscas... el equivalente de tu
codigo en ASP.NET empleando VB.NET es ...

Dim cadconex as String
= "server=local);Trusted_Connection=yes;database=basedatos
"
Dim consul as String = "Select * from usuarios"
Dim conex As System.Data.IDbConnection = New
System.Data.SqlClient.SqlConnection(cadconex)
Dim dbCommand As System.Data.IDbCommand = New
System.Data.SqlClient.SqlCommand
dbCommand.CommandText = consul
dbCommand.Connection = conex
conex.Open
Dim dataReader As System.Data.IDataReader =
dbCommand.ExecuteReader
System.Data.CommandBehavior.CloseConnection)

do while (dataReader.Read())
' codigo codigo codigo
loop

conex.close


Tal vez te parezca demasiado código, pero cuando integres
las demas conexiones verás que es mas sencillo, sobre
todo si usas los controles adecuados ... como el dataGrid.

.
Saludos
Luis Fernando Coronado Arjona

http://es.gotdotnet.com/quickstart/...ompat.aspx
http://www.microsoft.com/spanish/ms.../art53.asp

Si insistes en querer usar ADODB en lugar de ADO.Net...

http://www.c-sharpcorner.com/vbnet/...NetMCB.asp

Sashka
MS MVP Access

"Jordi Maycas" escribió en el mensaje
news:

Como hago lo siguiente con el .NET 2005 beta?

<%sql="select Id_cliente,Nombre from clientes"

set rs=Server.CreateObject("adodb.recordset")

rs.Open sql,"DSN=prueba"


do while not rs.EOF %>

<%=rs("Nombre")%>

<%rs.MoveNext

loop

rs.Close%>

Oye, vosotros dos soys muy buenos no, de donde habeis salido? ;)



Un saludo,

Xus

tengo claro lo de mostrar los datos en un datagrid, y ahora me surge otro
problema, como recupero los resultados de una select? quiero decir, si no
quiero mostrarlos, simplemente por ejemplo para verificar un user y pass


"Xus" escribió en el mensaje
news:1iveisvc0vvt1.kt6f7n5nw4ea$

Oye, vosotros dos soys muy buenos no, de donde habeis salido? ;)



Un saludo,

Xus

Buff.. pues aqui tienes un codigo pera a ver q busco :P

Fíjate en el IMPORTS SYSTEM.DATA.OLEDB

Con eso trabajamos con bases de datos OLÉ jojo, si quisieras trabajar con
SQL SERVER es otra opción que era SQLDB si no recuerdo mal (de echo el
vstudio te mostrará las opciones).

Suerte!

Imports System.Data.OleDb

Public Class noticies
Inherits System.Web.UI.Page
Protected WithEvents Panel1 As System.Web.UI.WebControls.Panel
Protected WithEvents titol As System.Web.UI.WebControls.Label
Protected WithEvents programesBot As
System.Web.UI.WebControls.ImageButton
Protected WithEvents ImageButton1 As
System.Web.UI.WebControls.ImageButton
Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid
Protected WithEvents Panel2 As System.Web.UI.WebControls.Panel

#Region " Código generado por el Diseñador de Web Forms "

'El Diseñador de Web Forms requiere esta llamada.
<System.Diagnostics.DebuggerStepThrough()> Private Sub
InitializeComponent()

End Sub

Private Sub Page_Init(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Init
'CODEGEN: el Diseñador de Web Forms requiere esta llamada de método
'No lo modifique con el editor de código.
InitializeComponent()
End Sub

#End Region

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load

' Comprovem que el usuari està autentificat correctament
Dim usuari As String

usuari = Session("usuari")

If usuari = "" Then Response.Redirect("admin.aspx")

' Mirem a veure si lo que vol fer es esborrar la notícia
Dim idNoticia As String

idNoticia = Request.QueryString("borrar")

If Not idNoticia = "" Then
borrarNoticia(idNoticia)
End If

If Not IsPostBack Then
cargarDataGrid()
End If

End Sub

Sub cargarDataGrid()
' Connectem el DataGrid
Dim conn As OleDbConnection
Dim adapter As OleDbDataAdapter
Dim data As DataSet
Dim cadena As String

cadena = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=" &
Server.MapPath("dades.mdb")

conn = New OleDbConnection(cadena)
adapter = New OleDbDataAdapter("SELECT idNoticia,titular FROM
noticia", conn)
data = New DataSet()

adapter.Fill(data)

DataGrid1.DataSource = data
DataGrid1.DataBind()
End Sub

Private Sub ImageButton1_Click(ByVal sender As System.Object, ByVal e
As System.Web.UI.ImageClickEventArgs) Handles ImageButton1.Click
Response.Redirect("noticies.aspx")
End Sub

Private Sub programesBot_Click(ByVal sender As System.Object, ByVal e
As System.Web.UI.ImageClickEventArgs) Handles programesBot.Click
Response.Redirect("programes.aspx")

End Sub

' Borra una notícia de la base de dades
Private Sub borrarNoticia(ByVal idNoticia)

Dim conn As OleDbConnection
Dim sql As OleDbCommand
Dim cadena As String

cadena = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=" &
Server.MapPath("dades.mdb")

conn = New OleDbConnection(cadena)
conn.Open()

sql = New OleDbCommand("DELETE * FROM noticia WHERE idNoticia=" &
idNoticia, conn)
sql.ExecuteNonQuery()

conn.Close()

Response.Redirect("noticies.aspx")

End Sub

Private Sub DataGrid1_PageIndexChanged(ByVal source As Object, ByVal e
As System.Web.UI.WebControls.DataGridPageChangedEventArgs) Handles
DataGrid1.PageIndexChanged
DataGrid1.CurrentPageIndex = e.NewPageIndex
cargarDataGrid()
End Sub
End Class




Un saludo,

Xus