|
|
|
|
|
|
|
|
Dicas
|
|
|
ASP - Active Server Page (Miscelâneas)
|
|
 |
Título da Dica: Crystal - Rotina para setar RecordSet
|
 |
|
|
|
Postada em 26/9/2003 por Fabio CR
Essa rotina você pode usar na sua pagina setar o recordset a ser usado pelo crystal. O primeiro parametro indica se vc está indicando o recordset de um subrelatório ou do relatório principal (1o. parametro em branco)
sub fCBPassaRecordSet (subrpt, rs)
set session("oRs") = rs
if subrpt = "" then
set Database = session("oRpt").Database
else
Set CRSubreports = session("oRpt").OpenSubreport(subrpt)
Set Database = CRSubreports.Database
end if
set Tables = Database.Tables
set Table1 = Tables.Item(1)
Table1.SetPrivateData 3, session("oRs")
end sub
t+
Fabio CR
|
|
|
|
|
