| Pregunta: | 2534 - DETERMINAR LOS USUARIOS QUE UTILIZAN UN PROGRAMA |
| Autor: | Mariano Laguzzi |
| Hola gente: Tengo como tarea realizar un programa algo dificil. El ambiente es el siguiente: Servidor Novell, y terminales windows 98, y DOS 6.22. Entonces desde una terminal windows, tengo que correr el programa que me devuelva, que usuarios, terminales o nº de conección estan usando cierto programa (pepito.exe). Exite un programita llamado "Who", pero no corre en quipos con micro grandes, por eso quiciera hacer algo mas genérico y mas visual. Gracias gente y no vemos.. | |
| Respuesta: | Federico Ruete |
| Mira, parte de ese problema (entorno gráfico) lo solucione con el asistente de visual. luego modifique las cosas como para guardar todo cambio en los registros con usuario y fecha ´------------------------------------------------ Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpbuffer As String, nSize As Long) As Long ´USUARIO----------------------------------------- Function Usuario() As String Dim sBuffer As String Dim lSize As Long sBuffer = Space$(255) lSize = Len(sBuffer) Call GetUserName(sBuffer, lSize) If lSize > 0 Then Usuario = Left$(sBuffer, lSize - 1) If Usuario = Space$(254) Then Usuario = vbNullString End If Else Usuario = vbNullString End If End Function ´------------------------------------------------ para obtener mas datos del usuario, los busco en una tabla de la DB y en otra me fijo que tipo de acceso tiene a cada una de las funciones del sistema. también obtuve buenos resultados con respecto a usuarios e identificación de terminales con el objeto Inet.ocx y las propiedades remoteport, remotehost, username, etc. deberás hacer un cliente/servidor pero solo para el caso tcp y win98. Saludos cordiales :´) | |
| Respuesta: | Victor Manuel Flores Monroy |
| Mira creo que eso es Muy Facil!! ya que me imagino que corres una aplicación que desarrollaste para DOS... bueno si es asi genera un archivo de texto que contega una sola linea y que solamente contega el numero uno cuando tu aplicacion comienza agregas un numero y lo vuelves a grabar asi solamente checas dicho archivo y listo.... Espero y te sirva si no mandame un mail y vemos como le hacemos | |