OVH Cloud OVH Cloud

Environnement TSE

2 réponses
Avatar
Francois
Bonjour,

Existe t'il une API ou une méthode VB qui permet de savoir si le programme
est sur un poste en mode TSE (Terminal Serveur) ou sur un poste normal ?

Merci

François

2 réponses

Avatar
Jacques93
Bonjour,
Francois wrote:
Bonjour,

Existe t'il une API ou une méthode VB qui permet de savoir si le programme
est sur un poste en mode TSE (Terminal Serveur) ou sur un poste normal ?




Oui,

Private Declare Function GetSystemMetrics Lib "user32" _
(ByVal nIndex As Long) As Long

Private Const SM_REMOTESESSION = &H1000

if GetSystemMetrics(SM_REMOTESESSION) then
MsgBox "TSE"
End If

Minimum W2K / XP, détails ici :

http://minilien.com/?jOUo6qKdUG


--
Cordialement,

Jacques.
Avatar
Francois
Bonjour

Merci de votre réponse.

François

"Jacques93" a écrit dans le message
news: #
Bonjour,
Francois wrote:
> Bonjour,
>
> Existe t'il une API ou une méthode VB qui permet de savoir si le


programme
> est sur un poste en mode TSE (Terminal Serveur) ou sur un poste normal ?
>

Oui,

Private Declare Function GetSystemMetrics Lib "user32" _
(ByVal nIndex As Long) As Long

Private Const SM_REMOTESESSION = &H1000

if GetSystemMetrics(SM_REMOTESESSION) then
MsgBox "TSE"
End If

Minimum W2K / XP, détails ici :

http://minilien.com/?jOUo6qKdUG


--
Cordialement,

Jacques.