Doküman kopyalama - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html) +--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html) +--- Konu Başlığı: Doküman kopyalama (/konu-dokuman-kopyalama.html) Sayfalar:
1
2
|
Doküman kopyalama - mustafa_atr - 26/01/2010 Selamlar, Accesste, hard disk üzerinde bulunan bir dokumanın, diskin başka bir dizinine kopyalanmasını nasıl sağlaya biliriz? Form üzerinden dokuman seçmeyi hallettim, ancak seçtiğim dokumanı kopyalamamı sağlayacak kodu bulamadım Cvp: Doküman kopyalama - Nurullah_Serdar - 26/01/2010 FileCopy yer, yeniyer yer dosyanın yeri yeni yer kaydedeceğin yer Cvp: Doküman kopyalama - Seruz - 26/01/2010 Dosya işlemlerini FileSystemObject nesnesini kullanarak yapabilirsiniz. Gerekli olan FileSystemEx.dll dosyasını indirip C:\Windows\System32 klasörüne kopyalamak ve VBA'de referans olarak mdb'ye eklemek gerekiyor. İlgili DLL dosyasını aşağıdaki konudan indirebilirsiniz. Dosya Arama Örneği (uzantısına göre) Örnek kullanımı ise şu şekilde: Kod:
Dim fs, fn_src, fn_des Cvp: Doküman kopyalama - Nurullah_Serdar - 26/01/2010 seruz hocam benim dediğim yöntem doğru değilmi. ben o kodla ağ üzerinden bile dosya kopyalayabiliyorum:S bu arada yeni dizin oluşturmak istersen If Dir( "C:\PBS", vbDirectory) = "" Then ' C sürücüsü içinde PBS klasörü yoksa MkDir "C:\PBS" ' C sürücüsü içinde bu klasörü oluştur End If bu kodları kullanabilirsin. Cvp: Doküman kopyalama - mustafa_atr - 26/01/2010 Seruz hocam söylediğiniz metodla işlem tamamdır ancak fn_des = "C:\YeniDosya.txt") Bu satırın sonundaki parantez fazla olmuş, onu silince çalıştı Nurullah hocam sizin metodu nasıl kullanacağımı tam olarak anlamadım İlginize teşekkürle Cvp: Doküman kopyalama - Nurullah_Serdar - 26/01/2010 Dim yer, yeniyer As String yer = "C:\deneme.txt" yeniyer = "D:\deneme.txt" FileCopy yer, yeniyer bu şekilde kullanılıyor |