Skip to main content

AccessTr.neT

Kayıt Ol

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

Forma Resim Ekleme, Kopyalama ve Arşivleme

ercansahin
ercansahin
Access Örnekleri ve Uygulamaları
41
26179

Forma Resim Ekleme, Kopyalama ve Arşivleme

#16
ercansahin
BlackEagle
ercansahin
Bul
Uzman
Adı Soyadı: Er.... ŞA....
Yaşı: 49
Konum: Bursa
Ofis Versiyonu: Ofis 2010 32 Bit
Son Oturumu: 16/03/2024,00:04
Yorumları: 3.764
Konuları: 69
Kayıt Tarihi: 14/11/2008
Teşekkür Puanı: 1.089
Silmek için tıklandığında da aynı sorun meydana gelmekte, yani ilk kayda dönmektedir. Bunun içinde Sil düğmesinin kodunu,
Kod:
Private Sub ResimSil_Click()
If Me.ResimCercevesi.Picture = "(Yok)" Then
  MsgBox "Silinecek Dosya Bulunamadı"
Else
  Dim kayit As Integer
  kayit = Me.sno
  Kill CurrentProject.Path & "/resim/" & Me.adi_soyadi.Value & "-" & Me.tcno & ".jpg"
  Me.Requery
  DoCmd.GoToRecord acForm, "bilgiler", acGoTo, kayit
End If
End Sub
şeklinde değiştirmeyiliz.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: Forma Resim Ekleme, Kopyalama ve Arşivleme - Yazar: ercansahin - 26/04/2010, 20:01
Task