+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] تغير اسم ملف (/showthread.php?tid=23863)
تغير اسم ملف - محمد اسماعيل - 15-02-18
عندي ملف رسائل بحفظة ببرنامج عندي لتعديل علية
اسم الملف يظهر بالشكل التالي
SMS١٥٠٢٢٠١٨
عايز اسم الملف يبقي SMS -١٥-٠٢ -٢٠١٨
RE: تغير اسم ملف - طالب برمجة - 16-02-18
فكرة مشابهة
[ تمّ الحل ] : إضافة التّاريخ و التّوقيت
RE: تغير اسم ملف - محمد اسماعيل - 16-02-18
(16-02-18, 02:28 AM)طالب برمجة كتب : فكرة مشابهة
[ تمّ الحل ] : إضافة التّاريخ و التّوقيت
مش قصدي كدة الطريقة دية تسمية الملف بتاريخ الان انا عايز نفس التاريخ الي سحبتة من الملف مش عايز اغير التاريخ بتاريخ دلوقتي
انا حاولت بدالة Insert ولكن لم استطع تغير كل البيانات هحتاج اكتر من متغير الطريقة مش مظبوطة معايا
RE: تغير اسم ملف - طالب برمجة - 16-02-18
مفهمتش
انت قلت اسم الملف يظهر بالشكل SMS١٥٠٢٢٠١٨ وعايز اسم الملف يبقي SMS -١٥-٠٢ -٢٠١٨
ولم افهم شرحك الاخير بخصوص السحب من الملف
هل تقصد ان اسم الملف سبق تسميته وتريد تعديله؟
RE: تغير اسم ملف - محمد اسماعيل - 16-02-18
(16-02-18, 03:20 PM)طالب برمجة كتب : مفهمتشنعم هذا ما اريد لان الملف سبق تسميتة من داخل الموبايل
انت قلت اسم الملف يظهر بالشكل SMS١٥٠٢٢٠١٨ وعايز اسم الملف يبقي SMS -١٥-٠٢ -٢٠١٨
ولم افهم شرحك الاخير بخصوص السحب من الملف
هل تقصد ان اسم الملف سبق تسميته وتريد تعديل
استخدمت الكود التالي ولكنة بدائي جدا اريد كود ابسط منة
كود :
Dim str As String = dirname
Dim str1 As String = ""
Dim str2 As String = ""
Dim str3 As String = ""
Dim str4 As String = ""
Dim str5 As String = ""
For i = 0 To str.Length
If i = 2 Then
str1 = str.Insert(3, " ")
End If
If i = 4 Then
str2 = str1.Insert(6, "-")
End If
If i = 6 Then
str3 = str2.Insert(9, "-")
End If
If i = 10 Then
str4 = str3.Insert(14, " ( h ")
End If
Next
TextBox2.Text = str4RE: تغير اسم ملف - طالب برمجة - 16-02-18
PHP كود :
Dim fn As String = "SMS١٥٠٢٢٠١٨"
fn = Regex.Replace(fn, "(\w+)(\d{2})(\d{2})(\d{4})", "$1 $2-$3-$4")
MsgBox(fn)
RE: تغير اسم ملف - محمد اسماعيل - 16-02-18
(16-02-18, 09:25 PM)طالب برمجة كتب :PHP كود :
Dim fn As String = "SMS١٥٠٢٢٠١٨"
fn = Regex.Replace(fn, "(\w+)(\d{2})(\d{2})(\d{4})", "$1 $2-$3-$4")
MsgBox(fn)
اعزك اللّة وابعد عنك كل مكروة
فعلا هذا هو طلبي