[shado1796]

@@أبورائد@@ كتب :
السلام عليكم ورحمة الله وبركاته





وما علاقة الأوامر التي بالصورة بحفظ الصور في قاعدة البيانات عطل هذه الأوامر لأن لا أراها منطقية نهائيا





السلام عليكم ورحمة الله وبركاته

اخي هذا في المثال الذي اعطاني احد الاخوه في المنتدى ،،،

[سعود]

Easy 4ever كتب :جميل ، جدا
انا فعلا لم أحمل المثال لأن لفت نظري اللون الأسود وفي مشاركه لك سابقا ذكرت بإضافة صوره إفتراضيه > متسرع

سأقوم بتجربت مثالك إن شاء الله يشتغل معي

هههههههههههههههههههه كلنا متسرعين لكن الم تقرا dim byt as new byte هذه عوضا عن الصورة الغير موجودة

[سعود]

اخي شادو ركز بمثالي (دعاية) .. لكن من جد المثال الاخير ممتاز

[shado1796]

سعود كتب :طيب اخوي shado مادامك تريد تحفظ عدد كبير من الصور لما لاتستخدم الربط المباشر اقصد نفس مثالي يتم حفظ كافة صور بتنسيق محدد من مجلد محدد..اليس اسهل؟ قصدي ان تغير الفكرة

[COLOR="#FF0000"]
خلاص انت ارفقت لي مثاال رااائع مثلك الله يجزاك الف خير ،،، لكن لفت انت انتباهي ،، هل في قواعد SQl Server تنتهي حجمها في حجم محدد ،، انا عندما قرأت وقررت اغير قاعدة بياناتي من الاكسس الى SQL قرأت انها لا تنتهي ،،،، فهل اذا تم حفظ صور كثيره تؤثر على SQl ،،، لانه المشروع الي اعمله راح يتم استخدامه للعمر
،،، راح اجرب مثالك في مشروعي ،،، اشكرك مره اخرى
[/COLOR]

[سعود]

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

[shado1796]

اخي انا لاحظت شئ في مشروعك هو انه اذا حفظت صوره ،، واردت مره اخرى ان اجرب حفظ صوره يظهر خطأ ،،،

[سعود]

ساجرب ..باذن الله لكن ارفع صورة للخطا

[سعود]

اهاااااااااا الخطا ماله علاقة بالحفظ هو لازم اصفر الـ progressbar بعد الانتهاء

[Easy4ever]

فكره إضافة ( 0x00 ) في الحقول الفارغه هل ستأثر في العرض :confused:

[@@أبورائد@@]

السلام عليكم ورحمة الله وبركاته




هذا مثال لكود حفظ صورة من مربع صورة على أساس نوع حقل الصورة image وهو يعمل لدي بشكل سليم
جرب تعمل فورم جديد وفيه مربع صورة واحد وجرب وعلى أساسه تعرض المشكلة التي عندك

PHP كود :

Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click

        Dim sql As String = "INSERT INTO Persons ( [name], date, photo ) VALUES ( @name, GETDATE(), @photo ) "

        Dim comm As New SqlClient.SqlCommand(sql, conn)
        comm.Parameters.AddWithValue("@name", Me.txtName.Text.Trim)
        comm.Parameters.AddWithValue("@photo", IIf(IsNothing(Me.pctPhoto.Image), imgToByte(New Bitmap(1, 1)), imgToByte(Me.pctPhoto.Image)))

        conn.Open()
        comm.ExecuteNonQuery()
        conn.Close()

    End Sub 


السلام عليكم ورحمة الله وبركاته