سؤال مهم عن كريستال 9

قم بإختيار record sort expert من قائمة report ثم إختار الحقل الذي تريد عمل sort عليه

اشكرك عزيزى للاهتمام

ولكن انا اريد ان يكون الترتيب اثناء التشغيل runtime

وليس اثناء التنفيذ0

ففى طريقة استخدام ocx كان الكود

crystalreport1.sortfiled(0)="+{table1.field1}"

وبالطبع هذا غير متوافر مع rdc

الاخوة الاحباب هذا هو الرد

مع العلم بان XX ترمز الى رقم Table

وان yy ترمز الى رقم Field

'General Declarations

Dim Report As New CrystalReport1

Dim FiSort As CRAXDRT.DatabaseFieldDefinition

Private Sub Form_Load()

Set FiSort = Report.Database.Tables.Item(xx).Fields.Item(yy)

Report.RecordSortFields.Item(1).Field = fisort

CRViewer1.ReportSource = report

CRViewer1.ViewReport

End Sub