diff --git a/CatiaNetTest/AndOrDataExtraction.vb b/CatiaNetTest/AndOrDataExtraction.vb index 9d52bc47e4b8e5dcd0170cc7947ab2e051839980..64b54b3562949b6023dd97dda93fc539798d77bd 100644 --- a/CatiaNetTest/AndOrDataExtraction.vb +++ b/CatiaNetTest/AndOrDataExtraction.vb @@ -17,6 +17,8 @@ Public Class AndOrDataExtraction Public iBoundingBoxCode As Integer Public intStep As Integer Public dCollSens As Double + Public t_liaison As Double + Public t_mw As Double Public xlsPath As String Public xlsFileName As String Public cAllProducts As New ArrayList @@ -46,8 +48,8 @@ Public Class AndOrDataExtraction bAutomaticStep = True intStep = 13 dCollSens = 1 - xlsPath = "D:\mikep\Files\RWTH\Master Produktionstechnik\Masterarbeit\Experimente\Protocols\" - xlsFileName = "UglyStikRC" + xlsPath = "D:\03_Dissertation\20_Tools\CATIA_NET\ProgData\" + xlsFileName = "test_AOG" CATIA = GetObject(, "CATIA.Application") If CATIA Is Nothing Then CATIA = CreateObject("CATIA.Application") @@ -78,6 +80,50 @@ Public Class AndOrDataExtraction Debug.Print("AND/OR edges: " + CStr(numEdges)) End If + SaveMetaDataToExcel_MW() + + End Sub + + Sub SaveMetaDataToExcel_MW() + 'Use Excel + Dim oExcel As Microsoft.Office.Interop.Excel.Application + oExcel = CreateObject("Excel.Application") + oExcel.Visible = True + oExcel.Workbooks.Add() + oExcel.ActiveWorkbook.Sheets.Add.Name = "meta_data_mw" + Dim objSheet_m As Object + objSheet_m = oExcel.ActiveWorkbook.Worksheets(1) + + 'Output Metadata + + objSheet_m.Cells(1, 1).Value = "n_parts" + objSheet_m.Cells(1, 2).Value = cAllProducts.Count + + objSheet_m.Cells(2, 1).Value = "bb_projection_check" + objSheet_m.Cells(2, 2).Value = bBoundingBoxProjectionCheck + + objSheet_m.Cells(3, 1).Value = "bounding_box_code_type" + objSheet_m.Cells(3, 2).Value = iBoundingBoxCode + + objSheet_m.Cells(4, 1).Value = "step_size" + objSheet_m.Cells(4, 2).Value = intStep + + objSheet_m.Cells(5, 1).Value = "step_size_sensitivity" + objSheet_m.Cells(5, 2).Value = dCollSens + + objSheet_m.Cells(6, 1).Value = "t_liaison" + objSheet_m.Cells(6, 2).Value = t_liaison + + objSheet_m.Cells(7, 1).Value = "t_mw" + objSheet_m.Cells(7, 2).Value = t_mw + + + 'Save and close excel workbook + oExcel.ActiveWorkbook.SaveAs(Filename:=xlsPath & xlsFileName & "_meta_data_mw.xlsx") + oExcel.ActiveWorkbook.Close(SaveChanges:=True) + 'close the excel application + oExcel.Quit() + ReleaseObject(oExcel) End Sub Sub AndOrGraph(prod As List(Of Integer), nodes As List(Of List(Of Integer))) @@ -481,6 +527,7 @@ Public Class AndOrDataExtraction Dim MillisecondsElapsed As Double MillisecondsElapsed = (Now - MovingWedgeStartTime).TotalMilliseconds SecondsElapsed = Math.Round(MillisecondsElapsed / 1000.0, 2) + t_mw = SecondsElapsed MsgBox("Moving wedge extraction took " & CStr(SecondsElapsed) & " seconds") 'Use Excel @@ -596,6 +643,7 @@ Public Class AndOrDataExtraction Dim MillisecondsElapsed As Double MillisecondsElapsed = (Now - LiaisonStartTime).TotalMilliseconds SecondsElapsed = Math.Round(MillisecondsElapsed / 1000.0, 2) + t_liaison = SecondsElapsed MsgBox("Liaison graph extraction took " & CStr(SecondsElapsed) & " seconds") 'Save and close excel workbook diff --git a/CatiaNetTest/CatiaNetTest.vbproj b/CatiaNetTest/CatiaNetTest.vbproj index 54f63d8db398705bffc53bd7fc67d45c035d5e97..7c918d1fafc53df7f0905545a6cab7ae9748d2f8 100644 --- a/CatiaNetTest/CatiaNetTest.vbproj +++ b/CatiaNetTest/CatiaNetTest.vbproj @@ -74,8 +74,7 @@ </ItemGroup> <ItemGroup> <Compile Include="AndOrDataExtraction.vb" /> - <Compile Include="AssemblyTiers2.vb" /> - <Compile Include="AssemblyTiers3.vb"> + <Compile Include="AssemblyTiers2.vb"> <SubType>Form</SubType> </Compile> <Compile Include="Form1.vb"> diff --git a/CatiaNetTest/bin/Debug/CatiaNetTest.exe b/CatiaNetTest/bin/Debug/CatiaNetTest.exe index 8960b70385807dec3ae8cc117c32c9a58f193aee..47b669723a7c10565937131e59d987e6ac6eec2a 100644 Binary files a/CatiaNetTest/bin/Debug/CatiaNetTest.exe and b/CatiaNetTest/bin/Debug/CatiaNetTest.exe differ diff --git a/CatiaNetTest/bin/Debug/CatiaNetTest.pdb b/CatiaNetTest/bin/Debug/CatiaNetTest.pdb index d2456861c3bc060ca06f25fb35dd93f773a41c9e..4cf48b9dce3fd65816e012e882733412906d00a5 100644 Binary files a/CatiaNetTest/bin/Debug/CatiaNetTest.pdb and b/CatiaNetTest/bin/Debug/CatiaNetTest.pdb differ diff --git a/CatiaNetTest/bin/Debug/CatiaNetTest.vshost.exe.manifest b/CatiaNetTest/bin/Debug/CatiaNetTest.vshost.exe.manifest deleted file mode 100644 index 061c9ca950d0e8bb952c52799fb401a6614ad640..0000000000000000000000000000000000000000 --- a/CatiaNetTest/bin/Debug/CatiaNetTest.vshost.exe.manifest +++ /dev/null @@ -1,11 +0,0 @@ -<?xml version="1.0" encoding="UTF-8" standalone="yes"?> -<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> - <assemblyIdentity version="1.0.0.0" name="MyApplication.app"/> - <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2"> - <security> - <requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3"> - <requestedExecutionLevel level="asInvoker" uiAccess="false"/> - </requestedPrivileges> - </security> - </trustInfo> -</assembly> diff --git a/CatiaNetTest/obj/Debug/CatiaNetTest.exe b/CatiaNetTest/obj/Debug/CatiaNetTest.exe index 8960b70385807dec3ae8cc117c32c9a58f193aee..47b669723a7c10565937131e59d987e6ac6eec2a 100644 Binary files a/CatiaNetTest/obj/Debug/CatiaNetTest.exe and b/CatiaNetTest/obj/Debug/CatiaNetTest.exe differ diff --git a/CatiaNetTest/obj/Debug/CatiaNetTest.pdb b/CatiaNetTest/obj/Debug/CatiaNetTest.pdb index d2456861c3bc060ca06f25fb35dd93f773a41c9e..4cf48b9dce3fd65816e012e882733412906d00a5 100644 Binary files a/CatiaNetTest/obj/Debug/CatiaNetTest.pdb and b/CatiaNetTest/obj/Debug/CatiaNetTest.pdb differ diff --git a/CatiaNetTest/obj/Debug/CatiaNetTest.vbproj.GenerateResource.Cache b/CatiaNetTest/obj/Debug/CatiaNetTest.vbproj.GenerateResource.Cache index d5a83cbdeb6d2c55b492911494cb0b6c2c864da3..9a9071c3e847ef16e9adae335c558e1ac1e95424 100644 Binary files a/CatiaNetTest/obj/Debug/CatiaNetTest.vbproj.GenerateResource.Cache and b/CatiaNetTest/obj/Debug/CatiaNetTest.vbproj.GenerateResource.Cache differ diff --git a/CatiaNetTest/obj/Debug/CatiaNetTest.vbproj.ResolveComReference.cache b/CatiaNetTest/obj/Debug/CatiaNetTest.vbproj.ResolveComReference.cache index 86077951c09991e67dae9391fb9ad8d0de00233f..c4b1e3e5d00d58fe8f17fa4c04e1a8e8f039900f 100644 Binary files a/CatiaNetTest/obj/Debug/CatiaNetTest.vbproj.ResolveComReference.cache and b/CatiaNetTest/obj/Debug/CatiaNetTest.vbproj.ResolveComReference.cache differ