19-09-2019, 12:42
Ahmet bey maalesef misafir sıralama kodlarında sorgunun boş olabilme ihtimalini -misafir bulunmama durumunu- göz ardı etmişim o kodların düzeltilmesi gerekiyor
Visual Basic
- 'Hy misafirlerin sıralamasını düzenle________________________
- '...…………………..
- ' Öncesi aynı
- With RsGuncelle '<--Aynı
- .Open SnoGuncelle, CurrentProject.Connection, adOpenKeyset, adLockOptimistic '<--Aynı
- If .RecordCount = 0 Then GoTo 10 '<--Eklenen: misafir var mı yok mu denetleme kodu
- .MoveLast '<--Aynı
- .MoveFirst '<--Aynı
-
- '.
- '.
- '. öncesi aynı
- 10 '<--- Eklenen 'Sonrası aynı
- .Close: Set RsGuncelle = Nothing
- End With
- 'Hy misafirlerin sıralamasını düzenle_________Bitti