An
|
PORTO FERREIRA
SP - BRASIL
|
|
Postada em 10/02/2005 11:27 hs
Oi pessoal, eu estou fazendo um relatório de cliente, e estou usando o CRViewer para visualizar dentro do vb6. Agora eu estou tentando classificar os dados conforme o usuário pedir, ou por Código ou por Nome do Cliente. Eu coloquei um código mais da erro. Report.RecordSortFields(0) = "+{tblclientes.nome}" ele dá o seguinte erro: Run Time Erro '9'. SubScript Out Of Range se alguem puder me ajudar, Muito Obrigado.
Anderson Leal
|
|
|
|
|
|
|
|
Postada em 10/02/2005 14:12 hs
Utilize apenas... Report.SortFields(0) = "+{tblclientes.nome}" e nao... Report.RecordSortFields(0) = "+{tblclientes.nome}" ok |
|
|
|
An
|
PORTO FERREIRA
SP - BRASIL
|
|
Postada em 10/02/2005 14:30 hs
Bom Ivo com esse código dá outro erro. Run Time erro 438 Object doesn't support this property method.
Anderson Leal
|
|
|
|
cajose
|
MACEIO
AL - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 10/02/2005 16:30 hs
Tente no modulo, Public Sub Imprimir(Relatorio As String)
Set Report = Aplicacao.OpenReport(Relatorio)
Report.DiscardSavedData
Report.RecordSelectionFormula = "{campo} = " & form.Text1.Text
With frmrelat .CRViewer1.ReportSource = Report
.CRViewer1.ViewReport
.Show 1
End With
José Carlos Vector
|
|
|
|
An
|
PORTO FERREIRA
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 10/02/2005 18:06 hs
Desculpe a Duplicidade...
Anderson Leal
|
|
|
|
