Retroceder   Foros del Web > Programación para sitios web > .NET

Respuesta
 
Herramientas Desplegado
Antiguo 09-nov-2007, 13:28   #1 (permalink)
empilado ha deshabilitado el karma
 
Fecha de Ingreso: junio-2007
Mensajes: 53
Pregunta convertir recordset a datatable

Hola a todos... a ver si esto es posible .... tengo un componente que fue creado con VB 6 y ahora lo quiero usar en un proyecto web usando vb 2005 ... todo bien hasta que el componente empieza a hacer su trabajo al tratar de llenar un gridview. Lo que pasa es que este componente retorna un recordset, entonces creo que el gridview no acepta esto y por eso la aplicacion se queda colgada....me dijeron que vea la posibilidad de convertir el recordset a un datable.....busque en nuestro querido google pero como que no tuve mucho exito...alguien por ahi tendra alguna solucion o idea de como resolver esto ???

Gracias de antemano y saludos.
empilado está desconectado   Responder Citando
Antiguo 09-nov-2007, 20:25   #2 (permalink)
omar_cb11 está en el buen camino
 
Avatar de omar_cb11
 
Fecha de Ingreso: septiembre-2005
Mensajes: 177
Enviar un mensaje por MSN a omar_cb11 Enviar un mensaje por Yahoo  a omar_cb11
Re: convertir recordset a datatable

No se como hace lo demas tu aplicacion, pero yo para llenar un DataGridView uso lo siguiente:

Dim dt As DataTable
Dim da As OleDb.OleDbDataAdapter
Dim sConexion As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=BasedeDatos"
Dim Consulta As String = "SELECT * FROM Tabla"
da = New OleDb.OleDbDataAdapter(Consulta, sConexion)
dt = New DataTable
da.Fill(dt)
DataGridView1.DataSource = dt
__________________
A veces hay que darle un golpecito al Pc para que funcione.
omar_cb11 está desconectado   Responder Citando
Antiguo 14-nov-2007, 08:48   #3 (permalink)
empilado ha deshabilitado el karma
 
Fecha de Ingreso: junio-2007
Mensajes: 53
Re: convertir recordset a datatable

gracias por tu post pero ya resolvi el problema...no pude convertirlo directamente a un datatable pero si lo converti a un dataset y de ahi jalo la tabla que necesito... lo dejo por si alguien lo necesita:

Public Function RecordSet_2_DataSet(ByVal rs As ADODB.Recordset) As DataTable

Dim myDA As New OleDbDataAdapter()
Dim myDS As New DataSet("MyTable")
myDA.Fill(myDS, rs, "MyTable")
Return myDS.Tables(0)

End Function

Saludos!!
empilado está desconectado   Responder Citando
Respuesta

No hay votos aún.


Herramientas
Desplegado

Normas de Publicación
No puedes crear nuevos temas
No puedes responder temas
No puedes subir archivos adjuntos
No puedes editar tus mensajes

BB code is Activado
Caritas están Activado
[IMG] está Activado
Código HTML está Desactivado


La Zona horaria es GMT -6. Ahora son las 13:51.


Message Board Statistics

LinkBacks Enabled by vBSEO 3.1.0

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93