Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
tucker.smithAKU2X
319 Views, 4 Replies

user parameter not going to file name when using SaveAS

this code works to save my file as an stl, but the only thing i see in windows explorer is a file that is created as just .stl. i know i have values in my parameters, but i do not know why it won't pass it to actually create a file name. code is

'machineName = "PRESS"
'machineNumber = 103 ul
'workCenterNumber = 6310 ul

Dim machineName As String

Dim machineNumber As String  

Dim workCenterNumber As String

ThisDoc.Document.SaveAs(machineNumber & machineName & ".stl" , True)

 

 

Hi @tucker.smithAKU2X 

Remove the declaration of variable name. Or set them equal to the parameter. As it is this is setting up a variable name with no assigned value. 

 

Code with local parameter as values.

'machineName = "PRESS"
'machineNumber = 103 ul
'workCenterNumber = 6310 ul

Dim machineName As String = machineName

Dim machineNumber As String = machineNumber

Dim workCenterNumber As String = workCenterNumber

ThisDoc.Document.SaveAs(machineNumber & machineName & ".stl" , True)
 

 

If this solved a problem, please click (accept) as solution.‌‌‌‌
Or if this helped you, please, click (like)‌‌
Regards
Alan

It still saves as just .stl with no file name.

 

tuckersmithAKU2X_0-1683663688935.png

 

'machineName = "PRESS"
'machineNumber = 103 ul
'workCenterNumber = 6310 ul

Dim machineName As String = machineName

Dim machineNumber As String = machineNumber

Dim workCenterNumber As String = workCenterNumber

ThisDoc.Document.SaveAs(machineNumber & machineName & workCenterNumber & ".stl", True)

Hi @tucker.smithAKU2X 

Just tested this so either change the variable name or remove the variable like below. 

 

Remove String variable

MessageBox.Show(machineNumber & machineName & ".stl", "Title")

 Change String variable name

Dim smachineName As String = machineName

Dim smachineNumber As String = machineNumber

Dim sworkCenterNumber As String = workCenterNumber
MessageBox.Show(smachineNumber & smachineName & ".stl", "Title")

 

If this solved a problem, please click (accept) as solution.‌‌‌‌
Or if this helped you, please, click (like)‌‌
Regards
Alan

Thank you so much for your help!