Resultados 1 al 2 de 2

Tema: No puedo terminar mi chat en VB 6

  1. #1 No puedo terminar mi chat en VB 6 
    Iniciado
    Fecha de ingreso
    Oct 2002
    Ubicación
    Merlo
    Mensajes
    7
    Descargas
    0
    Uploads
    0
    esta segunda parte es para los que me pidieron un poco mas de precision:
    la primera parte del chat( osea, la de ingresar) es:

    Dim nk As String ' declaraciones generales

    Private Sub Aceptar_Click() ' se ingresa un nick y se oprime este boton para iniciar el chat
    If text1.Text = "" Then
    MsgBox ("debe ingresar un nombre")
    text1.SetFocus
    Else
    stnick = Trim(text1.Text)
    nk = FreeFile
    Open "C:\Hola.txt" For Output As nk
    Print #nk, stnick
    Close nk
    Shell "parte II del chat.exe" ' llama la ventana de chat parte II (el chat)
    Unload forminicial
    End If
    End Sub


    Private Sub Text1_keypress(keyascii As Integer) 'textbox en el que se introduce el nick
    If keyascii = 13 Then
    Command1.Value = True
    End If
    End Sub


    ... y la segunda parte del chat(la del problema) es la siguientees otro proyecto aparte)

    Private Sub algo(que va?)()
    Dim nk As Integer
    nk = FreeFile
    Open "C:\hola.txt" For Input As nk
    Line Input #nk, stnick
    Close nk
    listnick.AddItem stnick
    nk = FreeFile
    Open "C:\hola1.txt" For Input As nk
    Line Input #nk, stnick
    Close nk
    listnick.AddItem stnick

    End Sub

    este codigo hace que me lea solamente el primer nombre de la lista ¿cómo hago para
    leer los otros? ¿cómo hago para que se borren de la lista los nicks si es usuario sale?
    desde ya muchas gracias por su apoyo.

    Desolator
    Citar  
     

  2. #2  
    Avanzado
    Fecha de ingreso
    Dec 2001
    Ubicación
    BCN
    Mensajes
    469
    Descargas
    0
    Uploads
    0
    Por partes:

    -Al escribir la linea en el archivo hola.txt usa saltos de linea (vbcrlf)

    -Al abrir el archivo para leer usa un bucle que pare al encontrar EOF en el archivo,asi tendras la lista entera.

    -Si quieres que el programa se entere de que alguien se va debes:
    1-Actualizar el archivo
    2-Leerlo constantemente.
    Es algo coñazo y tu sistema se resentira. Seria mejor que encontrases un sistema para darte cuenta de modificaciones; que tal un timer que comprueve si el tamaño del archivo a cambiado???

    -Por cierto, ¿ por que usas 2 programas? ¿no seria mejor uno con dos formularios?

    Ya me diras como te van las ideas.

    La resitencia es futil, todos sereis asimilados.
    NeoGenessis
    Citar  
     

Temas similares

  1. La televisión podría terminar dentro de 5 años
    Por El_ colega en el foro TELEVISION
    Respuestas: 1
    Último mensaje: 06-02-2007, 23:07
  2. Porque no puedo entrar al terra chat.
    Por guy en el foro GENERAL
    Respuestas: 0
    Último mensaje: 30-08-2006, 06:20
  3. Respuestas: 1
    Último mensaje: 13-05-2003, 11:54
  4. no puedo terminar mi chat en visual 6
    Por desolator en el foro PROGRAMACION DESKTOP
    Respuestas: 1
    Último mensaje: 25-10-2002, 18:26
  5. chat
    Por fumon en el foro HACK HiSPANO
    Respuestas: 0
    Último mensaje: 21-09-2002, 01:08

Marcadores

Marcadores

Permisos de publicación

  • No puedes crear nuevos temas
  • No puedes responder temas
  • No puedes subir archivos adjuntos
  • No puedes editar tus mensajes
  •