Anobody know how to solve the error

430 - Class does not support automation or expected interface

when i'm trying to connect to an SQL-Server - Im using this code

Code:
Set cn = New Connection
cn.Provider = "SQLOLEDB.1"
cn.Open "Data Source=M10074200010", sUserName, sPassword
It works on some machine and some not, what the heck is wrong???

//patrick