Merhaba Arkadaşlar,
Access'in yeteri kadar görsel olmadığından şikayet ettiğim çok olmuştur. Daha görsel ve interaktif uygulamalar nasıl geliştirilebilir? Bu soruya cevap olması amacıyla araştırmalar yapmaktayım. İlk olarak arayüz üzerine çalışmalar yaptım. (Link1, Link2)
Yaklaşık iki gün önce ise bir sitede access nesnelerine (Formlar, Sorgular, ya da combobox, listbox...vs. ) erişimin sağlandığını gördüm. Açıkçası bu olaydan baya etkilendim. Tasarımlarımızın çok farklı boyutlar kazanabileceğini gördüm. Eğer bu örneğin nasıl yapıldığını keşfedersem, access'te yapılamayacak bir çok şeyi accessle yapabileceğimi farkettim.
Konunun sonunda 3 eklenti bulunmaktadır. Son eklenti benim burada yapılışını anlattığım eklentidir. Diğer ikisi ise yeryüzünde nadir bulunan ya da şimdiye kadar nadir bulunan iki örnek.
Lafı daha fazla uzatmadan flash ile access içinde nasıl kontrol sağlayabiliriz ona gelelim... (Bu örneği hazırlarken Adobe Flash Professional CS5 programını kullandım. Bu benim ilk flash deneyimim oldu. Flash vb programlar hakkında hiç bir bilgim yok. Bu yüzden tasarımlarımla dalga geçmeyin
Artık bu konuda kendimi zenginleştirme vakti... 
)
Artık lafı fazla uzatmıcam söz... Başlıyorum
Flash programı içinde bir buton oluşturun... Daha sonra butonun üzerinde sağ tıklayın. "Action" seçeneğini seçin ve aşağıdaki kodu yapıştırın.
İkinci bir buton daha oluşturup aynı şekilde action deyip aşağıdaki kodu yapıştırın...
Daha sonra bu dosyanızı .swf olarak publish(yayınla) edin.
Artık flash ile olan işimiz bitti. Gelelim Ms Access'e hazırladığımız bu flash'ı yüklemeye.
İlk olarak formumuzun tasarım görünümde Activex Kontrol'dem Shackwave Flash Object nesnesini seçelim.
![[Resim: 55upm.jpg]](http://g1205.hizliresim.com/x/2/55upm.jpg)
Şimdide eklediğimiz nesneye swf dosyasını yükleyelim. Bunun için formun açıldğında olayına aşağıdaki kodu ekleyelim.
Son olarak flash ile access nesnelerine erişmek kaldı. Bunun için VBA sayfasını (kod sayfası) açıyoruz. Ve aşağıdaki kodu yapıştırıyoruz...
Evet işimiz bu kadar. Artık flasha eklemiş oldğumuz butonlar ile access'de mesaj yazdırabiliyoruz. Artık siz ister mesaj yazdırırsınız ister sinek yakalatırsınız
![[Resim: 55uvh.jpg]](http://g1205.hizliresim.com/x/2/55uvh.jpg)
Son olarak bu konuda bana fikir veren Sayın Berkant Öztürk ve Sayın furkan_68200 teşekkür etmek isterim.
Kalın sağlıcakla
Edit: Bir örnekte sitemizde varmış onu da ekliyorum... (Bu örnekte ise command yerinde args kullanılmış)
Access'in yeteri kadar görsel olmadığından şikayet ettiğim çok olmuştur. Daha görsel ve interaktif uygulamalar nasıl geliştirilebilir? Bu soruya cevap olması amacıyla araştırmalar yapmaktayım. İlk olarak arayüz üzerine çalışmalar yaptım. (Link1, Link2)
Yaklaşık iki gün önce ise bir sitede access nesnelerine (Formlar, Sorgular, ya da combobox, listbox...vs. ) erişimin sağlandığını gördüm. Açıkçası bu olaydan baya etkilendim. Tasarımlarımızın çok farklı boyutlar kazanabileceğini gördüm. Eğer bu örneğin nasıl yapıldığını keşfedersem, access'te yapılamayacak bir çok şeyi accessle yapabileceğimi farkettim.
Konunun sonunda 3 eklenti bulunmaktadır. Son eklenti benim burada yapılışını anlattığım eklentidir. Diğer ikisi ise yeryüzünde nadir bulunan ya da şimdiye kadar nadir bulunan iki örnek.
Lafı daha fazla uzatmadan flash ile access içinde nasıl kontrol sağlayabiliriz ona gelelim... (Bu örneği hazırlarken Adobe Flash Professional CS5 programını kullandım. Bu benim ilk flash deneyimim oldu. Flash vb programlar hakkında hiç bir bilgim yok. Bu yüzden tasarımlarımla dalga geçmeyin
Artık bu konuda kendimi zenginleştirme vakti... )Artık lafı fazla uzatmıcam söz... Başlıyorum
Flash programı içinde bir buton oluşturun... Daha sonra butonun üzerinde sağ tıklayın. "Action" seçeneğini seçin ve aşağıdaki kodu yapıştırın.
Visual Basic
- on (release) {
- fscommand("Bir");
- }
İkinci bir buton daha oluşturup aynı şekilde action deyip aşağıdaki kodu yapıştırın...
Visual Basic
- on (release) {
- fscommand ("İki");
- }
Daha sonra bu dosyanızı .swf olarak publish(yayınla) edin.
Artık flash ile olan işimiz bitti. Gelelim Ms Access'e hazırladığımız bu flash'ı yüklemeye.
İlk olarak formumuzun tasarım görünümde Activex Kontrol'dem Shackwave Flash Object nesnesini seçelim.
Şimdide eklediğimiz nesneye swf dosyasını yükleyelim. Bunun için formun açıldğında olayına aşağıdaki kodu ekleyelim.
Visual Basic
- Private Sub Form_Open(Cancel As Integer)
- Me.ShockwaveFlash0.Movie = Me.Application.CurrentProject.Path & "\Untitled-5.swf"
- Me.ShockwaveFlash0.Play
- End Sub
Son olarak flash ile access nesnelerine erişmek kaldı. Bunun için VBA sayfasını (kod sayfası) açıyoruz. Ve aşağıdaki kodu yapıştırıyoruz...
Visual Basic
- Private Sub ShockwaveFlash0_FSCommand(ByVal command As String, ByVal args As String)
- Select Case command
- Case Is = "Bir"
- MsgBox "1. Butona Tıklandı"
- Case Is = "İki"
- MsgBox "2. Butona Tıklandı"
- End Select
- End Sub
Evet işimiz bu kadar. Artık flasha eklemiş oldğumuz butonlar ile access'de mesaj yazdırabiliyoruz. Artık siz ister mesaj yazdırırsınız ister sinek yakalatırsınız
Son olarak bu konuda bana fikir veren Sayın Berkant Öztürk ve Sayın furkan_68200 teşekkür etmek isterim.
Kalın sağlıcakla
Edit: Bir örnekte sitemizde varmış onu da ekliyorum... (Bu örnekte ise command yerinde args kullanılmış)
