Vbscript migration from 2003 to 2012 application server: Microsoft vbscript compilation error '800a0401'

See more:

ASP

VBScript

Hi,

I am facing an issue during migration of VBScript code from 2003 to 2012 application server. I have registered (regedit) VB dll but unable to run it. I am getting the below error. It's because of declaration of the datatype.

Error:
Microsoft VBScript compilation error '800a0401'
Expected end of statement
/test/sample.asp, line 17
Dim DBConnection As ADODB.Connection
-------------^

Actual 2003 code snippet:
<%
'declare variables
Dim DbConnection As ADODB.Connection
Dim ConStatus as String

'open the connection to database
Set DBConnection=Server.CreateObject("ADODB.Connection")
DBConnection.open "DSN=dsn_name;UID=user_name;PWD=password;Database=database_name"
Set ConStatus=DBConnection.Status
Response.write ConStatus

'Connection close
DbConnection.Close
Set DbConnection=nothing
%>

Changes by removing datatype in declaration of 2003 code snippet:

<%
'declare variables
Dim DbConnection
Dim ConStatus

'open the connection to database
Set DBConnection=Server.CreateObject("ADODB.Connection")
DBConnection.open "DSN=dsn_name;UID=user_name;PWD=password;Database=database_name"
Set ConStatus=DBConnection.Status
Response.write ConStatus

'Connection close
DbConnection.Close
Set DbConnection=nothing
%>

Do, i need to add any dll file to run the application correctly without changing the application code as code changes require some permission. They expecting the migration without code changes. Please help me for solution as i am stucked from 3 days of facing same error.

Thank you in Advance..

Regards,
Balaji

What I have tried:

I have tried by removing the datatype declaration then it worked fine but with given code its not working. Need to add anything like configure dll's.