how to write query

[stevol]

hi,
i proved to do this code:

Code:

Dim rs, conn, customerid set conn=createobject("adodb.connection") set rs=createobject("adodb.recordset") conn.ConnectionString = "Provider=OraOLEDB.Oracle; Data Source=<SOURCE>; User ID=<USER>; Password=<PWD>; PLSQLRSet=1;" conn.open customerid="select 'ciao' from dual" rs.open customerid, conn rs.close set rs=nothing conn.close set conn=nothing msgbox customerid

But in the msgbox i see "select 'ciao' from dual" and not "ciao"... how can to save the query result in a variable?

thx,
ste

[stevol]

ok, i have found the solution.. thx howewer :-)

Code:

Dim rs, conn, query, customerid set conn=createobject("adodb.connection") set rs=createobject("adodb.recordset") conn.ConnectionString = "Provider=OraOLEDB.Oracle; Data Source=<SOURCE>; User ID=<USER>; Password=<PWD>; PLSQLRSet=1;" conn.open query="select 'ciao' as pippo from dual" Set rs= conn1.Execute(query) var = rs.fields("pippo") rs.close set rs=nothing conn.close set conn=nothing msgbox var