Exemple : obtention des propriétés de session

Cet exemple montre comment utiliser l’objet TDConnection pour obtenir les propriétés de la session en cours. Ajoutez le code à la procédure où ces propriétés sont nécessaires. Les propriétés ne dépendent pas les unes des autres, de sorte que chacune d’entre elles peut être récupérée séparément.

Voici des exemples de propriétés de session :

TDConnection.ServerName
TDConnection.ServerTime
TDConnection.DomainName
TDConnection.ProjectName
User.UserName

Notez qu’il n’est pas nécessaire d’utiliser TDConnection pour récupérer le nom de l’utilisateur car le workflow possède un objet User prédéfini. Pour plus d’informations, voir Objet TDConnection.

L’exemple ci-dessous teste les cinq premiers caractères de l’URL du serveur pour déterminer si l’utilisateur est connecté au serveur par HTTP ou HTTPS :

If Left(UCase(TDConnection.ServerName), 5) = "HTTPS" Then
        MsgBox "You are currently connected to the server using SSL."
Else
        MsgBox "You are not using SSL."
End If