Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
24/11/2009 10:40
Konu Sahibi
akd
Yorumlar
4
Okunma
1969
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

akd

Aktif Üye
Aktif Üye
 Belirtilmemiş
274
04/11/2008
35
Gaziantep
Ofis 2003
07/05/2017,23:02
Çözüldü 
Merhaba arkadaşlar,
raporda resimleri alamıyorum,
en üstteki resim diğer kayıtlarada çıkıyor,
oysaki her resmin adresi ayrı,
ne yapabilirim?
İyi çalışmalar...


Ek Dosyalar
.rar   Resim.rar(Dosya Boyutu: 75,68 KB / İndirme Sayısı: 25)

Kullanici Avatari

Seruz

Uzman
Uzman
SE.... UZ....
 46
1.561
7
30/10/2008
814
Tekirdağ
BT Şefi
Ofis XP
04/07/2018,16:07
Çözüldü 
RsmAl fonksiyonunu RaporÜstBilgisi biçimlendirme olayında değil,
Ayrıntı'nın biçimlendirme olayında kullanmalısınız.

Kod:
Private Sub Ayrıntı_Format(Cancel As Integer, FormatCount As Integer)
    Call RsmAl
End Sub


Ek Dosyalar
.rar   AKD_Resim_Seruz.rar(Dosya Boyutu: 44,7 KB / İndirme Sayısı: 34)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs

Kullanici Avatari

akd

Aktif Üye
Aktif Üye
 Belirtilmemiş
274
04/11/2008
35
Gaziantep
Ofis 2003
07/05/2017,23:02
Çözüldü 
Çok teşekkür ederim sn seruz,
resim linki olmayanlarda, üstteki resim çıkıyor,
onu nasıl engelleriz?



Kullanici Avatari

Seruz

Uzman
Uzman
SE.... UZ....
 46
1.561
7
30/10/2008
814
Tekirdağ
BT Şefi
Ofis XP
04/07/2018,16:07
Çözüldü 
Aslında hata durumunda resmin boş gelmesi için kod var ancak nedense çalışmıyor.

Kod:
Me.cerceve.Picture = ""


Bu durumda ekli dosyada bulunan 2 tane jpeg'i hata durumlarında kullanarak, daha iyi bir yöntem uygulanabilir.

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub RsmAl()
On Error GoTo akd
    If Not IsNull([Resim]) Then
        Me.cerceve.Picture = [Resim]
    Else
        Me.cerceve.Picture = "D:\Resim\ResimYok.Jpg"
    End If
Exit Sub
akd:
    If Err = 2220 Then
        Me.cerceve.Picture = "D:\Resim\ResimHatali.Jpg"
    Else
        MsgBox Err.Description, vbExclamation
    End If
End Sub


Ek Dosyalar
.rar   AKD_Resim_Seruz2.rar(Dosya Boyutu: 16,84 KB / İndirme Sayısı: 36)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs

Kullanici Avatari

akd

Aktif Üye
Aktif Üye
 Belirtilmemiş
274
04/11/2008
35
Gaziantep
Ofis 2003
07/05/2017,23:02
Çözüldü 
Çok çok teşekkür ederim sayın seruz...




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Formda Resim Ekleme mharman 5 563 19/07/2018, 12:22
Son Yorum: delichon
Çözüldü Otomatik Resim getirme kusvam 22 5.379 19/07/2018, 12:04
Son Yorum: öğrenmeklazım
Çözüldü Worde Aktarmada Resim Olmadığında Hata murat dikme 2 114 22/06/2018, 14:04
Son Yorum: murat dikme
Çözüldü Formda Resim Yoksa Hata Sorunu fascioğlu 11 245 31/05/2018, 16:45
Son Yorum: fascioğlu
Çözüldü Farklı Veritabanından Forma Veri Alma. cevahir1 5 220 21/05/2018, 14:51
Son Yorum: cevahir1

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.