Advertisement
ASP_Volume3 Complete Applications #54128

Gather as much as possible information about a PC in the internet

This app is an IP range scanner. It gathers informations like: SMB shares, services, processes, transport protocols, number of drives, groups, users, sessions, remote registry info and much more... It's also possible to shutdown a PC, to open shares and to send messages over the message service. (but only if enabled on the remote PC) Please vote :-)

AI

Shrnutí AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Zdrojový kód
original-source
Upload
Imports System
Imports System.Diagnostics
Imports System.ComponentModel
Public Clas TestClas 'It's wrong because pscode.com doesn't accept the word Clas (with 2 s).
  Public Function prevInstance(ByVal pstrProcessName as string) As Boolean
    Dim lblnRet As Boolean = False
    Dim lintInst As Integer
    lintInst = UBound(Diagnostics.Process.GetProcessesByName(pstrProcessName))
    If lintInst > 0 Then
      lblnRet = True
    End If
    Return lblnRet
  End Function
End Clas
Původní komentáře (3)
Obnoveno z Wayback Machine