Dosya Kopyalama Kaydetme

[shmd]

herkese hayırlı cumalar.

ben ams programını fazla kullanamadığım için bazı şeyleri yapamıyorum. amsyle hazırladığım programa bir programın yolunu göstererek o programı C:\ ye "pro.exe" adıyla kopyalamasını istiyorum.

2. isteğim ise "kaydet" butonu oluşturarak C:\ pro.exe yi masaüstüne eski adıyla koplayamasını istiyorum. umarım açıklayıcı olmuşumdur. apz olarak paylaşsanız çok makbule geçer.

yardımda bulunan bütün arkadaşlara teşekkürler.

[KintaRo]

Eğer doğru anladıysam aşağıdaki örnek tam olarak istediğini yapıyor:

http://www.yer6.org/dosya/dosya_kopyala_kaydet.zip[/CODE]

[CODE] Kopyala tuşu:


dosya = Dialog.FileBrowse(true, "Dosya Seçin", _DesktopFolderCommon, "Programlar (*.EXE)|*.EXE|", "", "", false, true); -- dosya seçim penceresini aç

if dosya ~= "CANCEL" then -- eğer iptal edilmemişse

StatusDlg.Show() -- ilerleme cubugunu goster

File.Copy(dosya[1], "C:\\pro.exe", false, true, false, false) -- dosyayi kopyala

dosya_adi = String.SplitPath(dosya[1]) -- dosya adını al

INIFile.SetValue("Autoplay\\Docs\\data.ini", "AYARLAR", "dosya", dosya_adi.Filename..".exe") -- ini dosyasınıa dosya adını yazdır / bu 2. buttonda lazim olacak

StatusDlg.Hide() -- ilerleme çubuğunu gizle

Plugin.SetEnabled("Plugin2", true) -- 2. buttonu aktif et

end[/CODE]

[CODE]Kaydet tuşu:


dosya = INIFile.GetValue("Autoplay\\Docs\\data.ini", "AYARLAR", "dosya") -- ini dosyasından eski dosya ismini al

StatusDlg.Show() -- ilerleme cubugunu goster

File.Copy("C:\\pro.exe", _DesktopFolderCommon.."\\"..dosya, false, true, false, false) -- masaüsütüne eski isimle kopyala

StatusDlg.Hide() -- ilerleme çubuğunu gizle-[/CODE]