Forumun bir kısmı ziyaretçilere kapalıdır. Lütfen Giriş yapın ya da Kayıt Olun.

Sitemize Hoşgeldiniz.
Merhaba Değerli Ziyaretçimiz Forumumuza Yorum yapabilmek için üye olmanız gerekiyor. Zaten bir üyeyseniz Giriş Yapabilirsiniz.
Kayıt Sırasında belirteceğiniz e-posta adresinize aktivasyon maili gönderileceğinden lütfen geçerli bir e-posta adresi ile kayıt olunuz.
"Kullanıcı Adı"nızı ve "Şifre"nizi size gönderebilmemiz için, sitemize kayıt olurken kullanmış olduğunuz e-posta adresini lütfen aşağıdaki bölüme yazarak "Kullanıcı Adı ve Şifre İsteği" tuşuna basınız.

Duyurular
• AccessTr.neT Destek Ekibi Oluşturulacaktır. [Ayrıntılar]   • AccessTr.neT Online Kod Bankası İçin [Tıklayın]
• Özel Üye Olarak Siteye Destek Olmak İçin [Tıklayın]   • AccessTr.neT Site Kuralları. [Tıklayın]
Bu Site Ödev veya Program Yaptırma Sitesi Değildir. [Tıklayın]
Facebook Sayfamız Twitter Sayfamız FrendFeed Sayfamız Ana Sayfa
Mesaj önizleme  Konuyu Gönder 
sorgulama yardımı
02-07-2009, 21:59
Mesaj: #1
arkadaşlar sizinde gördüğünüz gibi çok basit bir program ama programda şöyle bir şey yapmak istiyorum haritadaki ilin üzerine tıklanınca ayrı bir form açılacak ve buradaki il kutusunda tıkladığım ilin adı çıkmış olacak böylece kullanıcıda hastaneyi seçerek listeleyebilecek.Bilmiyorum anlatabildimmi ama örneği incelerseniz mantığını anlarsınız yardım ederseniz çok sevinirim sevgiler herkese Img-grin


Konu Sahibi

Eklenti Dosyaları
.rar  mdata.rar (Boyut: 261.58 KB / İndirilme: 7)

egozyildiz, 27-06-2009 tarihinden beri AccessTr.neT üyesidir.
Bu mesaji bir cevapta alıntı yap
02-07-2009, 22:47
Mesaj: #2
Yapması biraz uzun sürebilir ama. Şehir isimleri "etiketler" ile yazılıp.
Her etiketede örnekteki gibi;
(Form2=haritadaki ilin üzerine tıklanınca açılacak form)
(Textsehir = şehir isminin yazılmasını istediğin textbox)

Private Sub EtiketBURSA_Click()
Forms!form2!Textsehir = "BURSA"
End Sub

yazabilirsin



makarax, 10-06-2009 tarihinden beri AccessTr.neT üyesidir.
(En son düzenleme: 02-07-2009 22:48 makarax.)
Bu mesaji bir cevapta alıntı yap
03-07-2009, 0:18
Mesaj: #3
Sayın makarax'ın yanıtı da doğrudur. Fakat aslında ben şöyle bir şey yapmak istedim. Etiketlere tıklayınca captionu okuyacak ve bu değeri açılacak olan formun iladı kısmına yapıştıracak bir kod yazmak istedim. Fakat her nedense kafamı toplayamadım. Bu nedenle ben size birkaç ile eklediğim kodu anlatayım.

1- Önce bir modül açıp içine global a değişkenini tanımladım

2- Harita üzerindeki şehir etiketlerine tıklatıldığında olayına

a = Etiket143.Caption
DoCmd.OpenForm "ilveri"

yazarak a değişkenime etiket üzerinde yazan il adının atanmasını, daha sonra da ilveri isimli formun açılmasını sağladım.

3- ilveri formunun yüklenmesi olayına

Me.cboŞEHİR = a
SetListBox Me.lstList, Me.[cboŞEHİR], Me.[cboHASTANE]

kodlarını ilave ettim.

Böylece haritadaki tıklanan il değeri açılan formdaki il alanında hazır geliyor. Bu arada kodlar güncellendiği için hastane isimleri de getiriliyor.

Bayiler için de aynı yöntemi uygulayabilirsiniz. Ben bir yandan tek kodla bu işi yapacak bir modül yazmayı sürdürüyorum. O bitene kadar bu kodu kullanabilirsiniz. Örnek çalışmada ADana-İstanbul-Konya ve İzmir yapıldı. Samsun ve Sinop da yapıldı ama veri tabanında hastane olmadığı için boş açılıyor.

Örnek ektedir. Kolay gelsin...

Bu arada böyle kaliteli bir soru için teşekkürler...




Eklenti Dosyaları
.rar  mdata_DEMİRAL.rar (Boyut: 241.41 KB / İndirilme: 15)

