[Resolvido] Consulta randomizada ASP + SQL

Olá amigos.

Tenho uma consulta de imóveis abaixo, mas não estou conseguindo fazer ela exibir os imóveis aleatóriamente.

sSQL = " Select A.Codigo_Imovel, A.Codigo_Imobiliaria, " & _
" A.Quartos, A.Vagas_Garagem, A.Nome_Bairro, " & _
" A.Valor, A.Foto, A.Orientacao, " & _
" B.Nome as NomeOpcao, A.Nome_Cidade " & _
" from " & _
" Imoveis as A, Opcoes as B, iMOBILIARIAS as C " & _
" where " & _
" A.Codigo_Opcao = B.Codigo_Opcao and " & _
" a.destaque = 1 AND " & _
" a.foto IS NOT NULL and " & _
" A.Codigo_Imobiliaria = C.Codigo_Imobiliaria and " & _
" C.Divulga_Portal = 'S' and " & _
" (ltrim(str(c.Codigo_Imobiliaria))+ltrim(str(A.Codigo_Imovel))) in ( " & _
" Select " & _
" (ltrim(str(c.Codigo_Imobiliaria))+ltrim(str(max(A.Codigo_Imovel)))) " & _
" from Imoveis as A, imobiliarias as C " & _
" where " & _
" c.codigo_imobiliaria = a.Codigo_Imobiliaria and " & _
" c.divulga_portal = 'S' and a.destaque = 1 and " & _
" a.foto IS NOT NULL " & _
" ) "& _
" ORDER BY RAND(A.Codigo_Imobiliaria-A.Codigo_Imobiliaria) "

Onde to errando?

Valeu pela atenção.