• Martes 11 de Marzo de 2025, 08:02

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - Jorge López

Páginas: 1 [2] 3 4 5
26
Visual Basic 6.0 e inferiores / Re: Consulta Entre Fechas Y Horas
« en: Jueves 8 de Enero de 2004, 19:28 »
Gracias amigo ...un millon

27
Visual Basic 6.0 e inferiores / Consulta Entre Fechas Y Horas
« en: Jueves 8 de Enero de 2004, 17:11 »
amigos quiero hacer ua consulta que devuelva los datos de mi tabla detalle que
esten entre la "fechadesde"  entre las horas 07:00:00 y 24:00:00  y "fechafinal" entre las horas 24:00:01 y 06:59:59

tengo este string sql pero me da error de sintaxis

Strqueryhora = "select * from detalle WHERE fecha_in = & fechadesde & and hora_in between '07:00:00' and  '24:00:00' and fecha_sal = & fechafinal & and hora_in between '24:00:01' and '06:59:59'"



si saben cual es el error o tienen otra forma de hacerlo por fa estaria muy agradecido..

un saludo inmenso.. :hola:

28
Visual Basic 6.0 e inferiores / Re: Resetar Autonumerico
« en: Lunes 5 de Enero de 2004, 22:46 »
mil gracias ..si es en acces.. :kicking:

29
Visual Basic 6.0 e inferiores / Resetar Autonumerico
« en: Lunes 5 de Enero de 2004, 20:41 »
solo a modo de curiosidad..



tengo una base de datos con la que he echo mis pruebas en mi aplicacion, esta tiene campos autonumericos en varias tablas, ¿Como hago para usar esta bd en mi aplicación que se instalara desde cero?, es decir si llevo esta que estoy usando, ya contiene registros autonumericos que siempre se estarán incrementando de forma continua y normal mi inquietud es ¿ Se puede resetear una base de datos?


Por fa cualquier comentario es bien recibido..

30
Visual Basic 6.0 e inferiores / Feliz Navidad Y Prospero Año Nuevo
« en: Miércoles 24 de Diciembre de 2003, 14:52 »
Hola a todos desde Caracas-Venezuela les deseo una Feliz Navidad y un Prospero año Nuevo, esperando que este año sea de dicha y prosperidad para todos..y bueno a seguir fajandose con Visual....



Saludos a todos los foros-parlantes..



   Jorge López
Caracas-Venezuela
       :kicking:

         
        :beer:

31
Visual Basic 6.0 e inferiores / Re: Crear Tabla Access
« en: Lunes 15 de Diciembre de 2003, 16:12 »
gracias amigo, un millon esto es lo que necesito...


Saludos...

32
Visual Basic 6.0 e inferiores / Crear Tabla Access
« en: Sábado 13 de Diciembre de 2003, 21:54 »
hola a todos, cómo hago para crear una tabla access por codigo?
necesito crearla en tiempo de ejecución.
les explico..
tengo mi base de nombre "datos" pero quiero crearle una tabla temporal que almacene los datos que se procesan en el día, una vez terminado el día eliminarla y crear otra para el día siguiente.

bueno eso es en terminos generales lo que me interesa saber por ahora.. ya que mi aplicación esta casi lista y bueno estoy dandole los ultimos toques..



saludos a todos... :comp:

33
Visual Basic 6.0 e inferiores / Consulta Entre Fechas Y Hora
« en: Sábado 13 de Diciembre de 2003, 20:18 »
necesito devolver lo registros de mi tabla detalle que se encuentren entre las 7:00am de ayer y las 7:am de hoy, pero solo se hacerlo entre dias pero no se como llamar estos registros ..
tengo esta formula en crystal que me llama los registros de hoy para que tengan una idea de como hacerlo...me urge tirar este reporte si me pueden echar una mano estaría agradecido...


mirepo.SelectionFormula = "{detalle.fecha_in} In Date(" & Format$(FECHAHOY, "yyyy,mm,dd") & ") To Date (" & Format$(FECHAHOY, "yyyy,mm,dd") & ")"

fecha_in es el campo fecha de mi tabla
y el otro campo es hora_in
entonces tengo que tirar un reporte con los datos que esten entre ayer a las 7:00am y hoy a las 7:am. :blink:

34
Visual Basic 6.0 e inferiores / Empaquetado
« en: Jueves 11 de Diciembre de 2003, 16:23 »
Hola buenos días, termine mi proyecto ahora mi pregunta es..:

¿Como hago para que en el instalador se empaquete la BD y yna carpeta que tengo de reportes?, es decir que al momento de la instalación no tenga que llevar manualmente estos archivos al directorio donde se instalo la aplicación...


si me explique por fa aclarenme esta solicitud...


Gracias a todos... :kicking:

