Guest User

Untitled

a guest
May 20th, 2018
143
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.43 KB | None | 0 0
  1. Set Fso = Server.CreateObject("Scripting.FileSystemObject")
  2.  
  3. PDFFilename = Server.MapPath(gRootPath & "/upload_temp/" & sFileNameServer(iFile))
  4.  
  5. FSO.CopyFile PDFFilename, PDFFilename & ".pdf"
  6.  
  7. fromFile = PDFFilename & ".pdf"
  8.  
  9. toFile = Server.MapPath(gRootPath & "/temp/" & sFileNameServer(iFile) & ".jpg")
  10.  
  11. strLine = """C:\Program files\pdf2image v2.0\pdf2img.exe"" -i " & fromFile & " -o " & tofile & " -f 1 -l 1 -q 75 -r 300"
Add Comment
Please, Sign In to add comment