CADsite forum

Iedereen
Ik heb mijn gooi gedaan naar een script batch programma.
In de bijlage vindt u de zip van het programma met de .dvb-file (eingenlijke programma), een .lsp-file (om op te starten van de commandline), een .htm-file (help) en een .txt-file (source).
Omdat het programma in VBA is, zal het waarschijnlijk niet meer zolang leven.
Maar toch had ik graag julie mening.
Petperm

Citaat van: BarryCad op di 27 04 2010, 10:50:33
Heb nog een 'probleem'  gevonden.

Als ik 10 pagina's (genummerd van 1 tot 10) af laat drukken via de verkenner dan komen ze in een compleet andere volgorde uit de printer.

Is dit op te lossen??

Het gaat hier toch over AllDrawingsScript.dvb, hé?
Vermoedelijk is de volgorde gebasseerd op de volgorde waarin de tekeningen geopend zijn in AutoCad. Ik haal de lijst van tekeningen uit de collectie van de autocadsessie. Maar het zou op te lossen moeten zijn. Een alfanumerieke volgorde moet kunnen. Echter ik kan de sortering niet intuïtief maken zoals in Verkenner. Je weet wel: 1, 2, 3, 4, 5, 6, 7, 8 ,9, 10, 11, .. in plaats van 10, 11, 1, 20, 21, 2, 3, .. Zo goed ben ik niet.

In de bijlage zit de vernieuwde versie.

Petperm

of typen:
-xr d *

Citaat van: HofCAD op ma 12 04 2010, 13:10:06
Nee, gewoon Windows XP.

Ik had ook problemen met de files die ik downloadde. Als u teruggaat naar het oorspronkleijke berichtje staan er dezelfde files maar dan in een zip.
PetPerm

Citaat van: HofCAD op ma 12 04 2010, 11:15:13
C:\test\Filenames2List.exe is geen geldige Win32-toepassing.

Geen idee, eigenlijk. Ik heb die toepassing gemaakt in VB 2008 Express Edition voor WindowsXP. En alles leek wonderwel te werken. Op het werk heb ik deze .exe ook verdeeld en daar zijn geen problemen opgedoken.
Gebruikt u misschien Windows7 of Vista?

PetPerm

Citaat van: sschevers op ma 12 04 2010, 10:13:27
Hiermee kun je tekeningen aan batch omzetten naar dwf en afhankkelijk van je autocad versie ook naar PDF.
Heeft je Document Management Systeem geen optie voor het plotten van je tekeningen?

Wel, over het algemeen gebruik ik een batch tool als een manier om scripts te runnen. Het omzetten van dwg's naar dwf of pdf is slechts één van de dingen die ik met dit kan doen. Plotten gaat natuurlijk ook. Ik heb gewoon veel tekeningen waar veel het zelfde moet gebeuren: purgen, titels exporteren naar excel, kaders uit de tekeningen van de leveranciers halen, de kader van de klant erin, titels importeren, etc... En dan zijn die scripts, en tegenwoordig die 'Action Recorder', erg handig.
Over dat DMS systeem: Eigenijk is dat een systeem voor Microstation. Tja management, hé. Dus de links voor AutoCAD zijn wat minimaal, als ik zo mag stellen.
PetPerm

Ropa
Probeer anders het volgende:
Maak met 'CUI' een nieuwe knop in een eventuele nieuwe toolbar aan. De macro die de knop moet bevatten is als volgt:
^C^C_saveas 2004 Y
Let op de spaties. Op die manier heb je de knop die je nodig hebt.

Echter, mag ik ook het volgende voorstellen: TrueConvert. Dat is gratis bij AutoDesk en met deze tool kan je elke tekening saven in de versie die wilt. Het werkt ongeveer als een scriptbatcher
PetPerm

