ソースを参照

Removed unrelated comments

pull/8/head
Daniel Covington 6ヶ月前
コミット
e944edbf5d
1個のファイルの変更1行の追加3行の削除
  1. +1
    -3
      ImportService/TrackingDataImport.vbs

+ 1
- 3
ImportService/TrackingDataImport.vbs ファイルの表示

@@ -85,10 +85,8 @@ Function CreateProofForJurisdiction(KitID)
Dim test
For test = 1 To Qpdf.FileListCount("Proofs")
'objFSO.DeleteFile Qpdf.FileListItem("Proofs",test),1
WshShell.Run "cmd.exe /c DEL /F /Q """ & Qpdf.FileListItem("Proofs",test) & """" ,0,True
'debug.WriteLine "cmd.exe /c DEL /F /Q """ & Qpdf.FileListItem("Proofs",test) & """"
'debug.WriteLine Qpdf.FileListItem("Proofs",test)

Next
Else
.SetParamValue "PBMIN",MIN


読み込み中…
キャンセル
保存

Powered by TurnKey Linux.