Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
12/02/2013 21:58
Konu Sahibi
159288
Yorumlar
2
Okunma
1642
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

159288

Üye
Kullanici Avatari
Üye
A.... Z.... Y....
1
1
12/02/2013
0
Ankara
Ofis 2010
11/03/2013,15:42
Çözüldü 
Acces Programında Hocam Benden Birşey İstedi Nasıl Yapabilirim
Türkiyedeki illeri secip o illerdeki okulları bulabilen okulun adını secip ara butonuna bastığında google'da kactane arama sayfası bulduğunu yazıcak ve okulun adı seciliyken başka bir butona bastığında google mapsda yerini gösterecek birşey yapıcakmışım lütfen yardımlarınızı eksik etmeyin Şimdiden Teşekkürler









+rep HELP +rep


Cevapla

simendifer


Kullanici Avatari
Altın Üye
E.... Ç....
892
30/10/2008
324
Çankırı
emekli
Ofis 2007
Dün,00:03
Çözüldü 
kusura bakmayın degerli forum üyeleri böyle bir ödevi hocalar ögrecilerinden nasıl isteyebiliyor aklım ermiyor
acaba bu hocamız enaz 6 tane işlem istemiş bunun hangisini ögrencilerine göstermiş ögretmiş de istiyor bu istediğin bir tanesini acaba o ögretmen bu ögrenciye ögretmişmidir bunu merak ediyorum
forumda örnekleri var aratınız ben arattım bu link teki hasanögretmen arkadaşımızın programını ekliyorum inceleyiniz
Türkiye Haritasını kullanarak Şehir seçimi
bu programı isteginize göre düzenleyebilirsiniz takıldıgınız yerde örneginizi ekleyerek yardım talebinde bulununuz


Ek Dosyalar
.rar   Harita.rar (Dosya Boyutu: 127,57 KB / İndirme Sayısı: 0)
Cevapla

esrefigit

Aktif Üye
Kullanici Avatari
Aktif Üye
598
30/10/2008
359
Konya
Ofis 2003
03/08/2017,11:47
Çözüldü 
öncelikle projenin tamamını yaptırmayı bekleme sana örnek olarak bakanlığın https://mebbis.meb.gov.tr/KurumListesi.aspx

sitesinden okulların ismini alma kodunu ekliyorum tabi kodun sadece il ve ilçe isimlerini alma kodu sonrasında formu submit ederek okul isimlerini getirecek ve bu isimleri parse edeceksin ve kendi formundaki açılan kutuya ekleyeceksin parse ile ilgili sitede bir çok arkadaş sana yardımcı olacaktır sonra formuna bir adet webrowser activex ekleyecek ve okul isimlerinden tıkladığını neyse sen o aşamaya bir gel sana google haritalar ve google arama seçmeli olarak nasıl yapılır ben yardım ederim


Function ilal()

Dim objShell, objIE As Object
Dim Html As HTMLDocument
Dim elc As HTMLHtmlElement
Dim sel As HTMLSelectElement
strURL = "https://mebbis.meb.gov.tr/KurumListesi.aspx"
Set objShell = CreateObject("Wscript.Shell")
Set objIE = CreateObject("InternetExplorer.Application")
With objIE
.Visible = False
.Navigate (strURL)
Do While .ReadyState <> 4
DoEvents
Loop
With .Document.Form1

For Each sel In .Document.Form1.ddlil
Açılan_Kutu2.AddItem sel.Index & ";" & sel.Text
Next

End With

Do While .Busy: DoEvents: Loop
Do While .ReadyState <> 4: DoEvents: Loop



End With




Set objIE = Nothing
Set objShell = Nothing
Exit Function
End Function




Private Sub Açılan_Kutu2_AfterUpdate()
Açılan_Kutu5.RowSource = ""
Dim objShell, objIE As Object
Dim sel As HTMLSelectElement
strURL = "https://mebbis.meb.gov.tr/KurumListesi.aspx"
Set objShell = CreateObject("Wscript.Shell")
Set objIE = CreateObject("InternetExplorer.Application")
With objIE
.Visible = True
.Navigate (strURL)
Do While .ReadyState <> 4
DoEvents
Loop
With .Document.Form1

.ddlil.Value = Me.Açılan_Kutu2.Column(0)
.submit
End With

Do While .Busy: DoEvents: Loop
Do While .ReadyState <> 4: DoEvents: Loop

For Each sel In .Document.Form1.ddlilce
Açılan_Kutu5.AddItem sel.Index & ";" & sel.Text
Next

End With




Set objIE = Nothing
Set objShell = Nothing

End Sub

Private Sub Form_Load()
ilal
End Sub


meşhur çin atasözü  "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Yardım : Tablodaki Bir Verinin Combobox İle Secilerek Tutarının Gösterilmesi orba 2 91 18/09/2017, 04:55 orba
Çözüldü Sürekli Formda Kayıt Girdisi Üstte Olması Yardım... bilservisci 13 365 28/08/2017, 01:42 bilservisci
Çözüldü Seçime göre alt seçim listeleme (İl / İlçe benzeri) mharman 10 737 26/05/2017, 14:21 atoz112
Çözüldü Formdan Çıkıldığında Metin Kutularını Temizlenmesi Hk. Yardım sadooo 20 1.092 11/05/2017, 22:59 sadooo
Çözüldü İl İlçe kriter seçimine göre sorgulama Ferhat Çetin 6 549 10/05/2017, 03:51 ozanakkaya

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.