35
Visual Basic 6.0 e inferiores / Re: Realizar Un Listado Comprendido Entre Dos Fechas
« en: Jueves 4 de Diciembre de 2003, 20:35 »
OKIS....

36
Visual Basic 6.0 e inferiores / Re: Realizar Un Listado Comprendido Entre Dos Fechas
« en: Miércoles 3 de Diciembre de 2003, 23:25 »
hola amigo acá tienes un ejemplo cómo debes hacer la consulta de  lo que quieres,
variable1= DTpicker1.Value
variable2 = DTpicker2.value
STRQUERY = "SELECT * FROM tabla WHERE tabla.campo BETWEEN #" & Format(variable1, "mm/dd/yyyy") & "# and #" & Format(variable2, "mm/dd/yyyy") & "#order by campo_de_ordenamiento"


1*- declaras dos variables fecha variable1..2
2*- le asignas el string de conexion indicando que te develva solo los registros de tu tabla que esten en tre las dos fechas utilizando el format.
3*- luego llenas tu flex o tu capo que donde quieres mostrar la info..

esto funciona perfecto en mi aplicación..
Saludos y espero que te sirva de mucho cualquier cosa,  por acá estare
bye

37
Visual Basic 6.0 e inferiores / Actualizar Reporte En Crystal
« en: Miércoles 3 de Diciembre de 2003, 16:34 »
Hola amigos, tengo una pequeña aplicación que realice en visual basic, hice los reportes en crytal report 7, el asunto es que llamo un reporte detallado(con todos los datos de la tabla y perfecto) llamo por período y perfecto, pero si llamo un reporte detallado nuevamente, este me devuelve los datos del reporte anterior, ahora cómo hago para decirle al crystal que me traiga solo esos datos, hay manera de liberar los datos que se mostrarón anteriormente,?

 :ayuda:
 de esta forma llamo todos los datos de la tabla detalle
Private Sub msmes_Click()
  LLAMO_DETALLE
    mirepo.Action = 0
    mirepo.SelectionFormula = ""
End Sub
*******************************************************
asi los del dia de hoy
Private Sub msdia_Click()
    LLAMO_DETALLE
        mirepo.SelectionFormula = "{detalle.fecha_in} In Date(" & Format$(FECHAHOY, "yyyy,mm,dd") & ") To Date (" & Format$(FECHAHOY, "yyyy,mm,dd") & ")"
        mirepo.Action = 0
End Sub

38
Visual Basic 6.0 e inferiores / Reporte urgente
« en: Jueves 20 de Noviembre de 2003, 21:56 »
Hola que tál señores, mi urgencia es realizar un reporte en crystal que filtre los datos según una fecha dada, pero la fecha quiero que la seleccione el usuario mediante un dtpicker, cómo hacer para que desde visual se le diga alcrystal que muestre solo los datos que cumplan con esa condición?



de verdad tengo urgencia y ni idea cómo hacerlo...

39
Visual Basic 6.0 e inferiores / Re: Error al llenar listview
« en: Miércoles 12 de Noviembre de 2003, 18:12 »
amigos ya lo resolvi....gracias....

40
Visual Basic 6.0 e inferiores / Re: Error al llenar listview
« en: Miércoles 12 de Noviembre de 2003, 18:04 »
amigos tengo este proc para llenar un listview con lo datos dela tabla clientes, pero al llamrlo se detiene en

tLi1.SubItems(1) = .Fields("ncliente") & ""

y devuelve el error "380 el valor de la propiedad no es valido"


alguien podría decirme por que?

Private Sub llena_lista_clie()
    Dim RT1 As Recordset
    Dim tLi1 As ListItem
    Set tRs1 = a.OpenRecordset("select * from clientes", dbOpenDynaset)
    ' Comprobar que hay datos en el recordset
    With tRs1
        ' Si no hay datos...
        If (.BOF And .EOF) Then
            MsgBox "No hay información de clientes registrados"
        Else
            ' Mostrar los datos hallados
            ListView.ListItems.Clear
            .MoveFirst
            Do While Not .EOF
                Set tLi1 = ListView.ListItems.Add()
                tLi1.SubItems(1) = .Fields("ncliente") & ""
                tLi1.SubItems(2) = .Fields("acliente") & ""
                tLi1.SubItems(3) = .Fields("idcliente") & ""
                .MoveNext
            Loop
        End If
    End With
End Sub

41
Visual Basic 6.0 e inferiores / Re: REPORTE SEGUN FECHA
« en: Martes 11 de Noviembre de 2003, 00:25 »
hola como hago para realizar unreporte en crystal report que solo me muestre los registros que seaan iguales a la ingresadaa en un text box de visual basic, es decir si quiero todos los registros de la fecha xx/xx/xxxx lque la ingreso en un texbox el reporte muestre solo los datos que en la tabla cumplan con este caso..


si tienen algun ejemplo es bienvenido..

gracias...

