+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: SQL (https://accesstr.net/forum-sql.html)
+--- Konu Başlığı: Kapalı dosyada olmayan sayıları listele (/konu-kapali-dosyada-olmayan-sayilari-listele.html)
Kapalı dosyada olmayan sayıları listele - alican60 - 03/03/2013
Aşağıdaki kod ile kapalı dosyadaki NO alanında bulunan A-1 ile A-30 arasındaki A-1....A-2 gibi sayıları listeliyorum.A-1 ile A-30 arasındaki NO sütununda olmayan sayıları listelemek için kodda nasıl değişiklik yapmam gerekir.
Kod:
rs.Open "Select * from [LİSTE] ORDER BY [NO] ASC ;", Baglan, 1, 1
If rs.RecordCount > 0 Then rs.movefirst
Do While Not rs.EOF
x = x + 1
ListView1.ListItems.Add , , rs(0).Value
For k = 1 To 1
If Not IsNull(rs(k).Value) Then
ListView1.ListItems(x).SubItems(k) = rs(k).Value
End If
Next k
rs.MoveNext
Loop