// Inicia uma conexão de internet em um PC
// O nome da conexão usa o nome definido na conexão do Painel de controle.
Report is int = NetOpenRemoteAccess("Connection_LiveBox")
IF Report = 0 THEN
...
NetCloseRemoteAccess()
ELSE
Error("Error durante a conexão", NetMsgError(Report))
END
Para abrir uma conexão em um smartphone
// Abre uma conexão a partir de um Smartphone
sConnectionName is string
nCntReturn is int

// Nome da conexão é dado pelo provedor
sConnectionName = "Bouygues Internet"

// Estabiliza a conexãon
nCntReturn = NetOpenRemoteAccess(sConnectionName)
IF nCntReturn = 0 THEN
// Processo requerido
// ...
NetCloseRemoteAccess(sConnectionName)
ELSE
Error("Erro durante a conexão:", NetMsgError(nCntReturn))
END