Skip to main content

AccessTr.neT


texte girilen resmi çağırma

texte girilen resmi çağırma

Çözüldü #1
[Resim: 4507.jpg]
resimdeki gösterdiğim şekilde nasıl yapabilirim bu bütün metin kutuları için geçerli
Son Düzenleme: 08/01/2009, 17:08, Düzenleyen: alemciler.
Cevapla
Çözüldü #2
Private Sub Form_Current()
Resimkutusu1.Picture = "C:\Belgelerim\Sayılar\" & Me.Text1 & ".JPG"
End Sub


Pardon Text e giriş yapıpda çağırmak için
Text1 in AfterUpDate() özelliğine aynı kodu yazınız...
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Son Düzenleme: 08/01/2009, 17:47, Düzenleyen: Puletin.
Cevapla
Çözüldü #3
form açıldığı anda veriler otomatik olarak tablodan çekiliyor yani texte elle bir veri girişi olmuyor form başlangıcında textde var olan veriyi kullanacağım
-----------------------------------
birde texte bulunan yazı diyelimki 22.jpg ve klasörde o resim yok resim yoksa boş çıkmasını nasıl sağlarız bu verdiğin kod gayet güzel çalıştı teşşekkürler yardımın için yani klasörün içeriğini bi şekilde yönetmem gerekli yardımlarınızı bekliyorum
Son Düzenleme: 08/01/2009, 21:25, Düzenleyen: alemciler.
Cevapla
Çözüldü #4
sn alemciler, örnek ekleyebilirmisin ?
"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
Çözüldü #5
yukarıdaki resimde gösterdiğim gibi form var 6 tane text var bu textlerde rakamlar var tablodan alıyorum rakamları yapmak istediğim şey
Private Sub Form_Current()
Resimkutusu1.Picture = "C:\Belgelerim\Sayılar\" & Me.Text1 & ".JPG"
End Sub
burdaki kodu kullanarak resimleri çağırmak ama klasörde eğer texteki rakamın diyelimki 33 klasörde 33.jpg yoksa resimkutusu1.picture="resim bulunamadı" gibi birşey istiyorum
Cevapla
Çözüldü #6
Dir komutu ile dosyanın olup olmadığını If yapısı ile kontrol edin eğer dosya yoksa belirttiğiniz gibi bir yazı göstersin ya da sizin şimdiki avatarınız gibi Resim Yok yazan bir resim göstersin. Eğer o dosya varsa resimi göstersin.

Arama kutusunda TXT diye aratın benim eklemiş olduğum bir konu var ondaki dosyayı indirip kodları inceleyin.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da