• Miércoles 1 de Mayo de 2024, 04:52

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

Páginas: 1 [2]
26
Visual Basic 6.0 e inferiores / Datos De Recordset Ado
« en: Jueves 5 de Agosto de 2004, 20:48 »
Hola, estoy realizando un programa en Visual Basic 6, que por medio del objeto MSComm realiza una conexion remota a otra Pc. El fin del sistema es actualizar una base de datos remota en MS-Access, a partir de una base tambien en Access pero esta es Local. No es preciso enviar en archivo *.mdb, este no es el caso, sino solamente un bloque de informacion originado por medio de una consulta ( Recordset de ADO ). Ahora, me han comentado acerca de un "cursor desconectado",no mucho, y que la verdad no tenga ni idea de que es, la ayuda del MSDN, pues no tiene mucho al respecto, ESTOY INICIANDO EN LA PROGRAMACION en VB.

Sugerencias al respecto, con mucho gusto seran aceptadas, u otra forma de acerlo, talvez a partir de un archivo de texto, o uno de Excel, (talvez, si de esta forma es mejor, si consume menor tiempo), decirme donde encuentro ejemplos. SE LES AGRADECE DE ANTEMANO !!!

P.D. : el proceso de conexion por medio del MSComm, ya lo realicé, si alguien le interesa, enviarme un correo a scorpion25acv@galeon.com,
con el Asunto: Conexion MSComm, y tambien las sugerencias que me puedan facilitar.

También adicionalmente, si no es la molestia,les pido me digan, si conocen la forma de como enviar un ADOrecordset por este medio, añadiendo a lo anterior propuesto. ;)

Reitero: Inmensas Gracias de antemano!!

27
Hola Amigo,

Antes utilizaba mucho ese componente para agregar skins a mis programas, lo malo es que al compilarlos , no me funcionaba (no en todos los casos), o me aparecia un "mensajito " informandome que no estaba registrado, y ya habiamos adquirido la licencia.

Te quiero perdir si fueses tan amable  de pasarme, si fuese posible el codigo, o por lo menos, el Ocx  que vallas a crear si las anteriores sugerencias te han ayudado. mi direccion es :  

scorpion25acv@galeon.com
ASUNTO : OCX vbskinner
si fueses tan amable.

28
Visual Basic 6.0 e inferiores / Re: Ayuda Con Un Datagrid
« en: Miércoles 14 de Julio de 2004, 08:42 »
Hola, yo realize  algo semejante pero con un MSFlexGrid , [Microsoft MSFlexGrid 6.0 (SP3)], talvez te sirva:

Option Explicit
Public conexionBD As Connection
Public Query As ADODB.Recordset

' se debe crear la conexion utilizando la referencia ADO

Sub LlenarGrid()
Dim fila As Integer

    Set Query = New ADODB.Recordset

        vbSql = "Select * from Clientes"  'Tabla Clientes en BD's de MS Access
        Query.Open vbSql, conexionBD '

If Query.RecordCount <> 0 Then
     If Not Query.EOF Then

' se debe intentar agregar un campos mas a la consulta      
         
                    txtCodigo.Text = Query.Fields.Item(0)
                    txtNombre.Text = Query.Fields.Item(1)
                    txtDireccion.Text = Query.Fields.Item(2)                    
                    txtTelefono.Text = Query.Fields.Item(3)
                    txtApartado.Text = Query.Fields.Item(4)
                    txtRegistros.Text = Query.Fields.Item(5)
                End If
        fila = 1
        MSFlexGrid1.Rows = Query.RecordCount + 1
        Query.MoveFirst

            Do While Not Query.EOF

                Query.Fields.Item(5) = Query.AbsolutePosition  
' guardo el # de registro en un campo
                MSFlexGrid1.TextMatrix(fila, 0) = Query.Fields.Item(0)
                MSFlexGrid1.TextMatrix(fila, 1) = Query.Fields.Item(1)
                MSFlexGrid1.TextMatrix(fila, 2) = Query.Fields.Item(2)
                MSFlexGrid1.TextMatrix(fila, 3) = Query.Fields.Item(3)
                MSFlexGrid1.TextMatrix(fila, 4) = Query.Fields.Item(4)
                MSFlexGrid1.TextMatrix(fila, 5) = Query.Fields.Item(5)
                fila = fila + 1
                Query.MoveNext
            Loop
        Else
        MsgBox "No se encuentra ningún cliente dentro del sistema.", vbSystemModal + vbExclamation + vbOKOnly, "Buscando..."
        End If
End Sub

NOTA: si se elimina un campo se debe volver a cargar
cualquier duda me dices... hasta pronto

29
Visual Basic 6.0 e inferiores / Re: Conexion Remota - Conexion Telefonica (mscomm)
« en: Miércoles 14 de Julio de 2004, 07:39 »
Gracias Sujey_Sanchez, esta muy interesante el ejemplo y talves me pueda ser de utilidad(necesito analizarlo mas a fondo  :comp: , puesto que estoy empezando en Visual Basic).
Pero te cuento que mi aplicacion se enfoca mas a utilizar o crear la conexion sin el uso de internet, es mas bien como el proceso realizado en "enviar/recibir  un fax", como me dicen unos colegas, previo proceso de dial(marcado), como cite anteriormente (en lo de Simulador de Hyper Terminal). Te agradesco mucho que me trates de ayudar, y despues te hare unos cometarios a tu e-mail sobre el ejemplo.  Reitero muchas gracias!    ;)

30
Visual Basic 6.0 e inferiores / Conexion Remota - Conexion Telefonica (mscomm)
« en: Domingo 11 de Julio de 2004, 08:04 »
Hola, estoy realizando un programa en VB6.0 que intenta conectar 2 computadores via linea telefonica, utilizando el MSComm.(Simulador de HyperTerminal)
Ya he consultado bastente el tema en laayuda del MSDN,en otros foros (TodoExpertos.com) pero no han logrado ayurdame o brindarme una solucion.
Generé un tipo de terminal, donde se puede llamar desde una maquina (01) (a la maquina02, por ejemplo), pero en la otra maquina (02), no he logrado  y no se como dejarla en modo espera, para que establesca la conexion. Ya intente agregar un winsock(que si funciona en red-LAN), pero tampoco me sirve. Si alguien me puede ayudar , se lo agradecere enormemente.  :)

Páginas: 1 [2]