[DllImport("wtsapi32.dll", SetLastError = true)]
static extern bool WTSDisconnectSession(IntPtr hServer, int sessionId, bool bWait);
<DllImport("wtsapi32.dll", SetLastError:=True)> _
Private Shared Function WTSDisconnectSession(ByVal hServer As IntPtr, ByVal SessionId As Integer, ByVal bWait As Boolean) As Boolean
End Function
None.
Note that you cannot disconnect the console session.
To indicate the current session, specify WTS_CURRENT_SESSION. To retrieve the identifiers of all sessions on a specified terminal server, use the WTSEnumerateSessions function.
To be able to disconnect another user's session, you need to have the Disconnect permission.
Please add some!
Friend Function DissconnectSession(ByVal ServerName As String, ByVal SessionID As Integer) As Boolean
Dim RetVal As Boolean
Dim ptrOpenedServer As IntPtr
Try
ptrOpenedServer = WTSOpenServer(ServerName)
RetVal = WTSDisconnectSession(ptrOpenedServer, SessionID, False)
Catch ex As Exception
Throw New Exception(ex.Message & vbCrLf & System.Runtime.InteropServices.Marshal.GetLastWin32Error)
Finally
Try
WTSCloseServer(ptrOpenedServer)
Catch ex As Exception
End Try
End Try
Return RetVal
End Function
Do you know one? Please contribute it!