Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - seba123neo

#1101
Hola, proba la api RasEnumConnections, pero creo que esta solo te lista las conexiones Dial-up que tengas, no las entrantes, bajate el api viewer ahi tenes ejemplos de las apis de RAS.

saludos.
#1102
hay varias formas en internet en 2 segundos encontras:

Código (vbnet) [Seleccionar]
DataGridView1.CurrentCell.Value

Código (vbnet) [Seleccionar]
Dim i As Integer
i = DataGridView1.CurrentRow.Index

txtName.Text = DataGridView1.Item(0, i).Value


saludos.

#1103
le pregunte de nuevo a mi viejo y me dijo:

que ese dia que comenzo estaba normal y le comenzo a "silbar" en los 2 oidos, se asusto y pidio permiso para salir del trabajo, se midio la presion arterial y la tenia normal. se acosto a dormir y cuando se levanto ya no escuchaba de un oido (en realidad escuchaba pero muy poco, ahi es donde le quedo el 30% de audicion), y desde ese dia le quedo el acufeno, pero dice que a veces se le va, pero vuelve, ya se acostumbro, hace años lo tiene, pero es como si no tuviera nada.

le haban dado una pastilla que era vasodilatador para que llege la sange al oido, porque ahi son venitas muy chicas capilares muy chicos, al final parece que es una isquemia, y se hizo un estudio llamado B.E.R.A.audiologico o bera audiologico para ver si tenia un tumor.

le dijeron que perdio audicion y cuando pregunto sobre el acufeno, los medicos dijeron con la cabeza no no...como diciendo que no tiene solucion.

a cualqueir persona le puede pasar, no hay una persona particular a las que le pasen.

saludos.
#1104
Programación Visual Basic / Re: SendMessage
19 Septiembre 2011, 02:37 AM
Cita de: calk9 en 18 Septiembre 2011, 18:02 PM
A un determinado handle claro que si. Pero a alguna determinada cadena o algo parecido?

no entiendo, la cadena no existe o sea no son mas que caracteres, no es un objeto en si, no tiene HWND (handle), eso solo lo tienen las ventanas de windows, ya sea controles, textbox...combos, etc. si mandas algo, se lo mandas a un control determinado.

si me das un ejemplo de como seria enviarle algo a una cadena...

saludos.

#1105
Programación Visual Basic / Re: Como lo harian?
19 Septiembre 2011, 02:34 AM
Cita de: nukje en 19 Septiembre 2011, 00:33 AM
ScrollBar para listbox? w.w :rolleyes:

tiene una propiedad para eso...sino api ShowScrollBar...

saludos.
#1106
si, mi padre en un oido tiene, dice que es como el ruido de una pava que esta hirviendo, algo asi cuando salis de una discoteca con el sonido fuertisimo, pero constante, me dijo que se acostumbro, se hizo unos estudios tambein para ver como le afecto la audicion y perdio un 70% en ese oido. causas ? pues no se sabe bien empezo un dia y no paro mas, psicologico, ruido del ambiente donde trabaja ? no se sabe...

saludos.
#1107
Windows / Re: PC que actúa con retardo ...!!!
18 Septiembre 2011, 07:07 AM
esta lenta, abri el administrador de tareas de windows, debes tener un proceso que te ocupa mucha memoria y esta trabajando con bastantes subprocesos.

la mayoria de las veces, las pc tienen programas que se inician co el windows que no siren para nada, trata de limpiar el inicio con ccleaner.

pasame una captura de los procesos del administrador de tareas, pero cuando recien inicias la pc, sin ningun programa abierto, ahi vamos aver lo que realmente te esta relentizando el sistema, y tambien una captura de pantalla de los programas que se inician con windows, con el ccleaner o sino con ejecutar->msconfig

saludos.

#1108
como te dijeron Sendmessage y FindWindows serian las apis, pero digo yo, no es mas facil crear el archvio de texto y enviarlo, antes de usar el notepad ?
#1109
para los que no sabian, el Beep esta en el administrador de dispositivos como un dispositivo oculto, si no esta activado no se escucha, es como si fuera un servicio, lo podes activar o desactivar.
#1110
Código (vb) [Seleccionar]
Private Sub Form_Load()
MsgBox TextoEntreMedio("aitheoiethi[BLABLABLA]taihoithaoihtoea", "[", "]")
End Sub

Private Function TextoEntreMedio(Texto As String, Palabra1 As String, Palabra2 As String)
TextoEntreMedio = Left$(Mid$(Texto, InStr(Texto, Palabra1) + Len(Palabra1)), InStr(Mid$(Texto, InStr(Texto, Palabra1) + Len(Palabra1)), Palabra2) - 1)
End Function