include Function e objeto

[Thiagocapaverde 0]

Ola Pessoal

 

Estou tentando organizar um menu que tenho no site.

 

Para isto fiz uma pagina chamada FU.asp que coloquei das funções.

 

Faço um include do FU.asp na pagina do menu.

 

Bom até ai tudo bem, funcionando. Mas tem uma questão que não consegui resolver.

 

Tenho uma função dentro da FU.asp de faz uma consulta ao banco de dados e deveria retornar as informações para ser exibidas :

 

 

 

 

function setSQLRateioCli()

strSQL1 = "select atv_clientenome,atv_clientecc,sum(atv_quant_horas) as totalhoras,SUM(atv_quant_minutos) as totalminutos from Atividades where atv_datahora_fim between CAST('"&datainisql&"' as datetime) AND CAST('"&datafimsql&"' as datetime) and atv_quant_horas > -1 and atv_quant_minutos > -1 and atv_ocorrencia in ('DESLOCAMENTO','HORA TRABALHADA DIRETA','HORA TRABALHADA INDIRETA','HORA EXTRA') group by atv_clientenome,atv_clientecc order by totalhoras desc"

Set objRS1 = Server.CreateObject("ADODB.RecordSet")

objRS1.Open strSQL1, objConn

setSQLRateioCli = objRS1

end function

Mas isto não funciona, creio que seja pq não posso retornar um objeto e como é um include também a variável se perde.

Tem alguma forma de passar um objeto como retorno?

Tem uma outra ideia de como fazer isto?

 

[hargon 64]

Tudo Thiagocapaverde? Seja bem-vindo ao Fórum.

 

Continue dessa forma, mas quando chamar o método, execute assim:

 

Set NOVA_VARIAVEL = setSQLRateioCli()

 

Obs. Include não perde variável, pois ele une os arquivos. Tanto que se você declarar uma variável dentro dele e outra fora dele vai ter conflito.