Kinook Software Forum

Go Back   Kinook Software Forum > Visual Build Professional > [VBP] General Discussion
FAQ Community Calendar Today's Posts Search

Reply
 
Thread Tools Rate Thread Display Modes
  #1  
Old 06-09-2015, 12:15 PM
HippyCraig HippyCraig is offline
Registered User
 
Join Date: 07-27-2006
Location: Philly
Posts: 211
Script modifications

I am using VBP to modify a bunch of scripts, I am trying to find a specific step and make some modifications to it, especially using encrypted passwords. Below is what I have but I am not sure about the password property making sure that the password is correct and that the encryption flag is set correctly in the BLD file.

Code:
Dim objApp, objStep, iNewIndex

Set objApp = CreateObject("VisBuildSvr.Application")
objApp.Project.Load "%PROCFILES_FULLPATH%"

'Set Find Step
For Each objStep in objApp.Project.Steps(vbldStepMain)
	If objStep.Name = "Map Drive to Shared Output" and objStep.Action = "Map Drive" Then
		objStep.Checked = True
		objStep.Property("Password") = "SOME_ENCRYPTED_PASSWORD"
		objStep.Property("Username") = "DOMAIN\USER"
		objStep.Property("buildfailsteps") = CBool(0)
		Exit For
	End If
	iNewIndex = iNewIndex + 1
Next
Reply With Quote
  #2  
Old 06-09-2015, 08:03 PM
kinook kinook is online now
Administrator
 
Join Date: 03-06-2001
Location: Colorado
Posts: 6,034
It's not currently possible to define an encrypted step property from script code (you would need to use the step's [undocumented] IObjectProperties interface, which isn't accessible from VBScript). You can create/update an encrypted project macro via Macros.AddEx, so you could do that and then assign the macro's value (i.e., "%MAP_DRIVE_PWD%") to the step property.
Reply With Quote
  #3  
Old 06-09-2015, 08:25 PM
HippyCraig HippyCraig is offline
Registered User
 
Join Date: 07-27-2006
Location: Philly
Posts: 211
so the weird thing is that the if the flag is set through the GUI just running the script to update the password does put some crazy text in the final BLD file.

If I go down the route of creating an encrypted macro how can I set the Encrypted flag creating an object with VBScript.
Reply With Quote
  #4  
Old 06-09-2015, 08:36 PM
kinook kinook is online now
Administrator
 
Join Date: 03-06-2001
Location: Colorado
Posts: 6,034
True, you can update an existing encrypted step property using the usual Step.Property statement. To create/update an encrypted macro value, use AddEx and pass True for the encrypt parameter.
Reply With Quote
  #5  
Old 06-09-2015, 08:47 PM
HippyCraig HippyCraig is offline
Registered User
 
Join Date: 07-27-2006
Location: Philly
Posts: 211
I will give it a try in the morning, just to understand I CANT set the encrypted flag in the XML that is part of the BLD file but if its already set I can update the property and it will encrypt the password for me.

Other option is to store the password in macro and just assign the macro to the password field. I will post my results in the AM
Reply With Quote
  #6  
Old 06-10-2015, 09:40 PM
HippyCraig HippyCraig is offline
Registered User
 
Join Date: 07-27-2006
Location: Philly
Posts: 211
Everything worked out thanks for the help
Reply With Quote
  #7  
Old 07-09-2015, 09:26 AM
kinook kinook is online now
Administrator
 
Join Date: 03-06-2001
Location: Colorado
Posts: 6,034
In v9, encrypted properties can be created via the Step.Property2 property.
http://www.kinook.com/VisBuildPro/Ma...y2property.htm
Reply With Quote
  #8  
Old 07-09-2015, 09:29 AM
HippyCraig HippyCraig is offline
Registered User
 
Join Date: 07-27-2006
Location: Philly
Posts: 211
I will give it a try, I will need to upgrade first But this is great news thanks!!!
Reply With Quote
Reply


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off



All times are GMT -5. The time now is 06:10 AM.


Copyright © 1999-2023 Kinook Software, Inc.