Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > Diğer Yazılımlar > Yazılım ve Donanım
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Yazılım ve Donanım Yazılım ve Donanım konuları ve diğer kullanıcılara tavsiye etmek istediğiniz programların açıklamaları.

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 04-01-2018, 21:13   #1
asri
Altın Üye
 
Giriş: 24/04/2005
Şehir: Istanbul
Mesaj: 2,556
Excel Vers. ve Dili:
Office 2016 TR 64 Bit
Varsayılan Milyonlarca dosyayı yıl_ay klasörlerine taşıma gruplama

efatura ile ilgili windows /temp altında biriken milyonlarca dosyayı erişilebilir hale getirmek için bir kaç gündür çalışıyorum.

Aşağıdaki şekilde bir kod hazırladım. Örnek kodlardan bunu oluşturmak bile karışık bir durumdu. Batch file i sadece copy için kullanınca böyle oluyor

Sonuç olarak milyonlarca dosyayı 2017_02 şeklinde yıl ve ay olarak dosya değiştirilme tarihine göre ayrı klasörlerde gruplamak isterseniz aşağıdaki kodları kullanabilirsiniz.

src kaynak klasör, dest dosyaların taşınacağı ana klasör.
Alt klasörleri desteklemez.

Milyonlarca dosya olduğunda tek bir bat dosyası belli bir süre sonra, saniyede 100 lerce dosya kopyalaması gerekirken, bir kaç saniyede bir dosya taşıyacak durumu geliyor.

Bu yüzden taşıma yapan bat dosyasını her 1000 taşımadan sonra kapatıp yeniden açacak dongu.bat dosyası hazırlandı.

20 sn de bin dosya taşıma ile dahada hızlanacaktır.
Ayrıca ekran durağan durmasın diye sayıcı eklendi.

Taşıma işlemi olması için dongu.bat dosyasını çalıştırınız.


Dongu.bat

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
rem @echo off
:yeniden
  start /wait call tasi.bat
  goto :yeniden
pause
tasi.bat

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
@echo off
setlocal enableextensions enabledelayedexpansion

    set "src=P:\EFATURAWEBSRV\2017fat"
    set "dest=P:\EFATURAWEBSRV\tarihli"
    set /a z=0
    for %%F in ("%src%\*") do (
      echo "%%~tF"
      set /a z+= 1
      echo !z!
      if !z! EQU 1000 goto :son     

      for /F "tokens=1-4 delims=/. " %%A in ("%%~tF") do (
          rem echo %%C_%%B
          if not exist "%dest%\%%C_%%B" mkdir "%dest%\%%C_%%B"
          move "%%~fF" "%dest%\%%C_%%B"
      )
    )
:son
endlocal
exit
__________________
www.asriakdeniz.com - İş yoğunluğu nedeni ile uzunsüreli OFFLINE

Bu mesaj en son " 21-01-2018 " tarihinde saat 19:35 itibariyle asri tarafından düzenlenmiştir....
asri Çevrimdışı   Alıntı Yaparak Cevapla
Eski 04-01-2018, 21:23   #2
uKiGS
Altın Üye
 
Giriş: 03/03/2008
Mesaj: 133
Excel Vers. ve Dili:
2013 ingilizce
Varsayılan

Güzel bir çalışma olmuş yarın deneyeceğim kesinlikle

Emeğinize sağlık
uKiGS Çevrimdışı   Alıntı Yaparak Cevapla
Eski 04-01-2018, 21:57   #3
asri
Altın Üye
 
Giriş: 24/04/2005
Şehir: Istanbul
Mesaj: 2,556
Excel Vers. ve Dili:
Office 2016 TR 64 Bit
Varsayılan

Alıntı:
uKiGS tarafından gönderildi Mesajı Görüntüle
Güzel bir çalışma olmuş yarın deneyeceğim kesinlikle

Emeğinize sağlık
Her zaman olduğu gibi yedek almadan denemeyin.
Yada en azından bir iki aylık ayrı bir klasöre kopyalayıp sonucu görün sonra asıl verilerde deneyin.
__________________
www.asriakdeniz.com - İş yoğunluğu nedeni ile uzunsüreli OFFLINE
asri Çevrimdışı   Alıntı Yaparak Cevapla
Eski 04-01-2018, 22:05   #4
Ömer BARAN
Uzman
 
Giriş: 08/03/2011
Şehir: ANKARA / İSTANBUL
Mesaj: 10,255
Excel Vers. ve Dili:
Office 2013 TÜRKÇE
Varsayılan

Merhaba.

