Object creation needs updating

pulibrary / oclcpinyin

Other

2 stars 0 forks source link

Object creation needs updating #1

Closed wnickeson closed 6 months ago

wnickeson commented 6 months ago

The code to create an object needs to be updated, from:

Dim CS As Object
Set CS = CreateObject("Connex.Client")

to:

Dim CS As Object
On Error Resume Next
Set CS = GetObject( , "Connex.Client" )
On Error GoTo 0
If CS Is Nothing Then Set CS = CreateObject( "Connex.Client" )

tventimi commented 6 months ago

Thank you for pointing this out. I updated the code as you indicated in v2.1.2, released today. Please let me know if you have any other issues with the program.