Ayuda consulta en access

19/02/2006 - 15:28 por Adninra | Informe spam
Ante nada muchas gracias a tod@s que con gran paciencia resuelven nuestras
dudas.
Ahora mismo yo me veo en uun pequeño problema que para alguno seguro que es
facil de resolver asi que ahio va la consulta tengo el siguiente codigo en
vb.net con bd access
strConexion = "Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=C:\Documents and
Settings\Arminda\Escritorio\cuymo2000\cuymo2000\cuymo2000.mdb"

Try
'Abrimos la conexión
cn = New OleDbConnection(strConexion)
cn.Open()
Catch ex As Exception
MessageBox.Show("Error al abrir la conexión:" & vbCrLf &
ex.Message)
Exit Sub
End Try


ds = New Data.DataSet()
Ssql = "SELECT a.nombre,b.stock FROM productos a left JOIN almacen b
ON a.cod_prod=b.cod_prod"

da = New OleDbDataAdapter(Ssql, cn)

Dim cmdBuilder As New OleDbCommandBuilder(da)
da.MissingSchemaAction = MissingSchemaAction.AddWithKey '(Añadir con
clave)

'Cargamos el DataSet
Try
da.Fill(ds, "almacen")
Catch ex As Exception
MessageBox.Show("Error al cargar el DataSet:" & vbCrLf &
ex.Message)
End Try
listado.DataSource = ds.Tables("almacen")

mi problema es que no me ejecuta la consulta y no se si es a lahora de poner
el nombre al carga dataadapter o es a la hora dela consulta alguien sabe que
puede ser??.
Muchas gracias tod@s

Preguntas similare

Leer las respuestas

#1 A.Poblacion
19/02/2006 - 15:41 | Informe spam
"Adninra" wrote in message
news:
Ahora mismo yo me veo en uun pequeño problema que para alguno seguro que
es
facil de resolver asi que ahio va la consulta tengo el siguiente codigo
en
vb.net con bd access
strConexion = "Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=C:\Documents and
Settings\Arminda\Escritorio\cuymo2000\cuymo2000\cuymo2000.mdb"

Try
'Abrimos la conexión
cn = New OleDbConnection(strConexion)
cn.Open()
Catch ex As Exception
MessageBox.Show("Error al abrir la conexión:" & vbCrLf &
ex.Message)
Exit Sub
End Try


ds = New Data.DataSet()
Ssql = "SELECT a.nombre,b.stock FROM productos a left JOIN almacen
b
ON a.cod_prod=b.cod_prod"

da = New OleDbDataAdapter(Ssql, cn)

Dim cmdBuilder As New OleDbCommandBuilder(da)
da.MissingSchemaAction = MissingSchemaAction.AddWithKey '(Añadir
con
clave)

'Cargamos el DataSet
Try
da.Fill(ds, "almacen")
Catch ex As Exception
MessageBox.Show("Error al cargar el DataSet:" & vbCrLf &
ex.Message)
End Try
listado.DataSource = ds.Tables("almacen")

mi problema es que no me ejecuta la consulta y no se si es a lahora de
poner
el nombre al carga dataadapter o es a la hora dela consulta alguien sabe
que
puede ser??.




Pues el código tiene buen aspecto. En principio, debería funcionar.
¿Qué síntomas te da cuando dices que "no ejecuta" la consulta? ¿Da algún
error? ¿Pasa la instrucción sin errores pero no trae ningún dato?

Otra cosa: ¿Es un programa Windows? Lo digo porque si en lugar de ser un
Winform es ASP.NET, entonces el problema que vas a tener es de permisos:
Estás usando un .mdb que está bajo tu "Documents and settings", que es un
directorio que no tiene permisos de acceso para el usuario ASPNET que es el
que realmente ejecuta el código.
Respuesta Responder a este mensaje
#2 Adninra
19/02/2006 - 16:53 | Informe spam
Muchas gracias ya encontre el error y lo admito publicamente que pedazo de
rror el tenido lo que tenia mal era el nombre del campo jajaja son cosas que
pasa. Ahora tengo otra duda sabes que el el grid sepoenen como titulodela
columna el nombre del campo esto lo puedo cambiar, bien sea poniendo un alias
o cambiando el nombre de la columna , pero sin cambiar la forma de cargarlo.
Muchas graciaspor todo
Respuesta Responder a este mensaje
#3 A.Poblacion
19/02/2006 - 17:43 | Informe spam
"Adninra" wrote in message
news:
Muchas gracias ya encontre el error y lo admito publicamente que pedazo de
rror el tenido lo que tenia mal era el nombre del campo jajaja son cosas
que
pasa. Ahora tengo otra duda sabes que el el grid sepoenen como titulodela
columna el nombre del campo esto lo puedo cambiar, bien sea poniendo un
alias
o cambiando el nombre de la columna , pero sin cambiar la forma de
cargarlo.



Una forma de cambiar los nombres (y otras características) de las
columnas es creando un TableStyle que contenga las definiciones de columnas
tal como las quieres, y luego añadiendo ese TableStyle a la colección de
TableStyles del DataGrid.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida