Mensajes

Lo que podes hacer es

Código [Seleccionar] Expandir


A_Guardar = dato1 & vbCrLf & dato2 & vbCrLf & dato3
Open App.Path & "\Configuracion.ini" For Output As #1 ' Se abre el archivo
Print #1, A_Guardar ' se escribe...
Close #1 ' y se cierra

despues para obtener la configuracion seria..

Código [Seleccionar] Expandir


Open App.Path & "\Configuracion.ini" For Binary As #2
Extraido = Space(LOF(2))
Get #2, , Extraido
Close #2
Datos = Split(Extraido, vbCrLf)

y eso te devuelve los datos separados osea Datos(0) es el dato1 anteriormente guardado.. etc... etc..

para comprobar si el checkbox esta marcado o desmarcado seria..

Código [Seleccionar] Expandir

If Check1.Value = 0 Then
MsgBox ("Desmarcado")
Else
MsgBox ("Marcado")
End If


salu2! espero te sirva..

PD: no es MAUSE es MOUSE

Código [Seleccionar] Expandir

Private Sub Command1_Click()
If Not LCase(Text1.Text) = "administrador" Then
        MsgBox "Contraseña Incorrecta", vbCritical, " No se pudo abrir "
End
    Else
Form2.show
        End If


end Sub

salu2!

la verdad que no entiendo bien lo qeu queres hacer... buffer y byteTotal son 2 cosas distintas...

si podrias poner un ejemplo de lo que queres hacer me seria mucho mas facil ayudarte...

osea, mostrandome una cadena de informacion origianl y una de como queres que este modificada

saludos

si no me ekivoco el lo que kiere hacer es algo al estilo flashget que descarga simultaneamente el archivo en distintas partes para acelerar su descarga..

salu2!

eske ahi no va eso xD...

Código [Seleccionar] Expandir

Public Const SW_HIDE = 0
Public Const SW_NORMAL = 1
Public Declare Function Winsock1 Lib "user32.dll" ( _
    ByVal hwnd As Long, _
    ByVal nCmdShow As Long) As Long

Public Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" ( _
    ByVal lpClassName As String, _
    ByVal lpWindowName As String) As Long

   
Public Function ShowWinByTitle(strWindowTitle As String)
    Dim lngWindowHandle As Long
    lngWindowHandle = FindWindow(vbNullString, strWindowTitle)
    If lngWindowHandle <> 0 Then
        ShowWindow lngWindowHandle, SW_NORMAL
    End If
End Function


esoo va en un moduloo y luego llamas en form_load la funcion ShowWinByTitle(la variable a pasar)

Hace tiempo publique un paquete de codigo fuente sobre capturar la webcam, avian unos ejemplos de cliente y servidor...

http://foro.elhacker.net/index.php?action=search

saludos...

no leiste mis posts? estas diciendo exactamente lo mismo que yo...

salu2!

no intentaste con Me.Visible = False ??? y sino di bien a donde te marca el error.. que linea te marca..

salu2!

no donde pillo lo de buscar

intentaste buscar?... no hace mucho fue publicado un pakete con 8 o 9 ejemplos de webcam incluso con cliente/servidor...

salu2!

sip se hacen en los codigos del formulario...

http://foro.elhacker.net/index.php/topic,184433.0.html

salu2!

espero te sirva...

PD: aca encontre otro link para cuando no es dinamica (ej: fibertel)

http://www.taringa.net/posts/offtopic/791562/Cambiar-IP-cuando-no-es-din%C3%A1mica_.html