Ldap authentication issue

Are there any disadvantages of using the following script to update the ldap list? Can the "@BOECLUSTERNAME in the code below be any one of the 3 nodes in the environment. Is this directly(secLDAPplugin.Properties.Item("SI_UPDATE_TS").Value = now)  updating the cms db?

Dim oSessionManager
Dim oEnterpriseSession
Dim oSess

'For the logon, Authenticate as Following
Const APS = "@BOECLUSTERNAME"
Const UserID="Administrator"
Const Password = ""
Const Aut = "SecEnterprise"
   
'Create an Enterprise oSessionManager
   Set oSessionManager = CreateObject("CrystalEnterprise.SessionMgr")
   Set oSess = oSessionManager.Logon(UserID, Password, APS, Aut)

'Query the iStore and Set The Last Updated Time to refresh graph
   On Error Resume Next
   'Create a new Variable for the login token
   Set iStore = oSess.Service("", "InfoStore")
   Set secLDAPplugins = iStore.Query("SELECT TOP 1* FROM CI_SYSTEMOBJECTS WHERE SI_NAME='secLDAP'")

     Set secLDAPplugin = secLDAPplugins.Item(1)
   secLDAPplugin.Properties.Item("SI_UPDATE_TS").Value = now
     iStore.Commit secLDAPplugins