Continue to Site

Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

  • Congratulations cowski on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by SWVB101

  1. SWVB101

    Disable Model changes in drawings - SW04

    I think the "Per Session" was dealing with the... "Models In The Assembly Have Changed." ...Dialog, which is just a stupid notification, and should have never been created... (It's in my "Duh!" List of annoying dialog boxes) ...which can only be turned off "Per Session" The drawing/model...
  2. SWVB101

    Update ACAD04/05 printer drivers after load...

    I'm not sure if the BlackIce RDK can access the pc3 files... I'll check into it though... When dealing with computers, there are 10 things you need to know: one, zero, and the rest is Binary. -Josh S
  3. SWVB101

    How can you update the Drawing Template via macro?

    Ooops... Looks like you posted before I could finish typing ;-) (There were not any replys when I started...) Oh well... Nice link though, I will give you a Star for the link (now bookmared ;-)) and for your effort. Thanks, Josh When dealing with computers, there are 10 things you need to...
  4. SWVB101

    How can you update the Drawing Template via macro?

    Nevermind... You set the Template to None then Back to the Template... Sub main() Dim S As Sheet, SP() As Double, ST As String With Application.SldWorks Set S = .ActiveDoc.GetCurrentSheet SP = S.GetProperties ST = S.GetTemplateName .ActiveDoc.SetupSheet4 S.GetName, SP(0)...
  5. SWVB101

    How can you update the Drawing Template via macro?

    We have several revisions of our Title block... The new versions are saved over the old ones with the same name and location... To manually update them... you go to the sheet properties and click Reload in the Sheet Format/Size frame... I recorded a macro... but it (and what I tried to derive...
  6. SWVB101

    Get Value By Name? (SWAPI)

    And for the Name without extention... Sub main() Dim FullName As String, FileName As String, FilePath As String Dim FileExt As String, DrawName As String With Application.SldWorks.ActiveDoc FullName = .GetPathName FileName = Split(FullName, "\")(UBound(Split(FullName, "\")))...
  7. SWVB101

    Get Value By Name? (SWAPI)

    Here is a fancy way... ;-) Throgh this in a macro and run it... Sub main() Dim FullName As String, FileName As String, FilePath As String With Application.SldWorks FullName = .ActiveDoc.GetPathName FileName = Split(FullName, "\")(UBound(Split(FullName, "\"))) FilePath =...
  8. SWVB101

    Update ACAD04/05 printer drivers after load...

    I am using BlackIce to generate TIFS from Named Views in a drawing... BlackIce (by default) sets the filenames to strings of incrementing letters... AA8.tif ... AA9.tif ... AAA.tif ... AAB.tif ... AAC.tif ...etc... Which you then have to go through and rename them... Using the BlackIce...
  9. SWVB101

    SW & VB.Net

    rgrayclamps, No problem... and no idea... ;-) For VB, any beginner VB book will do, they basically all say the same thing... (try SAM'S learn VB in 21 days) For SW API, I learned through the following: Recording MACROS in SW... The API help doc (SW Menu: Help>SolidWorks API ... Help...
  10. SWVB101

    SW & VB.Net

    Hi, rgrayclamps: COM References... (See ABOVE) In the menu Click Project>Add Reference... Click the COM tab Then select SldWorks XXXX Type Library (such as: SldWorks 2004 Type Library) When dealing with computers, there are 10 things you need to know: one, zero, and the rest is Binary. -Josh S
  11. SWVB101

    SW & VB.Net

    First off, do you have SolidWorks AND AutoCAD? If you only have SW, remove the AutoCAD stuff... As far as the SW objects go... In the menu Click Project>Add Reference... Click the COM tab Then select SldWorks (and AutoCAD if you have it): mine are listed as: SldWorks 2004 Type Library...
  12. SWVB101

    Get Value By Name? (SWAPI)

    as far as the notes in a SW Drawing go... you can make a reference to other values by using strings to reference them... such as... If your File is named "12345.123.slddrw", and you place: $PRP:"SW-File Name" in a note, the note will display: "12345.123" If an assembly (12345.123.sldasm)...
  13. SWVB101

    SW & VB.Net

    GetObject is a VB function... System.Runtime.InteropServices.Marshal.GetActiveObject is only needed in C# and for solidworks, 1 instance is all that is allowed... so the Try/Catch is not necessary... CreateObject will use an existing Instance if found... AutoCAD, on the otherhand, needs the...
  14. SWVB101

    Get Value By Name? (SWAPI)

    You can set properties and other values, such as dimensions, to notes via SW Addressing, For example: DWG Number: $PRP:"SW-File Name" Scale: $PRP:"SW-Sheet Scale" Current Sheet: $PRP:"SW-Current Sheet" Total Sheets: $PRP:"SW-Total Sheets" Weight: "SW-Mass@@Default@partnum.SLDASM" LBS But is...
  15. SWVB101

    SW & VB.Net

    I typically start with a simple project and build from there... This was my first successful test interfacing with both SW and ACAD via VB.NET (as opposed to VB6 in the past) You might find it useful, cut out what you don't need and build on what you do need... Objects: TextBoxes...

Part and Inventory Search