[VBA] Uzantısı değişmeden sadece adını değiştirerek dosyayı kopyalama
#1
Merhaba Arkadaşlar

Accesste formunda bir butona tıklayarak açılan gözat pençeresinden bilgisayarımdaki seçeceğim herhangi bir dosyanın adını KayıtID numarası ile değiştirip daha önceden belirlediğim bir klasöre kopyalamak istiyorum ama bunu yaparken dosyanın adı değişsin fakat uzantısı neyse seçtiğim dosyanın aynı kalsın istiyorum

Malesef böyle bir örnek veya kod bulamadım
şuan dosyayı seçip istediğim yere kopyalatım adını değiştiriyorum ama uzantıyıda yazmak zorunda kalıyorum buda aşağıdaki bütün uzantılar için ayrı bir buton demek

Örnek : deneme.pdf ise 150001.pdf
Örnek : deneme.xls ise 150001.xls
Örnek : deneme.avi ise 150001.avi
Örnek : deneme.ppt ise 150001.ppt
Örnek : deneme.pptx ise 150001.pptx
Örnek : deneme.doc ise 150001.doc
Örnek : deneme.doxc ise 150001.docx
Örnek : deneme.mpg ise 150001.mpg

yardımlarınızı bekliyorum teşekkürler

çalışmamı örneğini ekliyorum C dizinine deneme diye bir klasör açmanız yeterli


Eklenti Dosyaları
.rar   deneme.rar (Boyut: 84,79 KB / İndirilme: 62)



  Alıntı
Bu mesajı beğenenler:
#2
selam
Office 2003 olduğundan konuyu inceleyemedim
örneğinizi 2003 olarak çevirin yada sadece kodlarınızı ekleyin

bu şekilde form üyelerinin bir kısmı konu hakkında görüş bildirebilir buda zaman kaybı demek




  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  öğrenci Takip (sadece Tablo) accessbonkörü 1 226 05-01-2026, 20:40
Son Mesaj: dsezgin
  [VBA] Birden çok Seçenek Seçili Alandaki Verileri Kopyalama evidi 9 630 26-02-2025, 17:36
Son Mesaj: evidi
  [FORM] Sadece Alt Formun Kaydedilmesi TheREDROSE 1 277 22-08-2024, 03:00
Son Mesaj: dsezgin
access-sql-18 [RAPOR] Kayıt Içerisindeki Miktar Alanındaki Sayı Kadar Rapora Ilgili Kaydı Rapora Kopyalama gurolk 12 935 29-07-2024, 12:01
Son Mesaj: dsezgin
  Aktarım Yaparken Dosya Adını Değiştirme zimbit 4 474 04-02-2024, 00:42
Son Mesaj: zimbit
  [FORM] Pdf Içerik Kopyalama Ve Yapıtırma orderyazbim 2 532 26-10-2023, 15:39
Son Mesaj: serdem48
  Sadece Geçerli Kayıtta Kenarlık Rengi Değiştirme Hk. adnnfrm 25 1.585 13-09-2023, 00:00
Son Mesaj: halily
access-sql-18 [VBA] Veritabanları Arası şartlı Tablo Kopyalama BeyTor 5 595 22-07-2023, 00:29
Son Mesaj: dsezgin

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar):