+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مساعده في كود نسخ المجلد بمحتوياته (/showthread.php?tid=3993)
مساعده في كود نسخ المجلد بمحتوياته - محمد سلمان - 07-10-14
السلام عليكم ورحمة الله وبركاته
أخواني العزاء
أرجوا منكم مساعدتي في ايجاد كود لنسخ مفلات من مجلد إلى مجلد أخر
RE: مساعده في كود نسخ المجلد بمحتوياته - سعود - 07-10-14
تفضل المثال
تم تعديل الموضوع وتم ارفاق المثال
RE: مساعده في كود نسخ المجلد بمحتوياته - hassan - 07-10-14
(07-10-14, 12:33 AM)محمد سلمان كتب : السلام عليكم ورحمة الله وبركاته
أخواني العزاء
أرجوا منكم مساعدتي في ايجاد كود لنسخ مفلات من مجلد إلى مجلد أخر
الي عطاك الاخ سعود التحميل حقة معطوب
فهذا الكود باختصار
PHP كود :
My.Computer.FileSystem.CopyDirectory("مسار الملف الذي تريد نسخة", "مسار الصق", True)
وشكرا
RE: مساعده في كود نسخ المجلد بمحتوياته - محمد سلمان - 07-10-14
شكرا لكم أخواني العزاء
هل يمكن جعل البروقرس بار يتتعبى على حسب النقل جربت دا الكود بس بيحمل البروقرس بار بعد ما ينفل
My.Computer.Audio.Play("click.wav")
Dim a, b As String
a = (TextBox1.Text)
b = (TextBox2.Text)
My.Computer.FileSystem.CopyDirectory(a, b, True)
With ProgressBar1
.Minimum = 1
.Maximum = 100000
.Value = 1
.Step = 1
For i As Integer = .Minimum To .Maximum
.PerformStep()
Next i
End With
MsgBox("done")
ProgressBar1.Visible = False
RE: مساعده في كود نسخ المجلد بمحتوياته - سعود - 07-10-14
شوف المثال اللي اعطيتك الرابط الخاص به حدثت الموضوع.