Ben de konuyla ilgili arkadaşlara denemelerini önereceğim.
Amme hizmeti görmek böyle oluyor işte, tebrik ve teşekkürler Sayın AKDENİZ.
.
__________________
.
☾✭ İnadına TÜRKÇE ✭☽

-- Sorunuzu, gerçek belgenizle aynı yapıda ve olması gereken sonuçların elle yazıldığı örnek belge ile destekleyiniz.
-- ALTIN ÜYELİK öneriyorum. / FORUM KURALLARInı mutlaka okuyunuz.
-- ALTIN ÜYE olmayanlar, örnek belgeyi dosya.tc, dosyaupload.com gibi bir siteye yükleyip, belgeye erişim adresini verebilir.
-- Özel mesaj ile soru sormayınız. / Geri bildirimde bulunulmayan cevaplarımı siliyorum.
Ömer BARAN Çevrimdışı   Alıntı Yaparak Cevapla
Eski 04-01-2018, 22:31   #5
cobraturca
 
Giriş: 04/01/2018
Şehir: istanbul
Mesaj: 3
Excel Vers. ve Dili:
2003 türkçe
Varsayılan

teşekkürler
cobraturca Çevrimdışı   Alıntı Yaparak Cevapla
Eski 05-01-2018, 07:35   #6
asri
Altın Üye
 
Giriş: 24/04/2005
Şehir: Istanbul
Mesaj: 2,556
Excel Vers. ve Dili:
Office 2016 TR 64 Bit
Varsayılan

Ben teşekkür ederim arkadaşlar,

Herkese gerekli bir konu değil ama ihtiyacı olanlar için kullanışlı bir durum.
Dün akşam programı çalıştırmıştım hala gruplama devam ediyor.

tüm yıl_ay klasörleri oluşmuş içlerini dolduruyor. Bitmesi biraz daha zaman alacak. Ancak bittiğinde rahat bir şekilde dosya arayıp inceleyebileceğimi bilmek güzel
__________________
www.asriakdeniz.com - İş yoğunluğu nedeni ile uzunsüreli OFFLINE
asri Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-01-2018, 19:34   #7
asri
Altın Üye
 
Giriş: 24/04/2005
Şehir: Istanbul
Mesaj: 2,556
Excel Vers. ve Dili:
Office 2016 TR 64 Bit
Varsayılan

Güncelleme:

Milyonlarca dosya olduğunda tek bir bat dosyası belli bir süre sonra, saniyede 100 lerce dosya (dosya boyutu kb ise) kopyalaması gerekirken, bir kaç saniyede bir dosya taşıyacak durumu geliyor. Sanırım ilgili bat dosyası için gecici bellek ile iligili bir sorun oluşuyor.

Bu yüzden taşıma yapan bat dosyasını her 1000 taşımadan sonra kapatıp yeniden açacak dongu.bat dosyası hazırlandı.

Taşıma işlemi olması için dongu.bat dosyasını çalıştırınız.

20 sn de bin dosya taşıma ile dahada hızlanacaktır.
Ayrıca ekran durağan durmasın diye sayıcı eklendi.
__________________
www.asriakdeniz.com - İş yoğunluğu nedeni ile uzunsüreli OFFLINE
asri Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 13:06


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım -- Beylikdüzü mali müşavir - Beylikdüzü mali müşavir - Lingerie - Dyeing Machine - Karton Bardak- Karton Bardak- Çorlu Dil Konuşma Terapisti- Çorlu Dil Konuşma Terapisti- Çorlu Konuşma Terapisti- Çorlu Konuşma Terapisti- Çorlu Özel Eğitim- Site Yönetimi- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Çorlu- Çorlu Araç Takip- Rampa- Çorlu İnternet Sitesi- Çorlu Sürücü Kursu- Şişli Avukat- Çorlu Etüt- İstanbul Botanik- Çorlu Sigorta- Kağıt Bardak- Kağıt Bardak- Çorlu Havuz- Çorlu Havuz- Çorlu Perde Yıkama- Okul Danışmanlık- ADR'li taşıma kabı imalatı- Mekanik Tesisat- Çorlu Grafik Tasarım- Çorlu Sondaj- Çorlu Etüt- Futbol Cafe- Beylikdüzü Temizlik- Çorlu Kurs- Çorlu Ders- İzmit Mimar- Hurda Bakır Kablo- Hurda Bakır Kablo- Çorlu Pronet- Çorlu Yönetim- Çorlu Apartman Yönetimi- Çorlu Marangoz- Çorlu Avukat-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden