Skip to main content

AccessTr.neT


Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog

Vb Filecopy Sürücüde Aynı Dosyanın Kontrolü ve commondialog

Çözüldü #1
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.

.rar Yedek2.rar (Dosya Boyutu: 1,6 KB | İndirme Sayısı: 9)
|By|KiDnArUt|, 07-05-2010 tarihinden beri AccessTr.neT üyesidir.
Son Düzenleme: 19/06/2011, 03:39, Düzenleyen: |By|KiDnArUt|.
Cevapla
Çözüldü #2
Ö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
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ı ?

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.
File.Exists(DosyaAdı)

VB Bilen Arkadaşlar Daha Etkili Yardımcı Olacaktır...Saygılar
[Resim: do.php?imgf=153931671719921.gif]

-->.Net İle Kullanıcı Girişi, Üye Ol, Şifre Değiştirme
-->CSS İle Menü Hazırlama
Cevapla
Çözüldü #3
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.

Private Sub Form_Load()
Dosya = Dir(' C:\AUTOEXEC.BAT' )
If Dosya = ' ' Then
MsgBox ' Dosya Bulunmuyor!'
Else
MsgBox ' Dosya Bulundu!'
End If
End Sub

ALINTIDIR
[Resim: do.php?imgf=153931671719921.gif]

-->.Net İle Kullanıcı Girişi, Üye Ol, Şifre Değiştirme
-->CSS İle Menü Hazırlama
Cevapla
Çözüldü #4
Çok Teşekkür ederim ben C deki dosya ismi ile karşılaştırma yapıyormuşum sürekli LolD 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
|By|KiDnArUt|, 07-05-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #5
Konu neden çözlenlere taşındı anlamadım ??
|By|KiDnArUt|, 07-05-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #6
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)
|By|KiDnArUt|, 07-05-2010 tarihinden beri AccessTr.neT üyesidir.
Son Düzenleme: 20/06/2011, 21:29, Düzenleyen: |By|KiDnArUt|.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da