Dim sqlRS As ADODB.Recordset
Dim sqlString As String	

	sqlString = "SELECT * FROM [table]"
	Set sqlRS = getRS(sqlString)
	if not sqlRS.eof then
		'sqlRS.recordcount
		do while not sqlRS.eof
			'do something with the values from the recordset
			'you can use the ordinal position or the named field
			'sqlRS.fields(0).value = shows the value the first field
			'sqlRS.fields("id").value = shows the value of the named field "id"
			sqlRS.movenext
		loop
	end if
	set sqlRS = nothing