Modify pdf Metadata in Access VBA

[BikeToWork]

Is it possible to change pdf metadata from within Access? I have the following code for reading data from a pdf but I need to change it. I am not averse to using the Acrobat application object rather than late binding. Thanks in advance for any advice.

Function ReadPDF(ByVal sFile As String) As Boolean
Dim oDoc As Object ' Acrobat.CAcroPDDoc
Dim msFileName As String, mnNumPages As Integer 
Dim mnPageMode As Integer, msTitle As String
Dim msSubject As String, msAuthor As String 
Dim msKeywords As String, msCreator As String 
Dim msProducer As String
 
  Set oDoc = CreateObject("AcroExch.PDDoc")
  With oDoc    
    If .Open(sFile) Then      
      msFileName = .GetFileName
      mnNumPages = .GetNumPages
      mnPageMode = .GetPageMode
      msTitle = .GetInfo("Title")
      msSubject = .GetInfo("Subject")
      msAuthor = .GetInfo("Author")
      msKeywords = .GetInfo("Keywords")
      msCreator = .GetInfo("Creator")
      msProducer = .GetInfo("Producer")
      .Close      
      ReadPDF = True
    Else
      ReadPDF = False
    End If
  End With
  Set oDoc = Nothing
End Function
 

[zmbd]

I'm afraid that very few of us have any experience with the acrobat automation.

I would suspect the ability to change the data would lie in two requirements: knowing the command (sorry, captain obvious here ;) ) and the correct security settings within the PDF file itself (it would do no good to make a change and then the file can't be opened!).

Hopefully someone will have a better answer for you