View Single Post
  #2  
Old 21-11-2016, 00:38
shark shark is offline
Senior Member
 
Join Date: Aug 2010
Location: Russia, Belgorod
Posts: 146
Default

you can use the standard function FileAttr to see whether a file exists:

Code:
If CorelScriptTools.FileAttr(strFile) <> 0 Then
    If MsgBox("Rewrite " + strFile + " ?", vbYesNo + vbQuestion, _
            "File exist") = vbNo Then
         ' set new name for strFile
    else
         ' rewrite file
    end if
end if

'your code...
Set Filter = d.ExportBitmap(strFile, cdrJPEG, cdrCurrentPage, _
      cdrRGBColorImage, 1000, 1000, 300, 300)
Reply With Quote