<podrias crear un proyecto de scaner de red local que mmuestre pc activas y cuando se desconecten manden una alerta que no hay conexion saludos amigo muy buenos aportes.
Me olvidaba el código: Imports System.DirectoryServices
Public Class Form1
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim BASE As DirectoryEntry = New DirectoryEntry("WinNT:")
For Each MISPCS As DirectoryEntry In BASE.Children For Each MIPC As DirectoryEntry In MISPCS.Children If (MIPC.Name <> "Schema") Then TextBox1.Text += MIPC.Name & vbCrLf End If Next Next End Sub
Hola: Olvida lo que he dicho. Me he precipitado. Recoge los nombres de los PC conectados pero no los elimina cuando se desconectan. Sigo mirando como resolverlo. Disculpas y Saludos.
Hola: Pues la verdad es que no encuentro nada que permita saber los pc que han cerrado su conecxion en un momento dado. Lo que veo que ocurre es que en cuanto se conecta un ordenador este queda registrado pero si se cierra el ordenador no desaparece de los registros. He probado diferentes códigos, el comando net view en el cmd, etc. Aparece el nuevo ordenador cuando se conecta pero NO desaparece si se cierra. Queria evitarlo pero solo se me ocurre monitorizar los ordenadores por UDP para que envíen un mensaje cuando se cierren. Se podría adaptar esta aplicación para hacerlo: http://visualbasictutoriales.blogspot.com.es/2014/12/base-para-control-de-ciber-con-visual.html Saludos.
Hola: Prueba esto (botón + textbox multilínea). Te dará los nombre de las pc activas en ese momento. Si se le pone un timer que compare con todos los posibles pc ya tendrías lo que necesitas. Subiré un video en los próximos días. Si tienes alguna duda déjame un nuevo comentario. Saludos.
podrías crear un proyecto en que pongas sombra y bordes redondeados en formulario con formborderstyle modo none ??????
ResponderEliminarHola: ¿Has visto esto?:
Eliminarhttp://visualbasictutoriales.blogspot.com.es/2015/02/forms-personalizados-con-visual-basic.html
Saludos.
si, me refiero hahacerlo sin una imagen
Eliminar<podrias crear un proyecto de scaner de red local que mmuestre pc activas y cuando se desconecten manden una alerta que no hay conexion saludos amigo muy buenos aportes.
ResponderEliminarMe olvidaba el código:
EliminarImports System.DirectoryServices
Public Class Form1
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim BASE As DirectoryEntry = New DirectoryEntry("WinNT:")
For Each MISPCS As DirectoryEntry In BASE.Children
For Each MIPC As DirectoryEntry In MISPCS.Children
If (MIPC.Name <> "Schema") Then
TextBox1.Text += MIPC.Name & vbCrLf
End If
Next
Next
End Sub
End Class
Saludos.
Hola: Olvida lo que he dicho. Me he precipitado.
EliminarRecoge los nombres de los PC conectados pero no los elimina cuando se desconectan.
Sigo mirando como resolverlo.
Disculpas y Saludos.
Hola: Pues la verdad es que no encuentro nada que permita saber los pc que han cerrado su conecxion en un momento dado. Lo que veo que ocurre es que en cuanto se conecta un ordenador este queda registrado pero si se cierra el ordenador no desaparece de los registros. He probado diferentes códigos, el comando net view en el cmd, etc. Aparece el nuevo ordenador cuando se conecta pero NO desaparece si se cierra.
EliminarQueria evitarlo pero solo se me ocurre monitorizar los ordenadores por UDP para que envíen un mensaje cuando se cierren.
Se podría adaptar esta aplicación para hacerlo:
http://visualbasictutoriales.blogspot.com.es/2014/12/base-para-control-de-ciber-con-visual.html
Saludos.
Hola:
ResponderEliminarPrueba esto (botón + textbox multilínea). Te dará los nombre de las pc activas en ese momento.
Si se le pone un timer que compare con todos los posibles pc ya tendrías lo que necesitas.
Subiré un video en los próximos días.
Si tienes alguna duda déjame un nuevo comentario.
Saludos.