Skip to main content

AccessTr.neT


Raporda Sıralama

Raporda Sıralama

Çözüldü #1
iyi günler. yaptığım çalışmada raporda bir sıralama yaptırmam gerekiyor. Kural: aynı isme sahip kayıtlardan sadece tc si olanlara birer sıra numarası verdirerek sıralama yaptırmak. yardımcı olursanız seviirim. çalışma ektedir.. şimdiden teşekkürler
.rar ÖRNEK .rar (Dosya Boyutu: 349,71 KB | İndirme Sayısı: 5)
Cevapla
#2
yardımcı olacak biri yok mu??
Cevapla
#3
- T_EKDERS isimli tabloya veri türü sayı olan rsira adında yeni alan ekle,
- Raporun kayıt kaynağındaki sorguya en sona tablodaki rsira alanını ekle,
- Rapordaki metin46'nın denetim kaynağını rsira olarak değiştir,
- Metin46'nın Geçerli Toplam özelliğini hayır olarak değiştir.
- Raporun açıldığında olayına aşağıdaki kodu ekle,

Visual Basic Code
Dim SQL As String
Dim rsg As Recordset
Dim GSayi As Integer



SQL = "SELECT personelno, tcno, ekdersno, sirano, ucretsira, rsira FROM T_EKDERS ORDER BY personelno, sirano, ucretsira;"
Set rsg = CurrentDb.OpenRecordset(SQL)

GSayi = 1

rsg.MoveFirst

Do Until rsg.EOF = True
    rsg.Edit
    
        If Len(rsg!tcno) > 0 Then
        
            rsg!rsira = GSayi
            GSayi = GSayi + 1
        Else
        
            rsg!rsira = Null
        End If
    
    rsg.Update
    rsg.MoveNext

Loop
Cevapla
#4
sn.ozanakkaya tek kelimeyle muhteşemsin. iyi ki varsın " ACCESSTR". sadece kod açıldığında değilde, yüklendiğinde olayına eklenince çalıştı..
sorun çözülmüştür. alkis
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da