Recordset Property Example

Set ADF1 = ADS1.CreateObject("RDServer.DataFactory", _
	"http://Salesweb")
Set myRS = ADF1.Query _
	("DSN=SalesDB;UID=SMgr;PWD=password;", _
	"Select * from Sales")
ADC1.Recordset = myRS