Consulta entre fechas acotadas

Tengo una búsqueda acotada por fechas, lo que quiero es acotar la búsqueda producto entre estas fechas
Dim rs1 As ADODB.Recorset
Dim Sum As Integer
Dim Sum2 As integer
           Set Rs1 = New Recorset
          Fec1 = Format (cdate(mkbFec1.text, "mm/dd/yy
         Fec2 = Format(cdate(mkdFec2.text, " mm/dd/yy
rs1..Open "SELECT Campos bd FROM tablas bd WHERE fecha between # " & Fec1 & "# and # " & Fec2 & "# order by fecha, cn
txtReg.text = rs1.RecordCount
filas = 2
Whit msgreporte
        do While not rs1. Eof
una vez hecha la busqueda entre fechas hacer la busqueda del producto o hacer todo de una sola vez, este producto me entrega un saldo de la venta en un text

2 Respuestas

Respuesta
1
No entiendo la pregunta, si es si es al manera de preguntar por dos fechas, la respuesta es que si esta bien la consulta. El resto no tengo idea, no conozco la estructiura de la base de datos ni de etablas de que hablas, así que ue no puedo ayudarte.
La estructura para preguntar por fechas esta bien no tengo problema, lo que quiero es buscar por fechas un producto determinado de una tabla compras, tener las fechas pero un text o acotar la consulta para que cuando se se acote por fechas muestre todos los producto de "Enero" pero un text o algo pra acotar el producto "cemento" entre estas fechas, no se si me explico bien
Gracias
Presumo que en la tabla compras de ela que hablas existe un campo que es el código o id del producto, entonces después del WHERE de las fechas colocas:
AND Codigoproducto = textbox1.text
En donde textbox1.text es un control textbox en donde capturas el código del producto.
Me da un error 2147217904 no se ha especificado valores para algunos parámetros requeridos
Dim rs1 As ADODB.Recorset
Dim Sum As Integer
Dim Sum2 As integer
Set Rs1 = New Recorset
Fec1 = Format (cdate(mkbFec1.text, "mm/dd/yy
Fec2 = Format(cdate(mkdFec2.text, " mm/dd/yy
rs1..Open "SELECT Campos bd FROM tablas bd WHERE fecha between # " & Fec1 & "# and # " & Fec2 & "# AND ccosto = textbox1.text order by fecha, cn
txtReg.text = rs1.RecordCount
filas = 2
Whit msgreporte
do While not rs1.eof
no me resulta, tengo una busqueda simple por like pero no las puedo convinar "BUCAR PRODUCTOS AUNQUE ESTEN REPETIDOS ENTRE FECHAS"
Gracias
Si colocas "textbox1.text" dentro de las comillas de toda la expresión SELECT el va a buscar un campo o función en SQL con ese nombre y eso NO EXISTE es un valor tienes que hacer igual que con las fechas.
Ok según el valor a declarar,
textbox1 = ""  o
No me resulta me puedes ayudar
rs1..Open "SELECT Campos bd FROM tablas bd WHERE fecha between # " & Fec1 & "# and # " & Fec2 & "# AND ccosto = " & textbox1.text & "  order by fecha", cn
Así debe quedar la linea para que no te de error. Si te da error por favor escribe el mensaje del error.
Error 424 en tiempo de ejecución
Se requiere un objeto
Hermano, textbox1.text es eñ control o la variable en dodne tu tienes la informacion.
Respuesta
1
Si estas en access activa el botno totales con esa misma consulta y te arroja solo un valor

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Tabla temporal, conseutivo y between y mostrar en vb6

Utilizo vb6 y sql server 2000 Bueno explico un poco el problema que tengo. Mira la consulta debe llevar 1 manzanas 01/02/2009 2 peras 03/02/2009 3 platanos 01/01/2009 4 guayabas 10/12/2008 * el numero es el consecutivo En mi primero tabla PRODUCTOS...
1 respuesta

Duda con sp en sql server 2000

Explico el problema estoy haciendo una consulta de de un sp en sql server 2000 Tabla: DATOS Nombre apellidop apellidom fecha maria alcazar tovar 23/01/2008 candelaria marti juarez 23/01/2008 francisca perez perez 23/02/2008 pedro salividar montes...
1 respuesta

Como poner determinado formato de fecha a un textbox

Tengo una tabla en excel 2010 e ingreso los datos a través de un formulario, lo que necesito hacer es que en los textbox donde ingreso fechas el formato sea 10-oct-14 y que este mismo formato se quede registrado en mi tabla de excel.
3 respuestas

Filtro desde un formulario

Trabajo con access 2003 y tengo un formulario con un rango de fechas que me devuelve un informe con un titulo "desde el día: xxxx" "hasta el día: xxx", lo que necesito ahora es adicionar el asesor a este informe y que en el formulario de rango pueda...
1 respuesta

Problema consulta entre fechas

Tengo una vas de datos con un campo fecha de tipo texto que se guardan con formato dd/mm/yyyy. Cuando hago la consulta me respecta el intervalo entre días (ej 15-30), pero de todos los meses y todos los años. No consigo solucionarlo... ¿Me podéis...
1 respuesta

Funciones con fechas en Access 2007

Necesito un favor con ACCESS 2007 tengo un campo "fecha límite de pago" tipo fecha/hora y necesito mostrar en un formulario un mensaje que diga: "la fecha límite de pago ya se venció" si el pago ya se venció; sino, no mostar ningún mensaje. Nota:...
1 respuesta

Fechas vb.net

Tengo un problema al quiere hacer una consulta a una base de datos Firebird Dim INICIO = CDate(Me.finicio.Text) Dim FIN = CDate(Me.ffin.Text) myConn.Open() Dim result As New DataSet Dim Actualiza As New FbDataAdapter("Select fecha, hora, from...
1 respuesta

Usar DLast en formulario

Y decir que mis conocimientos de ACCESS son muy básicos. Necesito comprobar un campo del último registro asociado a un cliente, todo ello desde un formulario y con el fin de "calcular" un control del mismo form. Me explico: - En el formulario, cuyos...
3 respuestas

Buscar registros entre rangos de fechas

Tengo un dw tipo tabular deseo buscar registros por rangos de fechas, en el formulario he dos controles (em_1 y em_2), en dw, he puesto la propiedad editmask (dd/mm/yyyy), deses que me apoyes en done debo programar y el código para buscar registros...
1 respuesta

Autogenerar código ayudame

La idea es autogenerar un código (100220110001) que es la fecha 10022011 más un correlativo de 4 dígitos (0001) Por ejemplo fecha 10/02/2011 Registro 1 (100220110001) Registro 2 (100220110002) ... Fecha 11/02/2011 Registro 1 (110220110001) Registro 2...
1 respuesta