+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Sorguya Sıra No verdirmek (/konu-sorguya-sira-no-verdirmek.html)
Sayfalar:
1
2
Cvp: Sorguya Sıra No verdirmek - ayhan2122 - 01/05/2009
#4.Mesaj 'da Sn sledgeab 'ın altform için bahsettiği kodda 3 tane fonksiyon var ve bunlardan sadece ilk kodu yani;
Kod:
Public Function RowNum(frm As Form) As Variant
On Error GoTo Err_RowNum
With frm.RecordsetClone
.Bookmark = frm.Bookmark
RowNum = .AbsolutePosition + 1
End With
Exit_RowNum:
Exit Function
Err_RowNum:
If Err.Number <> 3021& Then
Debug.Print "RowNum() error " & Err.Number & " - " & Err.Description
End If
RowNum = Null
Resume Exit_RowNum
End FunctionCvp: Sorguya Sıra No verdirmek - adnanyurdakul - 01/05/2009
Sayın Mehmetdemiral
sorgu ile sıra numarası vermek için istediğiniz örnek ekte
iyi çalışmalr
Cvp: Sorguya Sıra No verdirmek - mehmetdemiral - 01/05/2009
Teşekkür ederim Adnan Hocam. Sql ile bu işi yapmak için kullandığınız bu kadarcık kodu Lebans 50 satır kod ile vb'da halletmiş demek ki.. Örnek için çok teşekkürler. Ben kullanımını anlayamamıştım. İyi oldu..
Cvp: Sorguya Sıra No verdirmek - ozanakkaya - 02/05/2009
Ayhan2122, ilk kod yeterli.
Cvp: Sorguya Sıra No verdirmek - mehmetdemiral - 02/05/2009
Adnan beyin gönderdiği örneği sizin istediğiniz şekle uyarladım. Böylece tabloya girilen kayıtların arasından silinenler olsa da sorgudaki sıralama hiç sapmamış oluyor. Yani bu örnek aynı zamanda otomatik sıra no konusunda da işimize yarayacaktır.
Cvp: Sorguya Sıra No verdirmek - ozanakkaya - 04/05/2009
Konu cevaplanmış sorular bölümüne taşınmıştır. +Uyarı