Stephan
Bij ons in het bedrijf zijn er ook wat veranderingen geweest. We hebben een Document Management Systeem (blablabla) gekregen. Dat betekent dat ik mijn tekeningen niet meer vanuit Verkenner kan starten. Dus al deze tooltjes die ik hier heb geplaatst zijn eigenlijk voor mij onbruikbaar geworden.
Ik ben in een andere richting gaan zoeken. Nu heb ik een nieuw programma gemaakt in VBA. Ja, ik weet het. In AutoCAD 2010 wordt dat niet meer bijgeleverd, maar ObjectArx ligt op dit moment buiten mijn bereik. En VisualLisp ging ook niet niet.
De bedoeling van het programma is om alle tekeningen die in de AutoCAD sessie geopend zijn te batchen. Dat is in elk geval de default instelling. Via een aantal opties kan je dan een script (snel) maken of selecteren, de geopende tekeningen of de tekeningen uit een lijst batchen, etc... Enfin, meer uitleg in de zip file.
Het is enkel te gebruiken via de command line. Ik ben niet zo'n toolbar fanaat.
Ik nodig iedereen uit voor commentaar.
PetPerm

Euh...
Eigenlijk weet ik het niet. Het argument "%1" is een string dat de paden van de bestanden bevat. Deze string heeft een maximum. Dat kan evengoed 32768 als 65536 tekens lang zijn. Dat is nu net wat ik niet weet. Als u veel bestanden gebruikt met een kort pad en een korte bestandsnaam dan kan u dus meer bestanden verwerken en anders minder.
Maar als u uitgebreidere bestandslijsten wilt maken kan ik u het volgende aanraden: 'Clickie 1.1' Dit tooltje kopieert het pad & bestandsnaam van alle geselecteerde bestanden met een rechter muisklik naar het clipbord. Die plak je dan in de fileslijst. Dit bestand is te vinden in 'C:/Temp/Fileslist.txt'. Op Clickie zit blijkbaar geen beperking. En ik maak toch geregeld lijsten van enkele honderden bestanden.
Een tweede tooltje dat ik zelf probeerde is in de bijlage. Je selecteert de bestanden die je wilt hebben. Drukt 'CTRL+C' en activeert Filenames2list.exe. Dit gaat in Filenames2list.ini kijken waar hij de lijst moet aanmaken. En daar genereert hij dan de lijst van de geselecteerde bestanden. Je kan dus het pad van die lijst laten overeenkomen met die van de lijst in ScriptAcadFilesInFileslist.vbs.
Normaal gesproken kan je 'Filenames2list.exe' & 'Filenames2list.ini' eender waar op je computer zetten, zolang ze maar in hetzelfde pad staan.
2010-04-12. Dezelfde bestanden maar dan in een zip, hopelijk werkt dit beter.

Sorry HofCad,
Maar dat was ook allemaal juist ingesteld.

Ondertussen heb ik met de mensen van ICT gepraat. We hebben eerst een repair geprobeerd. Dat verbeterde de situatie niet. Vervolgens probeerden we een reïnstall en dat deed het wel.
Voor de korte evaluatie die we nu deden gaat alles prima. Zelfs een paar VBA-tooltjes die waren geblokkeerd en waar ICT geen raad mee wist, zijn nu in orde. Waarschijnlijk iets in de registry, zekers?

Eind goed al goed, zullen we maar zeggen, hé

PetPerm

Gegroet HofCAD
Zo is het. Ik krijg niets. zelfs geen resultaat met 'nil'.
Het eigenaardig is dat ik een tweede AutoCAD-installatie heb op dezelfde computer namelijk de 2007 en die werkt perfect.
Ondertussen denk ik dat mijn A2009 niet volledig of juist is geïnstalleerd. Op het werk is ICT het hele bedrijfsnetwerk én computerpark aan het vernieuwen. En dus heb ik een andere computer gekregen waar alle software in één keer met een image werd gedownload. De computer bevat behalve AutoCAD2007 & 2009 ook nog AutoCAD2002 & 2004, Raster programma's, Intergraph Smartsketch, Bentley MicrostationV8 én nog een hele hoop rotzooi om letterlijk iedereen in het bedrijf te geven wat hij nodig heeft of denkt nodig te hebben.
Waarschijnlijk zal ik A2009 moeten deïnstalleren en er opnieuw moeten opzetten. Ik vraag me af of me dat nog gaat lukken in onze vernieuwe bedrijfscultuur? Visual Lisp is er zeker geen prioriteit.
Redelijk fustrerend allemaal.
Petperm

