dmcscripting.converter in VBA Access automation error 800700C1

[agnys]

Environment : Win7 64bit / Access 2007 / Dbpoweramp R14.3

code :

================================================== ============================

Dim dMC
Set dMC = CreateObject("dMCScripting.Converter")


============== previous statement generates " automation error 800700C1" =========================

strt = "C:\mp3\A Certain Sadness.mp3"

' Read All IDTags
Dim i
For i = 0 To 10000
Dim Element As String, Value As String
Element = ""
Value = ""
Call dMC.ReadIDTag(StrT0, i, Element, Value)
If Element = "" Then Exit For
MessageBox.Show (Element + ": " + Value)
Next

================================================== ===========

What can I do to avoid this error code

[Spoon]

Re: dmcscripting.converter in VBA Access automation error 800700C1

Try running as a .vbs script, does it crash?

[agnys]

Re: dmcscripting.converter in VBA Access automation error 800700C1

Running as a vbs script gives no problems

code :
Wscript.echo "test dmcscripting"
Set WshShell = CreateObject("WScript.Shell")
Set dMC = CreateObject("dMCScripting.Converter")
strt = "C:\mp3\A Certain Sadness.mp3"

' Read All IDTags
For i = 0 To 20

Dim ElementValue
ElementValue = dMC.ReadIDTagElementValue(strt,i)
If ElementValue = "" Then Exit For
Call WshShell.Popup(i & ": " & ElementValue, , "Read Tag", 0)
Next

[Spoon]

Re: dmcscripting.converter in VBA Access automation error 800700C1

Then it is likely the issue is in 2007 access.

[agnys]

Re: dmcscripting.converter in VBA Access automation error 800700C1

I already did activate the reference "dMCSripting Type 1 Library" in Access
Are there other references I have to activate ?

[Spoon]

Re: dmcscripting.converter in VBA Access automation error 800700C1

Not as far as I am aware.