mygit-admin/ken_nogi
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

debug: レスポンスステータス・本文全文を出力するデバッグコードを追加

Browse Source 
Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
This commit is contained in:
Kenichiro NOGI 2026-09-18 18:39:03 +09:00
parent 7745fc6858
commit 06340cdb7b
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
XVBA/新版着工要因閲覧シート/vba-files/Module/Module1.bas
View File

@ -569,6 +569,11 @@ Function callRestApi(Byval method As String, Byval url As String, Optional Byval
DoEvents DoEvents
Loop Loop
'デバッグ用: レスポンス全文を出力（原因調査後に削除する）
Debug.Print " [DEBUG] Response Status: " & objHTTP.Status & " " & objHTTP.statusText
Debug.Print " [DEBUG] Response Body (全文):"
Debug.Print objHTTP.responseText
'レスポンスの文字列（objHTTP.responseText）をJsonに変換して返却 'レスポンスの文字列（objHTTP.responseText）をJsonに変換して返却
Set callRestApi = JsonConverter.ParseJson(objHTTP.responseText) Set callRestApi = JsonConverter.ParseJson(objHTTP.responseText)