Message "Class does not support ..."

[JohnPapa]

I get the message "The expression On Click you entered as the event property setting produced the following error: Class does not support Automation or does not support expected interface"

I receive the message on a PC running Windows 7 Professional using the Access 2013 Runtime. This pc does not have Access 2013 installed.

On my pc, I do not get the error. I have Access 2013 installed and run Windows 7 Professional SP1.

The "code" which gives the error is as follows and is invoked by clicking a button on a form

  MsgBox "1"
Dim rst As ADODB.Recordset
  MsgBox "2"
Set rst = New ADODB.Recordset
  MsgBox "3"
rst.Open "SELECT * FROM tblDentist ORDER BY lngButtonName ASC", CurrentProject.Connection, adOpenKeyset, adLockPessimistic
 If rst.RecordCount > 0 Then
  MsgBox "asdf"
Else
  MsgBox "qwerty"
End If

The error takes place after Msgbox "2" and before Msgbox "3".

The strange thing is that I can run without a problem a sophisticated software package on the pc which gives the error, using Access 2013 Runtime. This package I converted from Access 2003.

I looked on the Internet and found several possible causes for the problem
like Window release issues or mdac issues.

Any ideas?

 

[JohnPapa]

The References appear in the attachment

 

[shoji]

It might be this problem:

https://support.microsoft.com/en-us/kb/2640696

Use "Microsoft ActiveX Data Objects 2.8" instead, and see what happens.

Shoji

 

[JohnPapa]

Thanks Shoji,

Will try first your suggestion and then "ask" them to install SP1. Will report back on result.