Veri Girişini Kısıtlamak...YARDIM...

[by_ufuk]

Merhaba arkadaşlar,
excel arayüzü kullanarak Access veritabanına kayıt yapabilen bir çalışma var elimde. Ancak bu çalışmanın bir süre otomatik olarak lisans istemesini istiyorum yada Access veri tabanına belirli bir sayıda veri girişini izin vermek istiyorum.Mesela 1000. satıra gelindiğinde otomatik olarak daha fazla kayıt yapılmasına izin verilmesin.
Bunu nasıl sağlayabilirim.

 

[N.Ziya Hiçdurmaz]

yanıt

Sub lisans()
If Date >= ("24.05.2011") Then
    MsgBox "Kullanım süreniz dolmuştur.", vbInformation
    Exit Sub
End If
End Sub

 

[by_ufuk]

Sub lisans()
If Date >= ("24.05.2011") Then
    MsgBox "Kullanım süreniz dolmuştur.", vbInformation
    Exit Sub
End If
End Sub

Verdiğiniz kodu ilk giriş sayfasındaki kodların başına ekledim ancak bir değişiklik olmadı.