• Jueves 2 de Mayo de 2024, 01:12

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 - maurix

Páginas: [1]
1
Visual Basic 6.0 e inferiores / Personalizar Tamaño De Papel
« en: Martes 12 de Octubre de 2004, 15:35 »
Hola!

Tengo que instalar mi programa hecho en vb6 en un win2k, pero este no posee la opcion de tamaño de hoja personalizado en las impresoras Citizen GSX190 y Epson LX300, como lo tienen windows 95/98. Hay alguna manera para que desde vb6 se le indique el papel a win2k??? se puede utilizar la propiedad printer.papersize = 256 Con el win2k y setear los tamaños del printer.height y printer.width?

Saludos!

2
VB .NET / Re: Formato De Fecha En Visual Fox Pro Odbc
« en: Miércoles 22 de Septiembre de 2004, 15:28 »
jeje, tambien lo habia probado... :D  no es problema del formato, en el sentido de como se ordena el dia/mes/año, porque incluisve lo habia probado con 09/09/09 (9 de septiembre del 2009) para no herrarle y da el mismo problema. El tema es los simbolos entre los que se encierran las fechas: no son ni #, ni ' (comillas simples).... asi que no se. Me pregunto porque no han estandarizado la simbologia en vez de que cada motor de bases utilice la suya!!!! :angry:

3
VB .NET / Re: Formato De Fecha En Visual Fox Pro Odbc
« en: Miércoles 22 de Septiembre de 2004, 01:05 »
Si, ya lo intente y el formato que me sale es dd/mm/yyyy, pero el problema no es ese sino como se escribe en la consulta sql. Por ejemplo en access y SQL server las fechas van entre ##, pero aca se devia anteponer ^ y no se que otra cosa mas. Tenia la sintaxis correcta en otro programa pero la elimine por error  :whistling:  y haora no la encuentro en internet... que dicho sea de paso, la otra vez la encontre de casualidad!! :huh:

4
VB .NET / Formato De Fecha En Visual Fox Pro Odbc
« en: Martes 21 de Septiembre de 2004, 23:47 »
Hola!

estoy utilizando el siguiente codigo para insertar un registro en un DBF, utilizando los drivers odbc de visual fox pro.

 myODBCCommand.CommandText = "insert into gva55 (cod_client, fecha_pedi, filler, nro_pedido, n_comp, t_comp) values ('1',#21/09/2004#,' '," & CuentaFactura & ",'1','1')"
                    myODBCCommand.ExecuteNonQuery()

Sin embargo me da un continuo error de sintaxis con el formato de la fecha. He probado todo tipo de combinaciones de formatos de fecha,  pero no funciona. Creo que una vez encontre que la fecha se escribia algo asi para el odbc de VFP: ^'21/09/2004', pero no me funciona tampoco.

alquien sabe cual es el formato correcto para grabar la fecha????
Gracias!

5
VB .NET / Recuperar El Indice De Una Fila Usando Metodo Find
« en: Viernes 27 de Agosto de 2004, 16:55 »
Utilizo el siguiente codigo, para recuperar una fila de un dataset, a travez de el campo clave:

        'busco los datos
        Dim MiRow As DataRow
        MiRow = objDataSet.Tables("clientes").Rows.Find(BuscaDato)
        MsgBox(MiRow.Item("razonsocial"))

Quisiera saber si es posible recuperar a que indice o posicion ocupa la fila encontrada, dentro del dataset. Para asignar dicho indice a la variable"Posicion" y utilizar el siguiente codigo para llenar las cajas de texto, para uqe el usuario las edite.

       TXTCodigo.Text = objDataSet.Tables("Clientes").Rows(Posicion).Item("codigo")
        TXTRazon.Text = objDataSet.Tables("Clientes").Rows(Posicion).Item("RazonSocial")
        TXTDomicilio.Text = objDataSet.Tables("Clientes").Rows(Posicion).Item("domicilio")

De esta manera, no se me romperia la relacion con los botones de navegacion que utilizo para moverme en el dataset y utilizan el siguiente codigo:

 Private Sub btnAtrás_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAtrás.Click
        'Va hacia atrás.
        If Posicion > 0 Then
            Posicion -= 1
            Llenacajas()
            LRegActual.Text = "Registro actual Nº: " & Posicion + 1
            'modo edicion
            BanderaABM = 2

        End If

    End Sub

    Private Sub Adelante_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Adelante.Click
        'Va hacia adelante.
        If Posicion < objDataSet.Tables("clientes").Rows.Count - 1 And objDataSet.Tables("clientes").Rows.Count <> 0 Then
            Posicion += 1
            Llenacajas()
            LRegActual.Text = "Registro actual Nº: " & Posicion + 1
            'modo edicion
            BanderaABM = 2

        End If

Estoy trabajando en una base de datos Access
Cualquier sugerencia es bienvenida!!! :smartass:

Páginas: [1]