Visual Basic.NET - Acces con VISUAL BASIC.NET

 
Vista:

Acces con VISUAL BASIC.NET

Publicado por DiegoMarg (3 intervenciones) el 09/08/2004 17:38:52
Tego que hacer varias consultas a una base de datos Access en un proyecto WEB con VB.NET. Hago la primera consulta y después me queda el DataReader abierto aun después de hacer un close y no me permite hacer una nueva consulta.
Si alguien sabe cómo hacer se lo voy a agradecer.
Saludos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Acces con VISUAL BASIC.NET

Publicado por Edgar (1501 intervenciones) el 09/08/2004 18:05:52
Hola

Muy extraño tu problema...

Intenta cerrar la conexión.. posiblemente te de un error, y en ese caso podrás ver que está sucediendo, ya que el error te dará una descripción de lo que está sucediendo.. y si no te da el error, pues la conexión deberá estar cerrada.

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Acces con VISUAL BASIC.NET

Publicado por DiegoMarg (3 intervenciones) el 09/08/2004 19:32:56
En el segundo ExecuteReader me da el error que necesito una conección abierta y habilitada.

Dim oConn As New OleDb.OleDbConnection()
Dim myCommand As New OleDb.OleDbCommand()
Dim oRsRead As OleDb.OleDbDataReader

oConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Datos\Peliculas.mdb")
oConn.Close()
oConn.Open()
myCommand.CommandText = "SELECT * FROM Rubros"
myCommand.Connection = oConn

oRsRead = myCommand.ExecuteReader()
While oRsRead.Read()
ddl_rubro.Items.Add(oRsRead.GetString(1).PadRight(50) & oRsRead.GetInt32(0).ToString.PadLeft(3))
End While

oRsRead.Close
myCommand.CommandText = "SELECT * FROM Generos"
myCommand.Connection = oConn

oRsRead = myCommand.ExecuteReader()
While oRsRead.Read()
ddl_rubro.Items.Add(oRsRead.GetString(1).PadRight(50) & oRsRead.GetInt32(0).ToString.PadLeft(3))
End While
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 153
Ha aumentado 1 puesto en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

RE:Acces con VISUAL BASIC.NET

Publicado por Yamil Bracho (631 intervenciones) el 09/08/2004 20:05:50
Al cerrar el reader cierra la conexion. Abrela nuevamente

oRsRead.Close
myCommand.CommandText = "SELECT * FROM Generos"
myCommand.Connection = oConn
oCOnn.Open()
oRsRead = myCommand.ExecuteReader()
While oRsRead.Read()
ddl_rubro.Items.Add(oRsRead.GetString(1).PadRight(50) & oRsRead.GetInt32(0).ToString.PadLeft(3))
End While
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar