首次提交: OnebotCatalog 项目代码与文档(含 NX 按需生成服务二期、后台、一键启动)

This commit is contained in:
wangruiguo
2026-09-03 17:55:45 +08:00
commit fafa86d3a6
241 changed files with 78656 additions and 0 deletions

View File

@@ -0,0 +1,33 @@
' 探针 6: Step214Importer 成员
Option Strict Off
Imports System
Imports System.IO
Imports System.Text
Imports NXOpen
Imports NXOpen.UF
Module ProbeApi6
Sub Main()
Dim sb As New StringBuilder()
Dim t As System.Type = GetType(Session).Assembly.GetType("NXOpen.Step214Importer", False)
If t Is Nothing Then
sb.AppendLine("Step214Importer 未找到; 列出 Step 相关类型:")
For Each tt As System.Type In GetType(Session).Assembly.GetTypes()
If tt.FullName.IndexOf("Step", StringComparison.OrdinalIgnoreCase) >= 0 Then sb.AppendLine("T: " & tt.FullName)
Next
Else
For Each mi As System.Reflection.MemberInfo In t.GetMembers()
If mi.MemberType = System.Reflection.MemberTypes.Method OrElse mi.MemberType = System.Reflection.MemberTypes.Property Then
sb.AppendLine("SI: " & mi.MemberType & " " & mi.Name)
End If
Next
For Each nt As System.Type In t.GetNestedTypes()
sb.AppendLine("SI NESTED: " & nt.Name)
For Each f As System.Reflection.FieldInfo In nt.GetFields()
If f.IsStatic Then sb.AppendLine(" = " & f.Name)
Next
Next
End If
File.WriteAllText(Path.Combine(Directory.GetCurrentDirectory(), "probe6.txt"), sb.ToString(), Encoding.UTF8)
End Sub
End Module