Mensajes

El de Guardar solo debes monitorear cualquier cambio a el archivo ya guardado ( por defecto si no se a guardado algo en el HD entonces actuaria como Guardar como ), si hay un cambia solo guarda sin mostrar la ventanilla Guardar como, de lo contrario si no hay cambios (de un solo byte) entonces no hace anda.

En si guardar solo debes llamar directamente al proceso de escritura, verificando:

Aya cambios (Aunq ue solo sea un solo Byte).
Que este guardado en el HD

Dulces Lunas!¡.

En primera un progrrama tiene un protocolo, si no sabes como trabaja, entonces no sabras si lo que envias es correcto.

Te sabes dicho protocolo?
Si es asi cual es la estructura de esos datos?

Digo nadie de este foro es mago para saberse eso... es decir, pones una duda que para nosotros sin ningun tipo de dato es una cosa que la vdd no tiene sentido, ya que estas mandando y usando el winsock correctamente quiero pensar, y estas mandando tus datos correctamente, la duda real seria el protocolo o la estructura de los datos en general.

es decir yo realizo mi cliente y lo hago conectarse a un servidor que no le conozco nada pero se que trabaja con hex, pero no conozco la estructura de dicho he o su protocolo, entonces ese programa no sirviria de nada realmente.

En otras palabras el cliente no puede hacer mas que mandar información nunca en una predefinida, el msn, juegos mmorpg, descarga de archivos como imagenes videos musica etc, son bytes ya dependera de la estrctura y el protocolo manejado.

No se si me doy a entender.

Dulces Lunas!¡.

unos post mas abajito esta el metodo se lo postee a wsh o wsk a no recuerdo su nombre ya te lo pongo ok.

Edito:

Código (vb) [Seleccionar] Expandir


Public Enum EnuListOrder
    AcendetOrder = 0
    DecendentOrder = 1
End Enum

Public Sub Sorted(ByRef Item() As String, Optional Order As EnuListOrder = DecendentOrder)
    Dim Itm As String
    Dim J As Double
    Dim i As Double
    Dim mcount As Long
    mcount = UBound(Item)

    If Order = AcendetOrder Then
        For J = 0 To mcount
            For i = 0 To mcount
                If Item(i) > Item(i + 1) Then
                    Itm = Item(i + 1)
                    Item(i + 1) = Item(i)
                    Item(i) = Itm
                End If
            Next i
        Next J
    Else
        For J = 0 To mcount - 2
            For i = 0 To mcount - 2
                If Item(i) < Item(i + 1) Then
                    Itm = Item(i + 1)
                    Item(i + 1) = Item(i)
                    Item(i) = Itm
                End If
            Next i
        Next J
    End If
End Sub


Dulces Lunas!¡.

Usa un metodo de ordenamiento por ejemplo el de burbuja...

P.D.: todo esos if que se ven en ti imagen seguro pueden reducirse con   And

Código (vb) [Seleccionar] Expandir

Winsock1.SendData ("C1 87 37 BF")

eso es hex, que no lo sepas interpretar es otra cosa...

[CONTINUAR TU CODIGO EN LA SIGUIENTE LINEA]

no veo el error ..

Sabes, cuando tira error, el vb resalta de amarillo. no se que parte  muestra error. a lomejor es un problema de conexion??

Haber miren si usan

Código (vb) [Seleccionar] Expandir


& _


Es para CONTINUAR TU CODIGO EN LA SIGUIENTE LINEA mas no despues de la linea donde debiste haber continuado... si ese es el caso sería:

Código (vb) [Seleccionar] Expandir


msgbox "Solo paso a decirte: "   & _
    _
    _
    _
    _
    _
    "Hola"


Dulces Lunas!¡.

jaja grandioso..

che otra pregunta..

yo ante asia q haga clic en un link dps q valla al otro todo uno por uno..

pero como abo una variable q haga de los link q estan dentro del listbox??

o comose llama lo q tengo q buscar??

Se llama Tutorial BAsico de Visual BAsic 6 y Tutorial ListBox

Gracias cobein pero Ubound() no es lo que busco, lo que busco es algo similar a esto:

Código (vb) [Seleccionar] Expandir


Private Type tComplemento_Info_Only
   ObjComponente                       As Object
   Nombre                              As String          
   Version                             As String                
   Status                              As Object                
   StrPath                             As String                
   'ErrorLoad                           As Boolean
End Type
Private Type VarLenB           '   //  Esta es la que desearia eliminar pero para _
ello nesesito la equivalencia de la funcion LenB() para Array's
   VariableX(55)                      As tComplemento_Info_Only
End Type
Private OtraVariableX As VarLenB

Private Sub form_load()
   Debug.Print LenB(OtraVariableX)
End Sub


Es la unica forma que ayo ¬¬" pero no me agrada usar Estructuras para eso por ello busco otra alternativa

Buenas Alguien sabe como Obtener la longitud en bytes de un array (ya sea uni, bi, tridimencional, multi)

Algo asi como LenB() pero que sea para Array

gracias

y cual es la duda real?... por que segun entiendo no tienes nada.


SPAM doble post en C++ y VB6 http://foro.elhacker.net/programacion_cc/enviar_paquetes-t271451.0.html;msg1331703#msg1331703

Hola gente, estoy en un proyecto importante, en el cual necesito mandar un paquete tipo los del WPE Pro a una determinada ip que se muestre en un shoutbox .... Gracias por la ayuda