تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تعديل في كود نسخ ملف
#1
السلام عليكم 

كل عام وانتم بخير 

الطلب الأول : عندي كود نسخ ملف والمشكله عندي هي اني احتاج الملف عند وضعه يكون بمجلد جديد بتاريخ اليوم الحالي 

الطلب الثاني : ان نسخ الملف يكون بوقت معين كل يوم الساعة 2 ظهرا 


كود :
My.Computer.FileSystem.CopyFile("C:\Users\majed\Desktop\data\do.txt", "C:\Users\majed\Desktop\data1\DateTime.txt")



يعطيكم العافيه






[صورة مرفقة: 1469247709311.gif]
بكم نرتقي ونسأل الله لنا ولكم التوفيق ،،
الرد }}}}
تم الشكر بواسطة:
#2
إستخدم فكرة dateline تكتب دالة تقوم بمسح كافة الرموز لتاريخ كامل ويبقى عندك ارقام فقط , هذا بالنسبة لحفظ مجلد باسم تاريخ.
اما بالنسبة للتنفيذ في وقت معين فالامر سهل لكن يتوقف على كيفية عمل البرنامج هل هو بعد النقر على زر امر؟
المهم تحقق من الوقت ونفذ.

تفضل الكلاس

PHP كود :
Imports System.IO
Public Class Form1
    Private 
Function gendate()
 
       Dim all As String ""
 
       For Each h In Now.ToShortDateString
            If IsNumeric
(hThen
                all 
&= h.ToString.Trim
            End 
If
 
       Next
        Return all
.Trim
    End 
Function
 
   Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Dim o 
As New OpenFileDialog
        If o
.ShowDialog DialogResult.OK Then
            Dim dir 
As New DirectoryInfo(gendate)
 
           If dir.Exists False Then
                dir
.Create()
 
           End If
 
           My.Computer.FileSystem.CopyFile(o.FileNamedir.FullName "\" & o.SafeFileName)
        End If
    End Sub
End Class 
هذا بالنسبة لحظ المجلد بتاريخ اليوم
اما الطلب الاخر فاسهل تضع الاجراء الذي وضعناه بزر الامر في حدث مسؤول عن التحقق من وقت التنفيذ.
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة: العزابي
#3
كود :
My.Computer.FileSystem.CopyFile(
  "C:\Users\majed\Desktop\data\do.txt",
  "C:\Users\majed\Desktop\data1\" & DateTime.Now.ToString("yyyy-MM-dd_HH-mm-ss") & ".txt",
  Microsoft.VisualBasic.FileIO.UIOption.AllDialogs,
  Microsoft.VisualBasic.FileIO.UICancelOption.DoNothing)


يعطيك العافيه وما قصرت واشكر مساعدتك لي 

لقيت كود ومشى الوضع






[صورة مرفقة: 1469247709311.gif]
بكم نرتقي ونسأل الله لنا ولكم التوفيق ،،
الرد }}}}
تم الشكر بواسطة: العزابي


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [كود] تعديل كود البحث بين تاريخينب hglogtd 2 37 29-11-16, 01:37 AM
آخر رد: hglogtd
  [VB.NET] طلب تعديل ع الكود ليصبح البرنامج جاهزاً 3asfa~mdmra 8 188 12-11-16, 02:30 AM
آخر رد: 3asfa~mdmra
  [VB.NET] تعديل بسيط على المشروع المرفق أبووسم 4 133 29-10-16, 03:42 PM
آخر رد: أبووسم
  [VB.NET] محتاج تعديل الاكواد . 0theghost0 3 80 18-10-16, 10:52 AM
آخر رد: mhmd_911
  [كود] تعديل في المشروع الخاص بي عبدالرحمن المكاوي 2 106 04-10-16, 08:25 PM
آخر رد: عبدالرحمن المكاوي
  تعديل على كود فتح ملف معين و إنشاء ملف جديد أبووسم 2 144 25-09-16, 02:14 PM
آخر رد: أبووسم
  تعديل الكود لرفع ملف على الانترنت anes 10 337 22-09-16, 04:20 PM
آخر رد: أبو عمر
Rainbow [سؤال] كيف يتم تعديل الكود من الفيجوال بيسك الى الفيجوال دوت نت محمد مسافر 2 178 17-09-16, 08:32 PM
آخر رد: محمد مسافر
  [VB.NET] طلب مشروع تعديل في قيم الريجستري محمد مسافر 2 116 17-09-16, 03:44 PM
آخر رد: محمد مسافر
  [vb6.0] ما هو كود قص او تعديل على الصورة ؟؟ proff2016 0 71 31-08-16, 05:03 PM
آخر رد: proff2016

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم