مرحبا
انا كنت عاوز اعمل new folder واسمه يكون التاريخ والوقت فى مسار معين
زى كدة
Dim PntDte As String
PntDte = Date.Now
Directory.CreateDirectory("C:\backup\" & Date.Now & "")ولكن يوجد خطأ فى هذا الكود ولا اعرف الحل أرجو الافادة
تحياتى
مرحبا
انا كنت عاوز اعمل new folder واسمه يكون التاريخ والوقت فى مسار معين
زى كدة
Dim PntDte As String
PntDte = Date.Now
Directory.CreateDirectory("C:\backup\" & Date.Now & "")ولكن يوجد خطأ فى هذا الكود ولا اعرف الحل أرجو الافادة
تحياتى
قال رسول الله صلى الله عليه وسلم
يكبر بن أدام ويكبر معه شيئان كثرة المال وطول العمر
صدق رسول الله صلى الله عليه وسلم
قال عمر بن الخطاب رضي الله عنه
نحن قوم أعزنا الله بالإسلام فإذا إبتغينا العزة فى غيره أذلنا الله
مرحبااااااا
وجدت حل ولكنه لا يفى بالغرض
If Not System.IO.Directory.Exists("c:\backup") Then Directory.CreateDirectory("c:\backup")حيث اننى اريد تسمية الفولدر بالتاريخ والوقت
تحياتى
قال رسول الله صلى الله عليه وسلم
يكبر بن أدام ويكبر معه شيئان كثرة المال وطول العمر
صدق رسول الله صلى الله عليه وسلم
قال عمر بن الخطاب رضي الله عنه
نحن قوم أعزنا الله بالإسلام فإذا إبتغينا العزة فى غيره أذلنا الله
عزيزي الكود عندك صحيح
لكن المشكلة في نظام التشغيل
فـ نظام التشغيل لا يقبل مسمى المجلدات والملفات ان يدخلها اي من العلامات التالي ( / * ؟| ... إلخ
جرب بنفسك ان تسمي المجلد بهذا الاسم 1/8/2007 8:55:42 AM
ستلاحظ ان نظام التشغيل يقوم بتحويلة تلقائياً إلى 182007 85542 AM
لعمل ماتريد غير الفورمات للتاريخ للشكل المطلوب لديك
Issa84 كتب:عزيزي الكود عندك صحيحلكن المشكلة في نظام التشغيل
فـ نظام التشغيل لا يقبل مسمى المجلدات والملفات ان يدخلها اي من العلامات التالي ( / * ؟| ... إلخ
جرب بنفسك ان تسمي المجلد بهذا الاسم 1/8/2007 8:55:42 AM
ستلاحظ ان نظام التشغيل يقوم بتحويلة تلقائياً إلى 182007 85542 AM
لعمل ماتريد غير الفورمات للتاريخ للشكل المطلوب لديك
مرحبا
وهل من حل لتسمية المجلد كالاتى
1-8-2007 8-55-42 AM
بدلا من
1/8/2007 8:55:42 AM
انها تعمل ولكن ما الكود الذى يستبدل ( - ) بال ( / ) و( : ) وايضا يحتوى على التوقيت بالظبط
ارجو الافادة
تم تعديل هذه المشاركة بواسطة cdcase في 8 يناير 2007 في 19:39
قال رسول الله صلى الله عليه وسلم
يكبر بن أدام ويكبر معه شيئان كثرة المال وطول العمر
صدق رسول الله صلى الله عليه وسلم
قال عمر بن الخطاب رضي الله عنه
نحن قوم أعزنا الله بالإسلام فإذا إبتغينا العزة فى غيره أذلنا الله
صحيح عزيزي نظام التشغيل لا يتقبل هذه الصيغ في تسمية الملفات
ساحاول ان اجرب طريقه لاستبداال \ بالرمز - كما اردت و اذا توصلت الى نتيجه سابلغك
وشكرا

السلام عليكم
كما نوه الاخوة عليك, استبدل الرموز الممنوعة برموز مسموحة.
Try
Directory.CreateDirectory( _
"C:\backup\" & Format(Date.Now, "dd-MM-yyyy HH-mm-ss"))
MsgBox("backup done successfully..")
Catch ex As Exception
MsgBox(ex.Message)
End Tryموفق إن شاء الله.
في المثال يتضح المقال
الغملاسي كتب:السلام عليكمكما نوه الاخوة عليك, استبدل الرموز الممنوعة برموز مسموحة.
Try Directory.CreateDirectory( _ "C:\backup\" & Format(Date.Now, "dd-MM-yyyy HH-mm-ss")) MsgBox("backup done successfully..") Catch ex As Exception MsgBox(ex.Message) End Tryموفق إن شاء الله.
كما قلت اخى فى المثال يتضح المقال جزاك الله خير
لقد نجح بالفعل
شكرا لك وللاخوة
Dark C0de
Issa84
على مساعدتى وزادكم الله من علمه
تحياتى
قال رسول الله صلى الله عليه وسلم
يكبر بن أدام ويكبر معه شيئان كثرة المال وطول العمر
صدق رسول الله صلى الله عليه وسلم
قال عمر بن الخطاب رضي الله عنه
نحن قوم أعزنا الله بالإسلام فإذا إبتغينا العزة فى غيره أذلنا الله
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…