كپي فايل [بایگانی] - برنامه نویس

غلامرضا شریفی

دوشنبه 06 اردیبهشت 1389, 17:25 عصر

سلام من در برنامه ام يك فايل را روي ديسكت ذخيره ميكنم اين عمل معمولا طول ميكشد حال ميخواهم هنگام كپي پنجره اي كه هنگام كپي در ويندوز مراحل كپي را نمايش ميدهد را همزمان با كپي من نمايش داده شود متشكرم

spring69

دوشنبه 06 اردیبهشت 1389, 20:08 عصر

سلام.
این برنامه این کار رو انجام میده.
البته خود پنجره ویندوز رو نمایش نمیده بلکه خودش یه progress bar نشون میده که پیشرفت عملیات رو نشون میده.
امیدوارم برات مفید باشه.

غلامرضا شریفی

شنبه 11 اردیبهشت 1389, 18:02 عصر

از لطف شما سپاسگزارم
من متاسفانه نتوانستم اين برنامه را مشابه سازي كنم و يكجوري براي برنامه خودم مشابه سازي كنم همچنان منتظر كمك شما هستم ودر صورت امكان برنامه فوق را ساده سازي نمايد

غلامرضا شریفی

یک شنبه 12 اردیبهشت 1389, 11:37 صبح

اين كد رو در msdn پيدا كردم فقط نمي توانم filenames را چطور جايگزين كنم

ProgressBar1.Visible = True
ProgressBar1.Minimum = 1
ProgressBar1.Maximum = filenames.Length
ProgressBar1.Value = 1
ProgressBar1.Step = 1
Dim x As Integer
For x = 1 To filenames.Length - 1
If CopyFile(filenames(x - 1)) = True Then
ProgressBar1.PerformStep()
End If
Next x

iman_me

یک شنبه 12 اردیبهشت 1389, 20:41 عصر

از این استفاده کن

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
My.Computer.FileSystem.CopyFile("فایل مبدا", "فایل مقصد", FileIO.UIOption.AllDialogs)
End Sub

غلامرضا شریفی

دوشنبه 13 اردیبهشت 1389, 17:12 عصر

دوست عزيز آقاي ايمان كد شما يك فايل را كپي ميكند من ميخواهم همراه كپي فايل ProgressBar يا پنجره كپي ويندوز فعال شود كه ميزان پيشرفت را نمايش دهد

iman_me

دوشنبه 13 اردیبهشت 1389, 20:31 عصر

دوست عزیز من فهمیدم شما چی میخواهید این کد پنجره خود ویندوز رو نشون میده

غلامرضا شریفی

چهارشنبه 15 اردیبهشت 1389, 20:41 عصر

آقاي ايمان جواب شما صحيح بود من عجله كرده بودم متشكر