Aan allen
Ik heb mijn probleem nog niet helemaal in kaart gebracht, maar..

Bij ons op het werk zijn ze overgeschakeld van AutoCAD2007 naar AutoCAD2009. Ik had allerlei tooltjes bij gemaakt in AutoLiSP & Visual LiSP.
Nu kan ik in AutoCAD2009 Visual LiSP niet gebruik maak van bvb modelspace. In de onderstaande routine kan ik perfect aan <AcadDoc>. Ik kan <AcadModelspace> aanmaken. Maar ik kan er geen gegevens uithalen, niet met een vlax-for, noch met vla-item of een vlax-map-collection, zelfs niet met de 'INSPECT VALUE' in de watch.
Andere collections waar ik niet, vanuit mijn <AcadDoc> aan kan, zijn bijvoorbeeld paperspace.
Ik kan bijvoorbeeld wel aan de layers collection of blocks collection, maar zogauw ik aan de objecten zelf kom gaat het weer niet meer. Dan krijg ik een melding  "Object does not support ITypeInfo interface".

(setq <AcadDoc>   (vla-get-activedocument (vlax-get-acad-object))
       <AcadModelspace> (vla-get-modelspace <AcadDoc>); gaat wel, maar geen gegevens van <AcadModelspace>
       <AcadPaperspace> (vla-get-paperspace <AcadDoc>); gaat wel, maar geen gegevens van <AcadPaperspace>
       <AcadBlocks> (vla-get-blocks <AcadDoc>); gaat wel
       <AcadBlock> (vla-item <AcadBlocks> 1);  gaat, maar geen gegevens van <AcadBlock>
       <AcadLayers> (vla-get-layers <AcadDoc>); gaat wel
       <AcadLayer> (vla-item <AcadLayers> 1);  gaat, maar geen gegevens over <AcadLayer>
       );_setq

Ik maak veel gebruik van Visual Lisp. Dus (Vl-load-com) is echt wel aanwezig.

Het lijkt me dat er bepaalde dingen in deze versie van AutoCAD2009 Visual LiSP niet enabled zijn. Of dat er bepaalde interfaces niet aanwezig zijn. Of... weet ik veel?

Is er iemand die hetzelfde probleem had, liefst met een oplossing.

Petperm

Als je de block opent en typ BASE krijg je de coordinaten van het insertiepunt van de block. En hiermee kan je ze ook wijzgen.
groet

Wel 'Gatte' is een fuctie uit de express tools. 

Uit de helpfile van deze tools:

GATTE
--------------------------------------------------------------------------------
Globally changes attribute values for all insertions of a specific block.
Command: GATTE
Select block or attribute [Block name]: Use an object selection method, or enter B for the block name
Known tag names for block: MDLN.
Select attribute or type attribute name: Use an object selection method or enter the attribute tag name
Number of inserts in drawing = 2 Process all of them? [Yes/No] <Yes>: If no, select the block inserts to process
----------------------------------------------------------------------------------

Als ik de attribute 'revision' in alle blocks 'kader' die in mijn layouts staan moet verhogen is dit voor mij een goede functie.
Het wordt dan bijvoorbeeld op de commandline: Gatte;B;kader;revision;"AsBuilt";
Of dit iets is voor jou, is natuurlijk wel een ander paar mouwen?
PetPerm

Reimer
Is 'Gatte' hiervoor niet geschikt?
Petperm