class NsConnection

La classe NsConnection encapsule une connexion réseau au serveur de sauvegarde. Tout accès au serveur nécessite un objet NsConnection correctement configuré, dans un état "connecté", afin de permettre l'envoi et la réception des données.

Host : BSTR

L'adresse IP ou le nom de domaine du serveur de sauvegarde auquel se connecter.

Port : long

Le port sur lequel a été configuré le service de sauvegarde auquel se connecter.

UseSSL : VARIANT_BOOL

Une valeur booléenne définissant si la connexion au serveur de sauvegarde doit utiliser le protocole SSL ou non. Le certificat SSL du serveur doit au préalable être approuvé dans les interfaces du logiciel, sauf si les paramètres actuels permettent la connexion sécurisée à des serveurs sans approbation manuelle de leur certificat.

UserName : BSTR

Le nom d'utilisateur avec lequel se connecter au serveur.

Password : BSTR

Le mot de passe de l'utilisateur exploité pour la connexion.

ErrorCode : long readonly

Le code d'erreur renvoyé par la dernière commande exécutée.

SessionID : __int64 readonly

L'identificateur unique de session, si celle-ci a été établie.

IsConnected : VARIANT_BOOL readonly

Une valeur booléenne indiquant si la connection est ouverte.

IsAdmin : VARIANT_BOOL readonly

Une valeur booléenne indiquant si des droits administrateur sont attribués à la connexion active.

Me : NsUser readonly

L'utilisateur (NsUser) actuellement connecté, si la connexion est établie avec le serveur de sauvegarde.

VARIANT_BOOL CheckIsAvailable()

Vérifie que les valeurs affectées aux propriétés Host, Port, et UseSSL permettent de joindre correctement un serveur de sauvegarde existant.

VARIANT_BOOL Connect()

Etablit une connexion au serveur de sauvegarde en utilisant les valeurs des propriétés Host, Port, UseSSL, UserName et Password préalablement renseignées.

VARIANT_BOOL ConnectToLocalServer()

Etablit une connexion au serveur local, en lisant dans les fichiers de configuration les paramètres de connexion à utiliser pour contacter l'instance locale.

void Disconnect()

Ferme la connexion préalablement établie avec Connect ou ConnectToLocalServer.

Connexion au serveur local

Set connection = CreateObject("NsAPI.NsConnection")

if connection.ConnectToLocalServer then
  if connection.isAdmin then
    MsgBox "Connecté avec des droits administrateur !"
  else
    MsgBox "Connecté sans droits administrateur."
  end if

   connection.Disconnect
else
  MsgBox "Connexion au serveur local impossible."
end if

Connexion à un serveur distant

Set connection = CreateObject("NsAPI.NsConnection")

connection.Host = "backup.astase.com" ' Serveur hôte
connection.Port = 1985 ' Port de fonctionnement
connection.UseSSL = false ' On utilise pas SSL

if connection.CheckIsAvailable then ' Serveur joignable ?

  connection.UserName = "jlabarre@netstation" ' Spécifie le nom d'utilisateur...
  connection.Password = "secret" '... et le mot de passe à utiliser.

  if connection.Connect then ' Tentative de connexion
    MsgBox "Connecté au serveur distant !" ' Succès !
    connection.Disconnect
  else
    MsgBox "Connexion au serveur impossible." ' Echec...
  end if

else
  MsgBox "Le serveur ne répond pas."
end if