İki satırlık adamları musallat ettik ömrümüze
Bundandır böyle dibe vuruşumuz...
Bu mesaji bir cevapta alıntı yap
03-07-2009, 9:05
Mesaj: #4
Arşivimde bulunan ancak nereden indirdiğimi ve kime ait olduğunu hatırlamadığım bir Türkiye Haritası örneği gönderiyorum.

Bu sizin uygulamanıza uyarlanabilir diye düşünüyorum.

AccessTr.neT




Eklenti Dosyaları
.rar  Turkiye_Harita.rar (Boyut: 119.02 KB / İndirilme: 10)

Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Bu mesaji bir cevapta alıntı yap
03-07-2009, 9:40
Mesaj: #5
Evet, işte benim yapmak istediğim şeyin uygunlanmış hali.. Seruz'un eklediği örnekte o şekilde yapılmış.

Private Sub Ayrıntı_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim ctl As Control

For Each ctl In Me.Controls
If (ctl.Left < X And (ctl.Left + ctl.Width) > X) And _
(ctl.Top < Y And (ctl.Top + ctl.Height) > Y) Then
a = ctl.Name
End If
Next
ad.Value = a



İki satırlık adamları musallat ettik ömrümüze
Bundandır böyle dibe vuruşumuz...
Bu mesaji bir cevapta alıntı yap
03-07-2009, 9:59
Mesaj: #6
benim yaptığımda buydu aslında arkadaşlar yani il adlarını sonra ben tek tek ekledim aslında haritanın alt yapısı tamamiyle bu örnek tabloları dahi duruyor Img-grin ama oradaki isim çıkması olayının yanında tıklandığında diğer formda sayın demiralın düzenlediği şekli veremedim malesef birazkarıştı ortalık bende sade bir harita yapıp öyle koydum uygulamaya uygulamanın aslında tek önemli yeri bana göre harita ve harita üzerindeki illere tıklanınca çalışacak formlar gerisi tamamen basit işlemlerin yapıldığı formlar asıl önemli olan o haritayı editleyebilmek valla ben 2 gündür uğraşıyorum hatta son iller haritası örneğinide karman çorman ettim amacıma ulaşamadım:icon_rolleyes:Haritayı istediğiniz gibi kullanabilirsiniz arkadaşlar bir çok uygulamada çok işe yarar bence çok emek harcadım haritaya valla Icon_rolleyes
[emekleriniz için çok teşekkürler arkadaşlar burada olmak çok güzel sizlerin bilgilerinden faydalanmakat öyle tabiki


Konu Sahibi
egozyildiz, 27-06-2009 tarihinden beri AccessTr.neT üyesidir.
(En son düzenleme: 03-07-2009 10:01 egozyildiz.)
Bu mesaji bir cevapta alıntı yap
Mesaj önizleme  Konuyu Gönder 



"sorgulama yardımı" konusuna ait konu araçları
 Etiketler
 Konu Linki
 BBCode
 HTML Kodu

« Önceki Konu | Sonraki Konu »
Normal Mod | Çizgisel Mod
Ekle: Facebook Ekle: Google Ekle: Twitter Ekle: Stumbleupon Ekle: Del.icio.us Ekle: MySpace Ekle: friendfeed
Ekle: Yahoo Ekle: Reddit Ekle: linkedin Ekle: Digg Ekle: Technorati Ekle: live Ekle: Yahoo Buzz
Ekle: Mr. Wong Ekle: Linkarena Ekle: Furl Ekle: Spurl Ekle: Blinklist Ekle: Blogmarks Ekle: Diigo
 
Konuyu Değerlendir
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5

Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  film arşivi programı sorgulama kayhangulmez 9 171 24-02-2010 18:16
Son Mesaj: solomon35
  Tc no sorgulama ensar236 4 81 02-02-2010 14:33
Son Mesaj: ensar236
Wink Tabloları iliskilendirerek sorgulama yapmak umuttk 17 267 26-01-2010 17:37
Son Mesaj: benremix
  Menüden sorgulama formunu açmada hata kmercan2005 6 110 17-01-2010 3:15
Son Mesaj: sledgeab
  Şartlı Toplam Formülü Yardımı kursad05 4 172 17-01-2010 2:30
Son Mesaj: kursad05


super teklif

▲ En üste Dön Bize Ulaşın AccessTr.neT İçeriğe Dön Arşiv RSS Beslemesi Forumları Okundu İşaretle Forum Takımı Forum İstatistikleri

Coğrafya | Cazip Fikirler | TRFoRuMCuYuZ.CoM | timkon | Zumrut.Org | Akd Yazılım | blacxiyah-gel~gör~gitme | Aşk Şiirleri | ÖdevTurkiye.NeT | Google Rank Checker | MyBB Plugins | Karahan Online | Vizyon Filmler | Full Program | Link Değişimi |

MyBBDestek - MyBB Toplist Sayfaları, Dizinleri - MyBB Türkçe Destek Sitesi Valid XHTML 1.0 Transitional Valid CSS! Join 4Shared Now! TurkeyRank.Com - Pagerank Servisi Bodrum Bilişim