Try this modified script. It doesn't use the timer, unlike the previous script. That means you need to run it manually everytime you see the "Try again" dialog. And then click "Try again" in the Import pictures dialog.
'Code starts here Dim FSO: Set FSO = WScript.CreateObject("Scripting.FileSystemObject") TmpFldr = FSO.GetSpecialFolder(2) Call DelAcqTemp Sub DelAcqTemp NumSeconds = 5 Dim objFolder Dim objFile Dim objSubfolder Set objFolder = fso.GetFolder(TmpFldr) 'DELETE Acq* files in TempFolder Path For Each objFile In objFolder.files If LCase(FSO.GetExtensionName(objFile)) <> "tmp" And _ Left(LCase(FSO.GetBaseName(objFile)),3) = "acq" Then On Error Resume Next objFile.Delete True On Error GoTo 0 End If Next End Sub 'Code ends here
So, I have ran the new updated script as soon as I got this error "The library, drive, or media pool is empty" error and after I clicked Try again I got new errors with the same message