Zobrazit plnou verzi příspěvku: Plánovač úloh

lukasek
30.06.2020, 13:18
Dobrý den,chtěl bych použít plánovač úloh k tomu, abych:1) exportoval výkresy idw do pdf.Jde mi o to, aby se výsledný soubor správně uložil bez nutnosti nastavení orientace a formátu, tj. jako při "exportu" z prostředí výkresu.2) exportoval výkresy idw do dwg (Autocad).Export tu nějaký je, ale buďto se mi uloží jako zip (což nechci) nebo se při otevření v Autocadu zobrazí "jinak" než potřebuji - v Autocadu je záložka modelu prázdná, výkres se zobrazí na "listu/rozvržení".Výsledek by měl odpovídat tomu, co vypadne z Inventoru pomocí "uložit kopii jako" - dwg.Zajímá mě tedy, zda je možné plánovač úloh k tomuto využít. Žádnou možnost nastavení jsem u něj nenašel (což neznamená, že tam není).Předem děkuji za tipy.

rys-kt4
30.06.2020, 17:15
Zdravím, no nevím zda lze toto plánovačem dosáhnout, myslím, že stejně jako design asistent,  je jen pouhou náhražkou skutečné správy dat.Doporučil bych ohlédnout se raději po iLogic makrech zde nebo i na jiném webu. Tak si budete moc požadované vlastnosti nastavit. (Osobní zkušenost - já si je nechal napsat, byly potřebné. Zde to také umí, i když za peníze, ale vyplatí se to.)Vault v lokálním provedení (Basic) je spíše ke vzteku.

lukasek
01.07.2020, 07:42
Děkuji Vám za odpověď. Myslel jsem si, že to tak nějak bude. Plánovače úloh pro mě tedy zůstává i nadále nepoužitelný.Také jsme si nechali něco napsat a souhlasím s tím, že se to vyplatí. Přesto bych očekával, že by některé funkce mohly/měly být automatickou součástí programu.

rys-kt4
01.07.2020, 09:21
Inventor, i přes jeho nesporné přednosti, výkon a intuitivnost, záležitost opravdové správy dat a manipulace s nimi pominul. Na to má zřejmě síťový Vault, s kterým si ale běžný lokální smrtelník moc neporadí ani nepomůže.Škoda, že také toto není přímo implementováno v Inventoru. (V jinému CADu ano a je to velmi příjemné)Na druhou stranu má ale Inventor iLogic, a tam si už i "amatér" může docela pomoct sám.

maiklss
01.07.2020, 10:10
Staci nahrat pravidlo do inventoru a veškere  vykresy  co máte se uloží do  dwg, dxf a pdf pri ulozeni  vykresu idw. tak to vyuzivam a mám pak  veškerou dokumentaaci aktualníě k dispozici ve všech formátech

lukasek
01.07.2020, 10:36
Ano, i tak by to mohlo fungovat. Jenom nemám vytvořené pravidlo, které bych nahrál. Zkusím se na to vytváření pravidel někdy podívat...

maiklss
01.07.2020, 10:39
DXF

oFolder = ThisDoc.Path
oFileName = ThisDoc.FileName(False)
oDXFAddIn = ThisApplication.ApplicationAddIns.ItemById("{C24E3AC4-122E-11D5-8E91-0010B541CD80}")
oDocument = ThisApplication.ActiveDocument
oContext = ThisApplication.TransientObjects.CreateTranslationContext
oContext.Type = IOMechanismEnum.kFileBrowseIOMechanism
oOptions = ThisApplication.TransientObjects.CreateNameValueMap
oDataMedium = ThisApplication.TransientObjects.CreateDataMedium

If oDXFAddIn.HasSaveCopyAsOptions(oDocument, oContext, oOptions) Then
strIniFile = "C:\temp\dxfout.ini"
' Create the name-value that specifies the ini file to use.
oOptions.Value("Export_Acad_IniFile") = strIniFile
End If

'oDataMedium.FileName = oFolder & "\" & oFileName & ".pdf"

'-------------------------------------------

oDrawDoc = ThisApplication.ActiveDocument

For Each sh In oDrawDoc.Sheets


Dim dxfSmazat As String = oFolder & "\" & oFileName & "_" & Left(sh.Name, Len(sh.Name)-2) & "_" & Right(sh.Name, 1) & ".dxf"
Dim dxfSmazat2 As String = oFolder & "\" & oFileName & "_" & Left(sh.Name, Len(sh.Name)-2) & ".dxf"

If System.IO.File.Exists(dxfSmazat) Then
Try
'Delete existing file
System.IO.File.Delete(dxfSmazat)
Catch ex As Exception
'Handle error
'Show message
MsgBox(ex.Message)
'Exit rule
Return

