반응형 windchill vba5 Program to get product and base folder IDs 1. PreferencesEnter the address in the config sheetEnter the address and port2. Get Product Infomation □ CodeOption ExplicitSub ProductName01() '// Output error message when an error occurs On Error Resume Next Call MainGetToken.GetToken001 '// Variable Dim xmlhttp As Object Set xmlhttp = CreateObject("MSXML2.XMLHTTP.6.0") Dim Url As S.. 2024. 8. 24. Windchill & VBA 03) - Get Product & Default Name □ ProductName01 CodeOption ExplicitSub ProductName01() '// 오류 발생 시 오류 메시지 출력 On Error Resume Next Call MainGetToken.GetToken001 '// 변수 Dim xmlhttp As Object Set xmlhttp = CreateObject("MSXML2.XMLHTTP.6.0") Dim Url As String Dim requestBody As String Dim GetresponseText As String Dim status As Integer Dim jso.. 2024. 8. 3. Windchill & VBA 10) Retrieving Folder Contents of a Specific Type □ WTPart 이름 및 속정 정보 가져오기 (Get WTPart name and attribute information)FolderContents/PTC.ProdMgmt.Part : 제품 주소 > 제품 기본 폴더 주소 >콘텐츠 주소로 WTPart 이름 가져오기▷ URL GET Url = "http://WC Adress/Windchill/servlet/odata/v4/DataAdmin/Containers('A')/Folders('B')/Folders('C')/FolderContents/PTC.ProdMgmt.Part"A : 제품 주소 (Product Adress)ex) OR:wt.pdmlink.PDMLinkProduct:1376268B: 제품의 기본 폴더 주소 (The product's defaul.. 2024. 8. 3. Windchill & VBA 10) Get CADDocuments #2 □ Creo 파일 이름 및 정보 가져오기 (Get Creo file names and information)제품 > 폴더 아래에 있는 Creo 파일 이름 및 정보를 가져오는 코드 입니다Here is the code to get the Creo file name and information under Products > Folders※ 주의(caution)제품이 가지고 있는 기본 폴더의 주소를 입력 해야 합니다You must enter the address of the default folder that the product has.□ Code1. URL "http://WC Adress/Windchill/servlet/odata/v4/DataAdmin/Containers('A')/Folders('B')/F.. 2024. 8. 3. Windchill & VBA 05) Get Folder Name □ 제품에 포함된 Folder 이름 가져오기 (Get Folder Names Included in the Product)제품에는 기본 Folder가 있습니다. 기본 Folder 아래에 사용자가 정의한 Folder들이 있습니다.The product has a default Folder. Under the default Folder, there are user-defined Folders.WRS를 이용하여 URL 주소 및 기능을 테스트 합니다Test URL addresses and functionality using WRSEX) Url = "http://WC Adress/Windchill/servlet/odata/v6/DataAdmin/Containers('" & ProductIDInput & "')/Fol.. 2024. 8. 2. 이전 1 다음 반응형