Skip to main content

AccessTr.neT


Butonla klasör açmak

Butonla klasör açmak

Çözüldü #1
Arkadaşlar form üzerindeki bir butonla yine aynı formaki bir alanın değeriyle aynı adı taşıyan bir klasörü açtırmak istiyorum. Açtırmak istediğim klasörün yolu belli.
Örneğin;
C:..../Belgelerim/[formdaki alanın değeri]

Bu klasörü açtırabilirmiyiz? Tabiiki Access içinde değil. Normal Microsoft explorer ekranında.

Yardımlarınız için şimdiden teşekkür ederim.
Cevapla
Çözüldü #2
Amaç yeni bir pencerede klasör yolunu açtırmaksa bununla ilgili bir örnek hazırladım. Klasörü dosya seçim penceresi gibi açtırmak ve içinden bir dosyayı seçmek istiyorsanız da forumumuzdaki uygulamalar bölümümüzü incelemenizi tavsiye ediyorum. Bu ikisi de değilse, lütfen biraz daha açıklayıcı olun. Ne yapmak istediğinizi biraz daha anlatın. Kolay gelsin...
.rar KlasorAc.rar (Dosya Boyutu: 7,69 KB | İndirme Sayısı: 325)
NZ Fonksiyonunun (İşlevinin) Ayrıntılı Anlatımı İçin Tıklayın...
DSum ve Sum Fonksiyonunun (İşlevinin) Ayrıntılı Anlatımı İçin Tıklayın...
DLookup Fonksiyonunun (İşlevinin) Ayrıntılı Anlatımı İçin Tıklayın...
Cevapla
Çözüldü #3
Bu örnek tam sorumun cevabıdır. eni bir pencerede klasörü açtırmak.

Çok teşekkür ederim. Ellerinize sağlık.
Cevapla
Çözüldü #4
arkadaşlar kolay gelsin,
internet explorer ile bir form üzerindeki değeri database'in bulunduğu klasör içinde bulunan başka bir klasöre aktararak ie da açtırmanın kodunu aşağıda yazdım.ancak bu klasörü önceden yaratmam gerekiyor,eğer hedef klasörde formdaki değer adında bir klasör bulunmuyorsa ie hata veriyor.
ie ye hata verdirmeden eğer protokol numarasıyla eşleşen klasör bulunmuyorsa,"bu isimde klasör bulunmuyor,yeni yaratmak istermisiniz" mesajını koduma nasıl ekleyebilirim ve yeni klasörü otomatik olarak nasıl açtırabilirim.
şimdiden teşekkürler,iyi çalışmalar

Dim ekocan As String
Dim altan As String
Dim bute As String
Dim aa As String
Dim baglan As String
Dim r As String
Dim t As String

ekocan = Form_HASTAMASTERFM.PROTOKOL.Value
aa = "a"
altan = StrReverse(CurrentDb.Name)
bute = Trim(Mid(altan, 13))
baglan = StrReverse(bute)

Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE " & baglan & aa & "\" & ekocan & "", vbMaximizedFocus
vetaltan 16-11-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #5
Alıntı:MkDir CurrentProject.path & "\ekocanklasor"

kodu ile veritabanının bulunduğu dizine ekocanklasor isimli klasör eklenir.

Ayrıca kullanıcı adınız vetaltan olarak değiştirilmiştir.
Cevapla
Çözüldü #6
verdiğiniz bilgi çok yararlı oldu,teşekkür ederim.sorunsuz çalışıyor.
bir sorum daha olacaktı,access içersinde takvim nasıl yaratırım,randevu defteri olarak kullanmak istiyorum.yada;microsoft mounthwiev control ile microsoft outlook u gerçek zamanlı olarak birbirine bağlayabilirmiyim.
teşekkürler
vetaltan 16-11-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task