چطوری یک فایل رو جای دیگه ای کپی کنیم ؟

[mahmood3d]

توی وی بی چطور میشه یک فایلی رو از یک جایی به جای دیگه ای کپی کرد ؟
در واقع من یه برنامه ای نوشتم و به وسیله یک بانک اطلاعاتی تغذیه میشه و می خوام امکان بک آپ گیری و برگرداندن بک آپ رو داشته باشه و هنگام بک آپ گرفتن، فایل بانک اطلاعاتی رو یک جای دیگه کپی کنه .

[VB.SOS]

اين يه مثاله كه اين كار رو با API ها انجام ميده

[maryamb]

من از این روش استفاده می کنم :

Dim fs As New FileSystemObject
v = App.Path & "\data\" & salmali & "\data.mdb"
fs.CopyFile App.Path & "\data\" & salghadim & "\data.mdb", v, True

البته باید قبلش از منوی refrences گزینه ی microsoft scripting runtime را فعال کنید.
( در اینجا ، v مقصد هستش و مسیر اول ، مبدا هست و در این تکه کد ، پایگاه داده رو از یه مسیر به مسیر دیگه کپی کردم.)

[mehdad.koulab]

سلام با استفاده از kernel32.dll
تعريف تابع در يك ماژول


Public Declare Function CopyFileA Lib "kernel32.dll" (ByVal lpExistingFileName As String,
ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long

بعد هم يه cmd بذار و


Private Sub Command1_Click()
A=CopyFileA( "C:\VB6.txt","D:\VB6.txt", 0)
End Sub