42
Visual Basic 6.0 e inferiores / Dta environment
« en: Lunes 3 de Noviembre de 2003, 01:35 »
Amigos, trato de agregar una data environment para mi proyecto con la intención de hacer reportes con el datareport pero me dice "error inesperado"

" error del sistema &H0004005(-2147467259).Unspecified error"
alguien sabe algo de esto?:question:

43
Visual Basic 6.0 e inferiores / Re: Imprimir recibos
« en: Miércoles 29 de Octubre de 2003, 23:57 »
cómo puedo hacer reportes o recibos tipo tickets?

44
Visual Basic 6.0 e inferiores / Asignar un valor a un cuadro de texto
« en: Martes 28 de Octubre de 2003, 16:38 »
mas facil es cuando selecciones ó hagas click en el cuadro combinado te aparezca el valor en el textbox?

verifica tu pregunta con cuadros combiados de abajo alli te coloque un codigo que te sirve para esto también,

adaptalo a tu caso..


saludos...

45
Visual Basic 6.0 e inferiores / Re: Bases de datos Access y VB
« en: Martes 28 de Octubre de 2003, 16:25 »
shaomis


creo que debes hacer una consulta en el evento click del combo, es decir, tiras un query con el nombre que seleccionas en el combo y alimentas los campos que tienes que mostrar con el recorset de tu consulta, queda algo asi como esto:


Dim strcombo As String
strcombo = tucombo.Text
Dim reg As Recordset
Set reg = a.OpenRecordset("Select * from tabla where nombre='" + strcombo + "'" )
    If reg.RecordCount > 0 Then
                reg.MoveFirst
                Do While Not reg.EOF
                    campo1= reg!campo_de_tu_tabla_1
          camp02=campo_de_tu_tabla_2
         .
         .
         .
                    reg.MoveNext
                Loop
    Else
       mg = MsgBox("Disculpe no hay información, vbInformation, "Información")

    End If



es algo así mas o menos....espero que te sirva y adaptalo a tu caso..



saludos...

46
Visual Basic 6.0 e inferiores / CONSULTA SQL
« en: Lunes 13 de Octubre de 2003, 17:27 »
gracias amigo, de verdad que tenia dos dias buscando el posible error, y tu explicación lo dice todo....


:beer::beer:

47
Visual Basic 6.0 e inferiores / Re: CONSULTA SQL
« en: Domingo 12 de Octubre de 2003, 23:19 »
esta consulta me devuelve error(No coinciden los tipos)

por favor echenme una mano con esto.

Dim nbrecibo As Long
    nbrecibo = Val(nrecibo.Text)
    strbusca = mnhab.Text
    Set buscar = a.OpenRecordset("select * from detalle where num_hab='" + strbusca + "' And id_op = '" + nbrecibo + "'")

lo que quiero hacer es buscar el registro que cumpla con esa condición y mostarlo
la tabla se llama "detalle" y los campos a consultar son num_hab de tipo texto y id_op de tipo autonumerico, la duda esta en como enviar una consulta al campo id_op que es autonumerico.


estare agradecido..

48
Visual Basic 6.0 e inferiores / Re: consulta sql a campo autonumerico
« en: Lunes 6 de Octubre de 2003, 21:33 »
Hola a todos...



quiero hacer una consulta a mi tabla "detalle" pero quiero que me muestre los datos de los registros que cumplan la condicion por ejempo:


tengo una tabla que tiene todos los registros de las pc alquiladas, y quiero ver el registro de la pc número 101 y su id es 59.
a ver si me explico mejor
tengo varios campos en mi tabla, entre ellos un autonumerico que lo uso para el número de recibo o tickects y otro el numero de la pc alquilada,quiero hacer una consulta de forma siguiente:


dim strbusca as string
dim nbrecibo as integer
Set buscar = a.OpenRecordset("select * from detalle where num_hab='" & strbusca & "' and id_op= '" + nbrecibo + "'")
donde strbusca= numero pc
nbrecibo= número del recibo del cliente(En la tabla es un campo autonumerico)
pero me devuelve un mensaje de error cuando la ejecuto diciendome que no coinciden los tipos.


será que no puedo hacer esta consulta sobre un campo autonumerico?

49
Visual Basic 6.0 e inferiores / Re: operciones entre fechas
« en: Lunes 6 de Octubre de 2003, 21:24 »
usala de esta forma

DateAdd("d", 1, Date)

así le sumas un dia a la fecha actual

por ejemplo si hoy es 06/10/2003
te devolvera 07/10/2003


saludos,...

50
Visual Basic 6.0 e inferiores / Re: error:No coinciden los tipo
« en: Miércoles 1 de Octubre de 2003, 21:15 »
Carlos ya habia probado de esa forma y me da el siguiente error:


Data type mismatch in criteria expression:gracias:

Páginas: 1 [2] 3 4 5