Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Visual Basic 6 (https://accesstr.net/forum-visual-basic-6.html) +--- Forum: Visual Basic 6 Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-6-cevaplanmis-sorulari.html) +--- Konu Başlığı: Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog (/konu-vb-filecopy-surucude-ayni-dosyanin-kontrolu-ve-commondialog.html) Sayfalar:
1
2
|
Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog - |By|KiDnArUt| - 19/06/2011 Selamlar şimdiden teşekkür ederim yardımcı olacak arkadaşlara Küçük bir yedekleme işlemi yapmak istiyorum copyalama işlemini gerçekleştiriyorum her yedeklemede sistem tarihine göre yapıyor 1. dosyayı copyalayıp yedeklediginde sistem tarihi adını alıyor bu uzantı sorunu yaşatırmı ? 2. aynı isimde yedekleme oldugunda nasıl kontrol edebilirim sistem c den d ye kopyalama yaptıgımda d yi nasıl kontrol edebilirim 3. kopyalama işlemi bittiginde kontrol için kopyalama yaptıgım alanı açıp işlemin gerçekleşip gerçekleşmedigini nasıl göre bilirim Yardımcı olursanız sevinirim, örnek ektedir. Cvp: Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog - ~~KaG~~ - 19/06/2011 Öncelikle Söyleyim Ben .NET Kullanıyorum. Ve Örneğini İnceleyemedim. Alıntı:Küçük bir yedekleme işlemi yapmak istiyorum copyalama işlemini gerçekleştiriyorum Burada Ne Demek İstediniz Anlamadım. .NET de Dosya Var mı Yok mu Diye Kontrol Ettirmek İçin Aşağıdaki Kodu Kullanılıyor. Bundan Esinlenerek Kendine Göre Değiştirebilirsin.
VB Bilen Arkadaşlar Daha Etkili Yardımcı Olacaktır...Saygılar Cvp: Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog - ~~KaG~~ - 19/06/2011 Alıntı:2. aynı isimde yedekleme oldugunda nasıl kontrol edebilirim sistem c den d ye kopyalama yaptıgımda d yi nasıl kontrol edebilirim Bu Sorunuz İçin, Visual Basic'teki Dir fonksiyonunu kullanarak bulabilirsiniz. Nasıl mı? Sadece istediğiniz dosya ismini bu fonksiyona atamanız ve dönen sonucu değerlendirmeniz yeterli olacaktır. Dönen değer boş bir değişken ise (' ' ) dosya belirttiğiniz yerde bulunmuyor demektir.
ALINTIDIR
Cvp: Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog - |By|KiDnArUt| - 19/06/2011 Çok Teşekkür ederim ben C deki dosya ismi ile karşılaştırma yapıyormuşum sürekli D dosyanın varolup olmadıgını, bu çözüldü Dim dosya, trh As String trh = Date dosya = Dir("d:\" + trh) If dosya = "" Then FileCopy Text1.Text, Text2.Text MsgBox " Kopyalama İşlemi Gerçekleşti", vbInformation, "Tebrikler" Else MsgBox " Aynı Dosya Zaten Bulunmakta", vbInformation, "UYARI !!!" End If End Sub 1. ve 2. madde kaldı 1. maddede dosyayı kopyalarken yedeğin hangi gune ait oldugunu görmek için sistem tarihini veriyorum (date) burda bu şekilde kopyalama yaptıgımda dosyanın uzantısında sorun olurmu acaba 3. maddede ise kopyalam işlemi bittiginde kopyalanan konumu açmak istiyorum görmek için tekrardan çok teşekkür ederim Cvp: Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog - |By|KiDnArUt| - 19/06/2011 Konu neden çözlenlere taşındı anlamadım ?? Cvp: Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog - |By|KiDnArUt| - 20/06/2011 Sorun Çözülmüştür Öncelikle bu işlemi gerçleştirebilmek için kullanmamız gereken Api yi formun general kısmına ekliyoruz. Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Const SW_SHOWNORMAL = 1 ' buda sabitimiz oluyo.. öncelikle formumuza bir textbox ve bir command buton ekliyoruz. aşağıdaki koduda command butonun altına yapıştırıyoz.. Call ShellExecute(Me.hwnd, "open", trim(text1.text), "", "", SW_SHOWNORMAL) |