Access ile ilgili bilgiler

[KoTiK]

Pek bir severek kullandığım access ile ilgili elimde biriken bir kaç dokümanı, bir kaç kod parçasını buraya koymanın faydalı olduğunu düşünüyorum. Belki birilerinin işine yarar...
-/-

Access ile gelen satır silme fonksiyonu genelde geliştirilen projelerde pek hoş durmadığını düşünüyorum. Bu iş için genelde ben bir tuş yaratıp bu tuşun onclik/tıklandığında olayına alttaki gibi bir kod parçası kullanıyorum.

On Error Resume Next
If Me.NewRecord Then
Me.Undo
ElseIf MsgBox("Kayıt silinsin mi?", vbYesNo) = vbYes Then
Me.Recordset.Delete
End If

-/-

Diğer birçok programda olduğu gibi bilgilerinizin kaydedilmesinden önce uyarı mesajı göstermek istiyorsanız alttaki kodu deneyebilirsiniz. Herhangi bir formun güncelleştirme öncesi (BeforeUpdate) ile ilgili yordamının aşağıdaki gibi olmasını sağlayın. Artık eski kayıtlar üzerinde değişiklik yapıldığında soru sorulacak ve kullanıcı eğer hata yaptığını düşünüyorsa kaydı bu şekilde geri alabilecek. Formun BeforeUpdate yordamını oluşturun ve aynen şu şekilde olmasını sağlayın:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If NewRecord = true Then
If MsgBox("Değişiklikler kaydedilsin mi?", _ 
vbYesNo) = vbNo Then
Cancel = True
DoCmd.RunCommand acCmdUndo
End If
End If
End Sub

-/-

birkaç satırdan oluşan mesaj kutusu için satır atlamalarını vbCr deyimini kullanabilirsiniz. vbCr deyimi satır sonu karakteridir ve Chr(13) ile aynı işi görür.

MsgBox "Bu mesaj" & vbCr & "birkaç " & vbCr & "satırdan" & vbCr & "oluşuyor.", vbOKOnly + vbExclamation

-/-

Access’in açılışındaki ekranı değiştirmek için güzel bir ipucu. Access dosyanızın bulunduğu yere aynı adlı bir BMP resim dosyası koyduğunuzda (DB1.mdb DB1.bmp gibi) dosyayı açarken Access’in açılış ekranı yerine bu BMP dosyası kendi açılış ekranınız olarak gösteriliyor, hoş oluyor...

-/-

Hazırlanan projenin MS ACCESS kurulu olmayan makinelerde kullanılabilmesi için bazı Run-Time dosyalarına ihtiyacınız olacaktır. 2000 versyonu için sözkonusu Run-Time dosyalarını http://www.microsoft.com/downloads/details.aspx?FamilyID=0c8f40ca-9ecc-426a-ac5f-e1f98a6acd73&DisplayLang=en adresinden indirebilirsiniz.

-/-

 

[Haluk]

@KoTiK;

Hoşgeldin ve verdiğin bilgiler için teşekkürler........

 

[KoTiK]

dediğim gibi bunlar sağdan soldan toplamış ufak teffek bilgiler. devamını ilk mesajı editleyip devam ettirmek niyetindeğim...

 

[Hüseyin]

devamını ilk mesajı editleyip devam ettirmek niyetindeğim...

Sayın KoTiK,
öncelikle hoşgeldiniz.
Verdiğiniz bilgilerden yola çıkarak, bundan sonra güzel ve faydalı bilgilerin geleceği görülmektedir.
Sizden ricam ekleme yaptığınızda editleyerek değilde bu mesaja yeni yanıt gibi gönderin. Editlediğinizde mesaj tarihi olarak eskilerde kalacağından üyelerimiz bu eklemeyi göremeyebilirler.
Yeni mesaj gönderirseniz bu mesajınız her üyenin okunmamış yeni gelen mesajlarında görünrceğinde herkes bilgilerden faydalanabilir.

Hoşçakalın :hey:

 

[KoTiK]

geliştirdiğiniz proje içerisinde kullandığınız otomatik numaralar deneme kayıtlarından dolayı başınıza bela mı? :kafa: deneme işleri bittikten sonra otomatik sayının yeniden birden mi başlamasını istiyorsunuz? :agla:

yapılacak işlem gayet basit. :shock: deneme kayıtlarınızı sildikten sonra "araçlar>veritabanı hizmet programları>veritabanı düzenle ve onar..." yoluyla servisi çalıştırın. hem veritabanınızın boyu kısalacak hem otomatik sayılarınız tekrardan başladığı yere geri dönecektir. :lol:

 

[KoTiK]

Access için Babylon Sözlüğü

Acces'a yeni başlayan bir arkadaşım için bir yerlerden Access sözlüğü bulmuştum. Sanırım Microsoft'un kendi sitesi olacakdı. (evet ben akvaryumda yaşıyorum)

Bu gün neden bunu BABYLON için sözlük yapmıyorum diye düşündüm. BABYLON kullanan arkadaşlara yardımı dokunur mu bilmem...