Set objPDF = CreateObject("Scripting.FileSystemObject")
Set temp = objPDF.GetFile("C:\62294_GT.pdf")
Msgbox temp.Size
set tf=temp.OpenAsTextStream
Set textfile =objPDF.CreateTextFile("C:\pdf.txt")
Do Until tf.AtEndOfStream
'strLine = tf.ReadLine
'print strLine
textfile.WriteLine(tf.ReadLine)
loop
loop
Note: to ensure acrobat reader already installed on your machine, otherwise need to install acrobat reader to create object for PDF using vb script.