有人知道如何编写 asp 链接 oracle数据的 代码吗？网上找了一段 运行不对

Set OraSession=CreateObject( "OracleInProcServer.XOraSession ")
Set OraDatabase=OraSession.DbOpenDatabase( "DSN", "用户名/密码",0)
dsn=odbc dsn,user=username,pwd=password   
Set OraDynaset=ebOraDatabase.DbCreateDynaset(sSql,0)
不知这段代码如何使用
其中DSN 如何配置呢？
我的 oracle 数据库：
tnsnames.ora
# TNSNAMES.ORA Network Configuration File: E:\oracle\ora92\network\admin\tnsnames.ora
# Generated by Oracle configuration tools.
LABEL =
  (DESCRIPTION =
    (ADDRESS_LIST =
      (ADDRESS = (PROTOCOL = TCP)(HOST = MICROSOF-712C66)(PORT = 1521))
    )
    (CONNECT_DATA =
      (SERVER = DEDICATED)
      (SERVICE_NAME = label)
    )
  )

INST1_HTTP =
  (DESCRIPTION =
    (ADDRESS_LIST =
      (ADDRESS = (PROTOCOL = TCP)(HOST = MICROSOF-712C66)(PORT = 1521))
    )
    (CONNECT_DATA =
      (SERVER = SHARED)
      (SERVICE_NAME = MODOSE)
      (PRESENTATION = http://HRService)
    )
  )
listener.ora
# LISTENER.ORA Network Configuration File: E:\oracle\ora92\network\admin\listener.ora
# Generated by Oracle configuration tools.LISTENER =
  (DESCRIPTION =
    (ADDRESS = (PROTOCOL = TCP)(HOST = MICROSOF-712C66)(PORT = 1521))
  )

SID_LIST_LISTENER =
  (SID_LIST =
    (SID_DESC =
      (GLOBAL_DBNAME = label)
      (ORACLE_HOME = E:\oracle\ora92)
      (SID_NAME = label)
    )
  )

用ADODB的连接字符串也能连接Oracle的

具体怎么链接呢？

使用oracle的连接字符串连接
http://wenku.baidu.com/view/e86f341d59eef8c75fbfb308.html
oracle的常用连接字符串写法
然后ADODB连接方法是一样的
Dim con
Set con=Server.CreateObject("ADODB.Connection")
con.ConnectionString="Oracle的连接字符串"
con.Open