VB with Oracle

Shrutikhungar

I have a Connection.vbs file with following contents:
******************************************************************
Dim strCon

strCon = "Driver={Microsoft ODBC for Oracle}; " & _
"CONNECTSTRING=(DESCRIPTION=" & _
"(ADDRESS=(PROTOCOL=TCP)" & _
"(HOST= TRISHUL)(PORT=1525))" & _
"(CONNECT_DATA=(SERVICE_NAME=BTFLVAS))); uid=odb;pwd=odb;"
Dim ocon1:set ocon1=CreateObject("ADODB.Connection")
ocon1.open strCon
******************************************************************

Getting this error as a pop up message while executing this file :
Script: D:Connection.vbs
Line: 10
Char: 1
Error: [Oracle][ODBC][Ora]ORA-12560: TNS:protocol adaptor error
Code: 80004005
Source: Microsoft OLE DB Provider for ODBC Drivers

Please help!

Thanks,
Shruti