Ilogic - Custom Iproperties

Ilogic - Custom Iproperties

Remy-intl
Advocate Advocate
687 Views
2 Replies
Message 1 of 3

Ilogic - Custom Iproperties

Remy-intl
Advocate
Advocate

Hello,

 

For an ERP i need to cut the title in 3 custom iproperties.

 

My rule work only partially.

I succed to cut the title in 3 variable of 30 character but I can't stock into my custom properties....

Dim TitrePartie1, TitrePartie2, TitrePartie3 As String
		TitrePartie1 = Left(iProperties.Value("Summary", "Title"), 30)	
		TitrePartie2 = Mid(iProperties.Value("Summary", "Title"), 31, 30)
		TitrePartie3 = Right(iProperties.Value("Summary", "Title"), 30)
		MessageBox.Show(TitrePartie1)
		' Pour test: affiche le titreERPi et le nombre de charactères
		'MessageBox.Show(TitrePartie1 & " " & Len(TitrePartie1) & vbLf & _
		'TitrePartie2 & " " & Len(TitrePartie2) & vbLf & _
		'TitrePartie3 & " " & Len(TitrePartie3) & vbLf  _
		', "iLogic ")
		
'The 3 lines below don't work... Do you understand why?
'The 3 custom properties TitreERP1 & TitreERP2 & TitreERP3 are already created.
iProperties.Value("Custom", "TitreERP1") = TitrePartie1 iProperties.Value("Custom", "TitreERP2")= TitrePartie2 iProperties.Value("Custom", "TitreERP1") = TitrePartie3

'When I try iProperties.Value("Custom", "TitreERP1") = "a" it's work :(

Thanks

0 Likes
Accepted solutions (1)
688 Views
2 Replies
Replies (2)
Message 2 of 3

snappyjazz
Collaborator
Collaborator
Accepted solution

Hi @Remy-intl 

Does it give you an error? what is the error? I copy and pasted your code and created your 3 custom properties and it worked for me.

 

P.S. your line:

iProperties.Value("Custom", "TitreERP1") = TitrePartie3

Probably meant to write:

iProperties.Value("Custom", "TitreERP3") = TitrePartie3
0 Likes
Message 3 of 3

Remy-intl
Advocate
Advocate

Thanks.

 

Today it's working...

I think the computer just needed a restart....

Thanks a lot for your remark...

 

 

0 Likes