SoloCodigo

CLR: .Net / Mono / Boo / Otros CLR => VB .NET => Mensaje iniciado por: diegomarg en Lunes 9 de Agosto de 2004, 16:06

Título: Generar Consulta De Una Base Access
Publicado por: diegomarg en Lunes 9 de Agosto de 2004, 16:06
Gente, recién me estoy metiendo con el VB.NET y ya empezaron los problemas :devil:
Quiero hacer un select  a una tabla, y después utilizando el mismo DataReader quiero hacer otro select y siempre me da un error.
Si alguien tiene el código desde la conección a la base, hacer un select, recorrer esa consulta y luego hacer otra select a otra tabla de la misma base, para poder recorrerlo, se lo agradecería muchísimo.
Desde ya muchas gracias a todos.
Título: Re: Generar Consulta De Una Base Access
Publicado por: liche en Jueves 26 de Agosto de 2004, 00:14
toncs de pronto te pueda servir


BDD = DBEngine.OpenDatabase("c:\archivo.mdb")
sql = "SELECT * FROM Tbl2"
TBL = BDD.OpenRecordset(sql)
sql2 = "SELECT * FROM Tbl1"
TBL = BDD.OpenRecordset(sql2)

aunq yo los utilizo con DAO...
Título: Re: Generar Consulta De Una Base Access
Publicado por: sergiotarrillo en Jueves 26 de Agosto de 2004, 00:54
Código: Text
  1. Imports System.Data.OleDb
  2.  .............
  3. Dim myCn as New OleDbConnection("miConexion")
  4.  
  5. 'consultas
  6. Dim myCmd01 as New OleDb("consulta1", myCn)
  7. Dim myCmd01 as New OleDb("consulta2", myCn)
  8.  
  9. 'abirnedo la conexion
  10. myCn.Open()
  11.  
  12. 'ejecuntando la primera consulta
  13. Dim DR as OleDbDataReader = myCmd01.ExecuteReader()
  14.  
  15. 'muestro los datos de la consulta 1
  16. ..............
  17. DR.Close()
  18.  
  19. DR = myCmd02.ExecuteReader()
  20. 'muestro los datos de la consulta 2
  21. ..............
  22. DR.Close()
  23. myCn.Close()
  24.  
  25. 'fin.............
  26.  
  27.  

Espero que te sirva el codigo que te envie, cualquier cosa pasas la voz....