get and set sql query on Crystal 2008

Hi,

i'am developing an application that uses Crystal 2008 reports and i need to filter results using any SQL Query...

Ex:

select * from products where productID in (select distinct produtctID from sales)

I have tried to change the sql query but that solution doesn't work...

Dim objDS As System.Data.DataSet

Dim objSqlConn As System.Data.SqlClient.SqlConnection

Dim lngTimeOut As Long

Dim SQLAdapter As System.Data.SqlClient.SqlDataAdapter

objSqlConn = New System.Data.SqlClient.SqlConnection(m_strConnectionStringNET)

objDS = New System.Data.DataSet()

SQLAdapter = New System.Data.SqlClient.SqlDataAdapter(strSqlQuery, objSqlConn)

SQLAdapter.Fill(objDS)

m_objReport.SetDataSource(objDS)

Anyone can help me to sql and get SQL Query?

Thanks