I need to get the users ID using the username information through VBScript

Question

I'm creating a user via vbscript below: 
 "Option Explicit 
 Dim oServerApp: set oServerApp = CreateObject("MFilesAPI.MFilesServerApplication") oServerApp.Connect 2, "user", "password", "SERVERNAME", "ncacn_ip_tcp", "localhost", "2266", "DEMO VAULT NAME", false Dim oVault: Set oVault = oServerApp.LogInToVaultAdministrative(VaultGUID) 
 Dim oEmail: oEmail = PropertyValues.SearchForProperty(1089).TypedValue.DisplayValue 
 Dim oLoginAccount: Set oLoginAccount = CreateObject("MFilesAPI.LoginAccount") Dim oUserAccount: Set oUserAccount = CreateObject("MFilesAPI.UserAccount") 
 oLoginAccount.AccountType = MFLoginAccountTypeMFiles oLoginAccount.LicenseType = MFLicenseTypeConcurrentUserLicense oLoginAccount.EmailAddress = oEmail oLoginAccount.Enabled = True oLoginAccount.UserName = "user-" & oEmail 
 oServerApp.LoginAccountOperations.AddLoginAccount oLoginAccount, "Testepassword" 
 oUserAccount.Enabled = true oUserAccount.InternalUser = true oUserAccount.LoginName = "omega-" & oEmail 
 'oVault.UserOperations.ModifyUserAccount oUserAccount oVault.UserOperations.AddUserAccount oUserAccount 
 oServerApp.Disconnect()" 
 Now you need to set this user created on a property of type list that points to M-files users. 
 Dim oPropVal : Set oPropVal = CreateObject("MFilesAPI.PropertyValue") oPropVal.PropertyDef = 1150 oPropVal.TypedValue.SetValue MFDatatypeLookup, ?????? Vault.ObjectPropertyOperations.SetProperty ObjVer, oPropVal 
 I know the "MFDatatypeLookup" requires the ID. 
 How to get the userid I created? 
 Can anyone provide a code example?

Ne0Tr0n · Accepted Answer

At this point, the changes not committed yet. I suggest try make changes on the next workflow step where transition is manual. So, may be something like this in next step: 
 Dim oEmail: oEmail = PropertyValues.SearchForProperty(1089).TypedValue.DisplayValue

Dim oUserAccount : Set oUserAccount = Vault.UserOperations.SearchForUserAccount("omega-" & oEmail)

Dim oPropVal : Set oPropVal = CreateObject("MFilesAPI.PropertyValue")
oPropVal.PropertyDef = 1150
oPropVal.TypedValue.SetValue MFDatatypeLookup, oUserAccount.ID
Vault.ObjectPropertyOperations.SetProperty ObjVer, oPropVal 
 The difference between oVault and Vault is that Vault is an build-in variable that stores the connection to the vault of the current object.oVault is a variable that stores the connection to the vault made through the API.

Joonas Linkola · Answer

I'm not a VBScript expert but according to the API reference the AddUserAccount method ( https://www.m-files.com/api/documentation/#MFilesAPI~VaultUserOperations~AddUserAccount.html ) seems to return the created user account, so you should be able to get the ID from the UserAccount object ( https://www.m-files.com/api/documentation/#MFilesAPI~UserAccount.html ).

I need to get the users ID using the username information through VBScript

Top Replies