(24-06-19, 06:02 PM)ابو خليل99 كتب :

السلام عليكم 

الرجاء المساعدة في افضل طريقة لحفظ الصورة من PictureBox1 

استخدم الكود التالي 

كود :

PictureBox1.Image.Save("D:\1.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)

الكود يعمل بشكل جيد ولكن انا اريد لو كانت الصورة رقم 1 موجودة يقوم بحفظ الصورة برقم 2 وهكذا 

وهل من الممكن ان يكون الاسم هو تاريخ حفظ الصورة بالساعة والدقيقة والثانية حتي لا يتكرر الاسم ؟؟؟ 

(24-06-19, 06:27 PM)سامي محمد كتب :

(24-06-19, 06:02 PM)ابو خليل99 كتب :

السلام عليكم 

الرجاء المساعدة في افضل طريقة لحفظ الصورة من PictureBox1 

استخدم الكود التالي 

كود :

PictureBox1.Image.Save("D:\1.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)

الكود يعمل بشكل جيد ولكن انا اريد لو كانت الصورة رقم 1 موجودة يقوم بحفظ الصورة برقم 2 وهكذا 

وهل من الممكن ان يكون الاسم هو تاريخ حفظ الصورة بالساعة والدقيقة والثانية حتي لا يتكرر الاسم ؟؟؟ 

 

كود :

Dim i As Integer = 1
        Do While IO.File.Exists("D:\" & i & ".jpg")
            i += 1
        Loop
        PictureBox1.Image.Save("D:\" & i & ".jpg", System.Drawing.Imaging.ImageFormat.Jpeg)

وان كنت تيد  حفظها بالتاريخ

كود :

  PictureBox1.Image.Save("D:\" & Now & ".jpg", System.Drawing.Imaging.ImageFormat.Jpeg)

(24-06-19, 07:07 PM)سامي محمد كتب : هو المشكلة ا اخ خليل ان تسمية الملفات لاتقبل بعض الرموز ولكن الحل الافضل هو استبدال الرموز برمز مقبول في التسمية مثل ـ

كود :

  Dim M As String = System.Text.RegularExpressions.Regex.Replace(Now.ToString, "\D", "_")

استبدل الــ I بــ M

(24-06-19, 06:02 PM)ابو خليل99 كتب :

السلام عليكم 

الرجاء المساعدة في افضل طريقة لحفظ الصورة من PictureBox1 

استخدم الكود التالي 

كود :

PictureBox1.Image.Save("D:\1.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)

الكود يعمل بشكل جيد ولكن انا اريد لو كانت الصورة رقم 1 موجودة يقوم بحفظ الصورة برقم 2 وهكذا 

وهل من الممكن ان يكون الاسم هو تاريخ حفظ الصورة بالساعة والدقيقة والثانية حتي لا يتكرر الاسم ؟؟؟ 

(24-06-19, 08:35 PM)wared كتب :

(24-06-19, 07:07 PM)سامي محمد كتب : هو المشكلة ا اخ خليل ان تسمية الملفات لاتقبل بعض الرموز ولكن الحل الافضل هو استبدال الرموز برمز مقبول في التسمية مثل ـ

كود :

  Dim M As String = System.Text.RegularExpressions.Regex.Replace(Now.ToString, "\D", "_")

استبدل الــ I بــ M

(لست مبرمج VB.NET)

يمكن عمل التاريخ بشكل نص مقبول كإسم ملف بتحويله بـ ToString

كود :

Dim M As String = Now.ToString("yyyy-MM-dd HHmmss")

(25-06-19, 12:09 AM)حريف برمجة كتب :

(24-06-19, 06:02 PM)ابو خليل99 كتب :

السلام عليكم 

الرجاء المساعدة في افضل طريقة لحفظ الصورة من PictureBox1 

استخدم الكود التالي 

كود :

PictureBox1.Image.Save("D:\1.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)

الكود يعمل بشكل جيد ولكن انا اريد لو كانت الصورة رقم 1 موجودة يقوم بحفظ الصورة برقم 2 وهكذا 

وهل من الممكن ان يكون الاسم هو تاريخ حفظ الصورة بالساعة والدقيقة والثانية حتي لا يتكرر الاسم ؟؟؟ 

هذا الكود ما يتكرر :

كود :

TextBox1.Text = DateTime.Now.ToFileTime.ToString + ".png"