Accesste zaman kısıtlaması

[msalvarli]

Herkese selam,

Forumda arayıpta bulamadığım bir konu için yardımınıza ihtiyacım var.
Verilerini excelden aldığım bir access dosyam var. Ve bu access dosyasının belirli saatlerde açılmasını veya açılsa bile uyarı verip kapanmasını istiyorum. Mesela her saat başında 10dk açılmasın. 09:00 - 09:10, 10:00 - 10:10 vb saat başlarında kullanılmasın. Bunu yapmak istememin sebebi ise bu zaman aralıklarında excel başka bir veri kaynağından kendini güncelliyor. Bu güncelleme esnasında access'i açtığımda excel dosyası işlem yapamıyor ve accesste hata veriyor. Hem access hemde excel dosyası ağ üzerinde bulunuyor.

Buyüzden buna benzer bir örnek varsa ve benimle paylaşabilirseniz sevinirim...

Şimdiden teşekkürler...

 

[msalvarli]

Konuyla ilgili bilgisi olan veya elinde örnek dosya olan bir arkadaş yok mu?

 

[Taruz]

Merhaba..

Açılışta kullandığınız formun timer özelliğine gerekli şartlar belirtilerek isteğiniz oluşturulabilir..

 

[msalvarli]

sayın taruz, aklıma gelmedi değil aslında ama nasıl yaparım hangi özelliği ile yaparım beceremedim. saat başlarında 10dk access çalışmasın sadece bunu istiyorum aslında.

 

[Taruz]

Merhaba..

Konuyla ilgili bir örnek ekleyin, üzerinden konuşalım..

 

[msalvarli]

Sn Taruz, Örnek olması açısından küçük bir dosya ekliyorum. Açılış ekranında küçük bir açıklama yaptım.
İlginiz açısında teşekkürler...

 

[msalvarli]

Umarım verdiğim örnek açıklayıcı olmuştur...

 

[Taruz]

Merhaba.. Geç cevap için kusura bakmayın.. Bilgisayara bakmaya pek fırsat bulamıyorum..

Eğer kontrol sadece form açıldığında olsun istiyorsanız şimdi aşağıya yazacağım kodları formun geçerli (current) veya açıldığında (open) olayına yazmanız yeterli.. Yok, formu kullanırken de denetlesin derseniz zaman dolduğunda (timer) olayına yazınız..

zaman [COLOR=#008000]=[/COLOR] [COLOR=#0600ff]Format[/COLOR][COLOR=#000000]([/COLOR][COLOR=#0600ff]Time[/COLOR], [COLOR=#fb0000]"nn"[/COLOR][COLOR=#000000])[/COLOR]
[COLOR=#0600ff]If[/COLOR] zaman >[COLOR=#008000]=[/COLOR] [COLOR=#7d2252]0[/COLOR] [COLOR=#0600ff]And[/COLOR] zaman <[COLOR=#008000]=[/COLOR] [COLOR=#7d2252]10[/COLOR] [COLOR=#0600ff]Then[/COLOR]
MsgBox [COLOR=#fb0000]"Access veritabanı şuanda güncelleme yaptığı için"[/COLOR] _
[COLOR=#008000]&[/COLOR] [COLOR=#fb0000]" bu dosyayı şuanda kullamazsınız. Lütfen Daha sonra tekrar deneyiniz."[/COLOR]
DoCmd.Quit
[COLOR=#0600ff]End[/COLOR] [COLOR=#0600ff]If[/COLOR]

 

[msalvarli]

Sayın taruz, teşekkürler yardımınız için... Kusura bakmayın buarada işlerin yoğunluğundan anca bakabiliyorum. Dediğiniz kodu aynen uyguladım oldu. Ancak şöyle birşey var yukarıda ekli örneğime uyguladığımda bir problem çıkmıyor. Üzerinde uğraştığım dosya üzerinde uyguladığım zaman hata veriyor... Sanırım bu hatayı bulma kısmıda bana düşüyor. Teşekkür ederim...

Hata mesajını ekledim... Yukarıdaki kodu On Open kısmında da kullandım ancak aynı hatayı verdi...

 

[msalvarli]

Dediğiniz gibi access çalışırkende bu vakit geldiğinde uyarı verip kapanabilir... Bu açıkçası hiç aklıma gelmemişti.

 

[modalı]

Sayın taruz, teşekkürler yardımınız için... Kusura bakmayın buarada işlerin yoğunluğundan anca bakabiliyorum. Dediğiniz kodu aynen uyguladım oldu. Ancak şöyle birşey var yukarıda ekli örneğime uyguladığımda bir problem çıkmıyor. Üzerinde uğraştığım dosya üzerinde uyguladığım zaman hata veriyor... Sanırım bu hatayı bulma kısmıda bana düşüyor. Teşekkür ederim...

Hata mesajını ekledim... Yukarıdaki kodu On Open kısmında da kullandım ancak aynı hatayı verdi...

Sayın msalvarli,

Kod sayfanızın başında Option Explicit ibaresi var bu da tüm değişkenlerin tanımlanması gerekliliğini kodluyor. O sayfada kullandığınız tüm değişkenleri tanımlamanız gerekir.

En azından

Dim zaman

satırını eklemeniz gerekiyor.

İyi çalışmalar

 

[msalvarli]

walla nedesem boş... Gerçekten emeğinize, yüreğinize sağlık...
Gerek sayın Taruz olsun gerekse sayın modalı olsun gördüğüm kadarıyla forumda birçok arkadaşımıza yardımcı oluyorlar veya olmaya çalışıyorlar... Ve böyle yardımcı olan sayamadığım birçok kişi var....

Gerçekten teşekkürler ve iyi çalışmalar... saygılarımla...

Buarada sayın modalı dediğiniz satırı ekleyince sorun halloldu. tekrar teşekkürler...