ORDENAR REGISTROS EM CRYSTAL REPORTS
Como faço para ordenar dados no Crystal Reports? Tentei fazer isso na Query, mas não funcionou.
Private Sub cmdExibir_Click()
Dim oapp As CRAXDDRT.Application
Dim oreport As CRAXDDRT.Report
Set rst = New ADODB.Recordset
rst.Open [Ô]SELECT id_funcionario, nome, email, telefone FROM Funcionario Order By nome ASC[Ô], Conexao, adOpenKeyset, adLockOptimistic
Set oapp = New CRAXDDRT.Application
Set oreport = oapp.OpenReport(App.Path & [Ô]\Report1.rpt[Ô], 1)
oreport.Database.SetDataSource rst, adOpenKeyset, 1
With CRViewer1
.ReportSource = oreport
.ViewReport
End With
End Sub
Private Sub cmdExibir_Click()
Dim oapp As CRAXDDRT.Application
Dim oreport As CRAXDDRT.Report
Set rst = New ADODB.Recordset
rst.Open [Ô]SELECT id_funcionario, nome, email, telefone FROM Funcionario Order By nome ASC[Ô], Conexao, adOpenKeyset, adLockOptimistic
Set oapp = New CRAXDDRT.Application
Set oreport = oapp.OpenReport(App.Path & [Ô]\Report1.rpt[Ô], 1)
oreport.Database.SetDataSource rst, adOpenKeyset, 1
With CRViewer1
.ReportSource = oreport
.ViewReport
End With
End Sub
Você sabe por qual motivo não está ordenando?
Verifique se seus registros não possuem espaço antes de iniciar o texto, você pode utilizar o trim(campo) para remover os espaços.
Verifique se seus registros não possuem espaço antes de iniciar o texto, você pode utilizar o trim(campo) para remover os espaços.
Faça seu login para responder