Code not working in 2018 but works in 2012

[jletcher]

 I have looked this over and I can't figure out why it is giving me this error.

1st time I even seen this kind of error on ilogic.

I supplied the part I will warn you don't hit continue it will stick you in a loop and you will have to force close Inventor.

Now this is in a library folder it works if the part is in the project workspace but I can't have that they need to be in a library so they cannot modify the part by accident .

It works fine in 2012 as a library but not in 2018.

Thanks for the help.

[bradeneuropeArthur]

Can you please upload the code as text!?

[Mike.Wohletz]

I have opened the part and made a couple of edits using 2018 and have no issues or errors. 

[jletcher]

Dim fileName As String
Dim path As String
path = ThisDoc.WorkspacePath()
fileName = "filename"

ThisDoc.Document.SaveAs(path & "\" & "900C7H" & L_1 & ".ipt" , False)


			

doc = ThisDoc.Document
path_and_name = ThisDoc.PathAndFileName(False) ' without extension


iLogicVb.UpdateWhenDone = True






MessageBox.Show("Your file has been made", "SPACER")

[jletcher]

Did you put it in a library and mapped in projects?

It works if it is in the project folder but not in library..

[pball]

Since you said this is in a library folder, it could be related to the "bug fix" in 2018 which removes the ability for the API to modify library parts. In the past the API could edit parts in library folders that could not be edited manually. That issue is discussed along with a hidden bypass for the fix added in 2018.2 in the thread below.

https://forums.autodesk.com/t5/inventor-customization/ilogic-error/td-p/7133836

[jletcher]

Knock knock anyone here?

 Come on Autodesk I need answers.......

Client needs to make parts..............

[jletcher]

 OH so the service pack that fails to install is the thing I need to fix this...

HOW NICE

[bradeneuropeArthur]

Hi,

What went wrong?

[jletcher]

Loaded both updates and it does not fix my issue..

[jletcher]

 If you are talking about the update I guess I had to load 2018.2 before I load 2018.2.1

 But neither of the updates fixed my issue..

[ChrisMitchell01]

In VBA, you now have to use:

ThisApplication.[_LibraryDocumentModifiable] = True

That also works in iLogic.

-Chris

[MechMachineMan]

Put this line in it's own rule, run it, then try your code again:

ThisApplication.[_LibraryDocumentModifiable] = True

[jletcher]

No luck...

 Put it in his own did not work and would not let me exit so I had to task manager close Inventor..

[bradeneuropeArthur]

Hi,

Did you try

makedirectory for each directory

like:

on error resume next

Mkdir "C\Test"

on error resume next

Mdir "C\Test\Directory1"

on error resume next

Mdir "C\Test\Directory1\Directory2"

[bradeneuropeArthur]

last option could be:

this allows you to edit the Content Center part;

ThisApplication._LibraryDocumentModifiable = True

Don't forget to set it back to false for the Application

with:

ThisApplication._LibraryDocumentModifiable = false

Completed Code:

Dim fileName As String
Dim path As String
path = ThisDoc.WorkspacePath()
fileName = "filename"

ThisApplication._LibraryDocumentModifiable = True

ThisDoc.Document.SaveAs(path & "\" & "900C7H" & L_1 & ".ipt" , False)
		

doc = ThisDoc.Document
path_and_name = ThisDoc.PathAndFileName(False) ' without extension


iLogicVb.UpdateWhenDone = True

MessageBox.Show("Your file has been made", "SPACER")

ThisApplication._LibraryDocumentModifiable = false

[jletcher]

Not sure what you mean by make directory for each directory..

 I need it to go into the project path..

[bradeneuropeArthur]

you need to create the directory step by step (Per directory) when not existing yet.

for example:

you nee directory which is not existing:

like:

C\Test\Directory1\Directory2

then you need to do it like

on error resume next

Mkdir "C\Test"

on error resume next

Mdir "C\Test\Directory1"

on error resume next

Mdir "C\Test\Directory1\Directory2"

[jletcher]

OK that code works but needs to be the 1st rule in the list

[bradeneuropeArthur]

Hi,

Don't forget to set the value to False again!!!

To prevent you from problems as written in my post.

Good to here that it has been solved.