Connection to SQL Server 2005 does not work!!!

[neemi]

I have a database which connects to SQL Server 2000 using the code below

'// Build ODBC connect string
    sODBC = "ODBC;"
    sODBC = sODBC & "UID=" & sUser & ";"
    sODBC = sODBC & "PWD=" & sPassword & ";"
    sODBC = sODBC & "DSN=" & sDSN & ";"
    sODBC = sODBC & "Database=" & sDatabase & ";"

'// Attempt Connect
    Set wsApp = DBEngine.Workspaces(0)
    Set dbODBC = wsApp.OpenDatabase("", False, False, sODBC)
    Set dbApp = wsApp.Databases(0)

however their has been a server upgrade to SQL Server 2005.

But I cannot connect to the database on the server anymore. It just tells me there has been a connection failure.

Help appreciated.

Do I need to rewrite the code etc.
Has anyone had the same problem.

Cheers,
Neemi

 

[neemi]

Sorry please ignore.

It does work!!!