Bonjour à tous,
Je sais que je ne me trouve pas dans le forum idéal pour ce genre de question mais si jamais quelqu'un saurait m'aider, je lui en serait très reconnaissant !
Je travaille avec SolidWorks 2013 et ePDM.
J'aurais besoin de récupérer l'information "INDICE" d'une pièce avec un Solidworks fermé.
La routine serait appelée directement avec un clic droit sur une pièce enregistrée dans le coffre d'ePDM.
J'ai réussi à récupérer cette information avec un solidworks ouvert grâce à l'objet "ActiveDoc", mais je pense que c'est complètement différent avec un SW fermé.
J'imagine qu'il faut appeler un objet qui ouvre le document souhaité, de plus, j'aimerais que cela se passe en mode "Silence".
j'ai actuellement ce code:
Avez vous des idées ? Merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41 Imports SolidWorks.Interop Imports SolidWorks.Interop.swconst Imports System Imports System.IO Public Class Form1 Dim swApp As sldworks.SldWorks Dim swDoc As sldworks.ModelDoc2 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim value As String = Nothing Dim SW As StreamWriter Dim PathFile = "C:\Users\tony.guyot\Desktop\ERP\getIndice.map" ' Connexion à SolidWorks swApp = CreateObject("SldWorks.Application.21") ' 21 = version 2013 'swApp = GetObject(, "SldWorks.Application") swDoc = swApp.ActiveDoc Dim swCustomPM As sldworks.CustomPropertyManager = swDoc.Extension.CustomPropertyManager("") value = (swCustomPM.Get("INDICE")) MsgBox(value) SW = File.AppendText(PathFile) SW.WriteLine("Indice: " + value) SW.Flush() SW.Close() Me.Close() End Sub End Class
Partager