|
Mostrar Mensajes
|
Páginas: 1 2 3 4 [5] 6
|
44
|
Programación / Programación Visual Basic / Pregunta tonta y facil plz
|
en: 27 Julio 2006, 11:50 am
|
Texngo 2 cajas te texto : text1 con scrollbars vertical y con Multiline=True
luego tengo un text2 que es donde quiero ingresar el texto
pero lo que quiero hacer es que cada ves que ingrese un texto haga un salto de linea osea cada ves que agrego abajo y la otra linea abajo de la otra y haci sucesivamente una linea bajo otra a medida que voy agregando bueno agradeceria su ayuda.
|
|
|
46
|
Programación / Programación Visual Basic / Re: Winsock Ayuda plz!
|
en: 27 Julio 2006, 04:13 am
|
#esto es todo mi codigo del cliente
Private Sub Command1_Click() On Error Resume Next Winsock1.RemoteHost = Text3.Text Winsock1.Connect End Sub Private Sub Command2_Click() Dim enviar As String enviar = Text2.Text Winsock1.SendData enviar Text1.Text = "" Text2.Text = "" End Sub Private Sub Command3_Click() Winsock1.Close End
End Sub
Private Sub Label4_Click()
End Sub
Private Sub Timer1_Timer() If Winsock1.State = winsock1Closed Then Label4.Caption = "-Desconectado-"
End If If Winsock1.State = winsock1Connected Then Label4.Caption = "-Conectado-" End If End If If Winsock1.State = winsock1Connecting Then Label4.Caption = "-Conectando-" End If
End Sub
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) Dim datos As String Text1.Text = "" Winsock1.GetData datos Text1.Text = Text1.Text + datos End Sub
#pero la parte del Timer me pasa lo que te dije(#el problema es que siempre queda en conectando.)no cambia a conectado ni a desconectado Bueno agradeceria la ayuda
|
|
|
47
|
Programación / Programación Visual Basic / Re: Winsock Ayuda plz!
|
en: 27 Julio 2006, 02:15 am
|
.....::::G.T.S::::..... sabes que tengo este codigo que puse en timer le di el intervalo de valor 1 y dentro del timer del cliente puse esto: a y el label que me muestra el resultado es el 4
#codigo Private Sub Timer1_Timer() If Winsock1.State = winsock1Closed Then Label4.Caption = "-Desconectado-" End If
If Winsock1.State = winsock1Connected Then Label4.Caption = "-Conectado-"
End If If Winsock1.State = winsock1Connecting Then Label4.Caption = "-Conectando-" End If
End Sub
#el problema es que siempre queda en conectando.
ayuda plz
|
|
|
48
|
Programación / Programación Visual Basic / Re: Winsock Ayuda plz!
|
en: 27 Julio 2006, 01:52 am
|
hahahaha otra pregunta.
Y existe alguna forma para tener que agregar la MSWINSCK.OCX
porque cuando lo paso a otro pc el server tengo que andar con la MSWINSCK.OCX pa toos laos bueno si alguien me dice como hacerlo se lo agradeceria adios.
|
|
|
50
|
Programación / Programación Visual Basic / Re: Winsock Ayuda plz!
|
en: 27 Julio 2006, 00:59 am
|
Gracias por tu ayuda _Sergi_ . Bueno otra preguntita aprovechando que andan de buenas al presionar en conectar esta todo bien pero si vuelvo a presionar el programa se cae hay alguna forma para que no se cuelgue,lo mismo pasa al escuchar.Bueno adios amigos
|
|
|
|
|
|
|