Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Ürün Seçimine Göre Resim Ekleme

akdemir1
akdemir1
Access Cevaplanmış Soruları
20
6127

Ürün Seçimine Göre Resim Ekleme

Çözüldü #19
akdemir1
Aktif Üye
akdemir1
Bul
Aktif Üye
Adı Soyadı: TU.... SI....
Yaşı: 48
Konum: Erzurum
Ofis Versiyonu: Ofis 2010 64 Bit
Son Oturumu: 28/05/2023,12:14
Yorumları: 249
Konuları: 45
Kayıt Tarihi: 05/06/2011
Teşekkür Puanı: 11
Mesleğiniz: Yönetici
ekledim hocam
.rar akdemir1.rar (Dosya Boyutu: 105,96 KB | İndirme Sayısı: 14)
HAYAT BİR SINAVSA,,,
ADIMI YAZAR ÇIKARIM..
.
Cevapla
Çözüldü #20
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Dün,22:42
Yorumları: 13.543
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
Açılan Kutu0'ın güncelleştirme sonrasında olayındaki kodları aşağıdaki ile değiştir.

Private Sub Açılan_Kutu0_AfterUpdate()

On Error Resume Next

Me.T_GIRIS_alt_formu.Requery

Me.T_GIRIS_alt_formu.Form.Refresh

Me.ResimYolu = Me.Açılan_Kutu0.Column(2)



If IsNull(Me.Açılan_Kutu0) Or Me.Açılan_Kutu0 = "" Then

Me.Komut195.Visible = False

Me!Cerceve.Picture = ""

Else

Me.Komut195.Visible = True

Me!Cerceve.Picture = Me!ResimYolu

End If

End Sub
Cevapla
Çözüldü #21
akdemir1
Aktif Üye
akdemir1
Bul
Aktif Üye
Adı Soyadı: TU.... SI....
Yaşı: 48
Konum: Erzurum
Ofis Versiyonu: Ofis 2010 64 Bit
Son Oturumu: 28/05/2023,12:14
Yorumları: 249
Konuları: 45
Kayıt Tarihi: 05/06/2011
Teşekkür Puanı: 11
Mesleğiniz: Yönetici
Aynen uyguladım hocam sorun çözüldü.
Emeğinize saglık,
Atoz112 hocamada ilgisinden dolayı sonsuz teşekkür ederim.

Saygılarımla..
HAYAT BİR SINAVSA,,,
ADIMI YAZAR ÇIKARIM..
.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task