浏览代码

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.