کپی فایل

[amir_h251]

چگونه میتوان یک فایل را در یک پوشه درون شبکه که دارای username و password میباشد، کپی کرد؟ (با فرض اینکه username و password) معلوم باشند. ممنون می شم کمکم کنید.

[ali_habibi1384]

سلام . توی شبکه رو نمیدونم چطوری میشه ولی این کد رو امتحان کردم توی ویندوز معمولی میشه شاید به دردت بخوره:


Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
Private Sub Form_Load()

CommonDialog1.DialogTitle = "Choose File"
CommonDialog1.CancelError = False
CommonDialog1.ShowOpen

CopyFile CommonDialog1.FileName, "C:\ff.bmp", 0
CopyFile CommonDialog1.FileName, "C:\ff.jpg", 0
CopyFile CommonDialog1.FileName, "C:\ff2.jpg", 0
CopyFile CommonDialog1.FileName, "C:\ff", 0
End Sub

این یک مثال عملی هستش .

[ebrahimhoze]

میتونی از تابع هم استفاده نکنی خود filecopy توی ویژوال بیسیک معرفی هستش از زیر شاخه های information