Foros del Web » Programación para mayores de 30 ;) » Bases de Datos General »

Impresion ultimos registros de una tabla

Estas en el tema de Impresion ultimos registros de una tabla en el foro de Bases de Datos General en Foros del Web. Estoy intentando imprimir de una tabla, solamente los registros a partir del número que seleccione hasta el último, mediante el código siguiente, donde NumeroPieza es ...
  #1 (permalink)  
Antiguo 20/02/2011, 03:06
 
Fecha de Ingreso: febrero-2011
Mensajes: 1
Antigüedad: 13 años, 9 meses
Puntos: 0
Impresion ultimos registros de una tabla

Estoy intentando imprimir de una tabla, solamente los registros a partir del número que seleccione hasta el último, mediante el código siguiente, donde NumeroPieza es el número correlativo y que he seleccionado en un cuadro de texto ("DesdeNroPieza"), y "último", el que corresponde siempre al final del fichero.
Private Sub DesdeNPieza_Click()
Dim strWhere As String
Dim ultimo As String
Me.Visible = False
ultimo = DMax("[NumeroPieza]", "Piezas") 'Campo numérico de la tabla PIEZAS
strWhere = "[DesdeNroPieza]>=" And "[ultimo]<="
DoCmd.OpenReport ReportName:="ActualizTema", View:=acPreview, WhereCondition:=strWhere
DoCmd.SelectObject acReport, "ActualizTema"
DoCmd.Close acForm, Me.Name
End Sub.
Me da el error "No coinciden los tipos".
Muchas gracias
  #2 (permalink)  
Antiguo 22/02/2011, 05:12
Colaborador
 
Fecha de Ingreso: marzo-2008
Ubicación: Sabadell
Mensajes: 4.897
Antigüedad: 16 años, 8 meses
Puntos: 574
Respuesta: Impresion ultimos registros de una tabla

strWhere = "[DesdeNroPieza]>=" And "[ultimo]<="

Aqui falta algo no?

strWhere = "NumeroPieza>=[DesdeNroPieza]" And "NumeroPieza<=[ultimo]"

Mirandolo bien incluso sobran lineas

strWhere = "NumeroPieza>=[DesdeNroPieza]"

Si el campo es correlativo por que restringes a ser menor o igual al numero mas alto? Con que sea mayor o igual al que deseas, ya lo tienes no?


Private Sub DesdeNPieza_Click()
Dim strWhere As String

Me.Visible = False

strWhere = "NumeroPieza>=[DesdeNroPieza]"
DoCmd.OpenReport ReportName:="ActualizTema", View:=acPreview, WhereCondition:=strWhere
DoCmd.SelectObject acReport, "ActualizTema"
DoCmd.Close acForm, Me.Name
End Sub

No veo donde cargas el valor de [DesdeNroPieza]

No seria

strWhere = "NumeroPieza>=" & Me.[DesdeNroPieza]

si el nombre del objeto es ese.

Revisa en el manual como se define la WhereCondition
__________________
Quim
--------------------------------------------------
Ayudar a ayudar es una buena práctica!!! Y da buenos resultados.

Etiquetas: impresion, parcial, registros, ultimo
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 05:58.