![]() Show ( "Add advance print watermark?", "Add Watermark?", MessageBoxButtons. ![]() ![]() Exists (strOutputFolder ) Then Exit Sub End If StrOutputFolder = OutputPath ( ) 'if we don't have a valid directory (ie the user pressed 'cancel') exit the journal If Not Directory. StrRevision = Trim (strRevision ) Catch ex As Exception ![]() GetStringAttribute ( "DB_PART_REV" ) Else 'running in native mode 'currentFile = GetFilePath() & GetFileName() & ".prt" PartUnits '0 = inch '1 = metric If IsTcEng ThenĬurrentFile = workPart. 'determine if we are running under TC or native Dim IsTcEng As Boolean = False Dim UFSes As UFSession = UFSession. DrawingSheet Dim i As Integer Dim pdfFile As String Dim currentPath As String Dim currentFile As String Dim exportFile As String Dim partUnits As Integer Dim strOutputFolder As String Dim strRevision As String Dim rspFileExists Work Dim displayPart As Part = theSession. GetSession ( ) Dim workPart As Part = theSession. MessageBox Imports NXOpenÄim theSession As Session = Session.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |