How to mass update a password for a network profile

English Support for Syncovery on Windows.
Post Reply
gropat
Posts: 10
Joined: Mon Aug 03, 2020 4:06 pm

How to mass update a password for a network profile

Post by gropat »

Hello,
We are using Syncovery 10.3.14 (64 bits).
Many profiles are using an internal network user profile ; this profile is a kind of technical user profile, and it's dedicated to Syncovery for internal transfers.
However, many other internal or external profiles are not using this technical user profile
For security reasons we are going to change the password.
Is it possible to mass update password , or at least, to list Sync profile using this particular user profile ?
I already checked the SYNCOVERY.INI ...without success !
Thank you for your help
BR
Patrick
tobias
Posts: 2164
Joined: Tue Mar 31, 2020 7:37 pm

Re: How to mass update a password for a network profile

Post by tobias »

Hello,
one solution is using this global PascalScript. It needs to be entered on the Program Settings dialog, via the "Advanced" tab sheet.

You can remove it after all jobs have run at least once, which causes the new password to be saved:

Code: Select all

const cUserStrıng='@admin:';
      cNewPassword='newpassword';

var Checked:Boolean;

function OnProfileStart:Boolean;
var conn:UnicodeString;
    p:Integer;
begin
  Result:=true;
  if Checked then
    Exit;

  Checked:=true;

  conn:=GetProfileProperty('Connection1');
  p:=Pos(cUserString,conn);
  if p>0 then begin
     conn:=Copy(conn,1,p-1)+cUserString+cNewPassword+Copy(conn,Length(conn)-2,3);
     SetProfileProperty('Connection1',conn);
     SaveProfileSettings;
     Log('');
     Log('Adjusted left-side network password via PascalScript.');
     end
  else begin
    Log('');
    Log('No network password needs to be adjusted on the left side.');
    end;

  conn:=GetProfileProperty('Connection2');
  p:=Pos(cUserString,conn);
  if p>0 then begin
     conn:=Copy(conn,1,p-1)+cUserString+cNewPassword+Copy(conn,Length(conn)-2,3);
     SetProfileProperty('Connection2',conn);
     SaveProfileSettings;
     Log('');
     Log('Adjusted right-side network password via PascalScript.');
     end
  else begin
    Log('');
    Log('No network password needs to be adjusted on the right side.');
    end;
  end;
Post Reply