End Try

ElseIf System.IO.File.Exists(dxfSmazat2) Then



Try
'Delete existing file
System.IO.File.Delete(dxfSmazat2)

Catch ex As Exception
'Handle error
'Show message
MsgBox(ex.Message)
'Exit rule
Return

End Try



End If

Next




oDataMedium.FileName = oFolder & "\" & oFileName & ".dxf"


'-------------------------------------------
oDXFAddIn.SaveCopyAs(oDocument, oContext, oOptions, oDataMedium)
PDFoFolder = ThisDoc.Path
oFileName = ThisDoc.FileName(False)
oPDFAddIn = ThisApplication.ApplicationAddIns.ItemById ("{0AC6FD96-2F4D-42CE-8BE0-8AEA580399E4}")
oDocument = ThisApplication.ActiveDocument
oContext = ThisApplication.TransientObjects.CreateTranslationContext
oContext.Type = IOMechanismEnum.kFileBrowseIOMechanism
oOptions = ThisApplication.TransientObjects.CreateNameValueMap
oDataMedium = ThisApplication.TransientObjects.CreateDataMedium

If oPDFAddIn.HasSaveCopyAsOptions(oDocument, oContext, oOptions) Then
oOptions.Value("Sheet_Range") = Inventor.PrintRangeEnum.kPrintAllSheets
oOptions.Value("All_Color_As_Black") = 1
oOptions.Value("Remove_Line_Weights") = 1
oOptions.Value("Vector_Resolution") = 400
End If

oDataMedium.FileName = oFolder & "\" & oFileName & ".pdf"
oPDFAddIn.SaveCopyAs(oDocument, oContext, oOptions, oDataMedium)

lukasek
01.07.2020, 12:32
Tohle mi práci hodně zjednodušilo. Děkuji moc, funguje to.Pokud by to takhle fungovalo i s DWG (kompletní zobrazením kót, razítka,...), tak by to bylo super. Jsem však vděčný již za toto, hlavní pro mě ale byla ta PDFka.

maiklss
01.07.2020, 13:44
DWG vsude staci prespat preca na DXF:) dat pravidlo  generovat pri ukládání a je vymylováno

lukasek
01.07.2020, 22:03
To jsem právě zkusil a získal jsem tím DWG, které odpovídalo DXF, tj. pouze obrys bez razítka, kót,...Ale jak jsem psal, s výsledkem jsem spokojený. Až budu mít víc prostoru, tak se na to (snad) podívám.

Ľubomír Pápay
02.07.2020, 08:20
Zdaravím,ja pre automatické ukladanie výkresov do PDF používam free utilitku cSysPdfAutoSave od www.codesystems.fiPri každom uložení výkresu to automaticky uloží aj PDF.Maximálna spokojnosť.


Michal H.
02.07.2020, 12:58
Pokud potřebujete automatizovaně tvořit různou výrobní dokumentaci, jako jsou PDF, DXF, DWG,... soubory, tak nejpohodlnější cestou je naše aplikace Vault Publisher: https://www.cadstudio.cz/vaultpublisherLze použít i různé iLogic pravidla, ale ty jsou více závislé na uživateli a ne vždy jsou stoprocentně funkční.

maiklss
02.07.2020, 13:15
[QUOTE=lukasek]To jsem právě zkusil a získal jsem tím DWG, které odpovídalo DXF, tj. pouze obrys bez razítka, kót,...Ale jak jsem psal, s výsledkem jsem spokojený. Až budu mít víc prostoru, tak se na to (snad) podívám.[/QUOTE]
Je to tim ze máte nastaveny styl exportu bez kot. koty a dalsi  se prida  pokudv nastaveni  exportu  DWG nastavite export nejen  obrysu  dilce.   Staci otvrit jakykoly vykres dat ulozit jako  DWG nastavit v nastaveni exportu aby nebylo zaskrtnuto jen  obrys pak bude vse

lukasek
02.07.2020, 14:30
S nastavením exportu jste měl pravdu... Po změně nastavení je výsledek podle představ. Aplikace Vault Publisher by vše uvedené jistě uměla, má však dvě nevýhody. Musel bych nejspíš používat Vault (tomu se úspěšně vyhýbám) a tou druhou je pořizovací cena. Spolehlivost iLogic pravidel neodvedu po exportu několika výkresů posoudit, na žádný problém jsem však nenarazil.Z mého pohledu je tedy téma uzavřené a vyřešené, přestože se odklonilo od původního záměru použití Plánovače úloh.Děkuji vám všem za sdílení rad a zkušeností.