03-03-19, 02:10 PM
جزاك الله الف الف خير
+1
[مشروع] مثال للتعامل مع ملف XML كقاعدة بيانات
|
03-03-19, 02:10 PM
جزاك الله الف الف خير
+1
تم الشكر بواسطة: elgokr , elgokr , ابراهيم ايبو
07-03-19, 01:08 PM
بارك اله فيك وجعلة الله في ميزان حسناتك -- وجاري العمل على المشروع لتحويله الى 2010 ان شاء الله.
Dim x As Integer
For x = 1 To 100 ("الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَ")MsgBox Next x تم الشكر بواسطة: elgokr , ابراهيم ايبو , ابراهيم ايبو
08-03-19, 02:27 PM
(آخر تعديل لهذه المشاركة : 08-03-19, 02:46 PM {2} بواسطة EYADISMAIL.)
السلام عليكم ..
واجهتني بعض الاخطاء الصغيرة وهي كود : imgstr = ImageToString(PictureBox1.Image) ---------------------------------------------------------------------------------------------------------------------------------- وجدت ما الخطا هنا لقد قمت بوضع كود (Function) الذي في الاسفل في كلاس جديد (Class1) وعند نقل هذا الفنكشن الي نفس الفورم وهو فورم 1 اختفت المشكلة...^^! كود : 'كود تحويل الصورة إلى سلسلة نصية base64 والعكس : تبقى هذه المشكلة الصغيرة كود : imgstr = ImageToString(PictureBox1.Image) Dim x As Integer
For x = 1 To 100 ("الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَ")MsgBox Next x تم الشكر بواسطة: ابراهيم ايبو
08-03-19, 02:43 PM
ضيف هذه الأسطر :
كود : Private Function ImageToString(img As Image) As String أيضا في اعلا الصفحة تعرف المتغير : كود : Dim imgstr As String = ""
يا رحمن الدنيا والآخرة ورحيمهما
تم الشكر بواسطة: EYADISMAIL , elgokr , ابراهيم ايبو
08-03-19, 02:57 PM
(آخر تعديل لهذه المشاركة : 08-03-19, 03:37 PM {2} بواسطة حريف برمجة.)
(08-03-19, 02:43 PM)حريف برمجة كتب : ضيف هذه الأسطر : تسلم يداك ---- بارك الله فيك .... المشروع مرفق المرحلة الاولي (اضافة - تعديل - حذف ) على الفيجوال بيسك 2010 --- والمرحلة الثانية جاري تتبع شرح مشرفنا وسيتم ارفاق المشروع كامل عند الانتهاء منه ان شاء الله
Dim x As Integer
For x = 1 To 100 ("الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَ")MsgBox Next x تم الشكر بواسطة: حريف برمجة , elgokr , ابراهيم ايبو
08-03-19, 03:37 PM
(آخر تعديل لهذه المشاركة : 08-03-19, 03:39 PM {2} بواسطة حريف برمجة.)
تم تنقيح مثالك أخي إياد إسماعيل وإكمال الناقص ووضعه في المشاركة الأولى ،،
شكراً وجزاك الله خير
يا رحمن الدنيا والآخرة ورحيمهما
تم الشكر بواسطة: elgokr , ابراهيم ايبو , ابراهيم ايبو
08-03-19, 04:14 PM
(08-03-19, 03:37 PM)حريف برمجة كتب : تم تنقيح مثالك أخي إياد إسماعيل وإكمال الناقص ووضعه في المشاركة الأولى ،، بارك الله فيك ... وجزاك الله كل خير عني وعن الجميع --- Dim x As Integer
For x = 1 To 100 ("الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَ")MsgBox Next x تم الشكر بواسطة: elgokr , ابراهيم ايبو , ابراهيم ايبو
08-03-19, 06:10 PM
(آخر تعديل لهذه المشاركة : 08-03-19, 09:02 PM {2} بواسطة EYADISMAIL.)
السلام عليكم-- تحية لمشرفنا (حريف برمجة)
تحديث ( تم تعديل المشروع الان كما في شرح "حريف برمجة" 100%) XMLApp - 2010--100%.rar (الحجم : 836.66 ك ب / التحميلات : 26) اكملت المشروع مع التنسيق 98% مشكلة صغيره جدا وهي عدم ظهور الصورة في التقارير لا اعرف السبب قمت بمراجعة الخطوات على ما اعتقد تمام .. المشروع في المرفقات.... Dim x As Integer
For x = 1 To 100 ("الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَ")MsgBox Next x تم الشكر بواسطة: elgokr , ابراهيم ايبو , ابراهيم ايبو
08-03-19, 08:30 PM
(08-03-19, 06:10 PM)EYADISMAIL كتب : الصورة موجوده وظاهرة ولكن في صفحة رقم 2 ،، صغّر الأعمدة أو قم بتعديل الهامش للتقرير كالتالي :
يا رحمن الدنيا والآخرة ورحيمهما
تم الشكر بواسطة: EYADISMAIL , elgokr , elgokr , ابراهيم ايبو
08-03-19, 08:45 PM
فعلا "حريف برمجة"
تسلم يداك.. ..جعلك الله من الذين ينظرون إلى وجهه الكريم.. Dim x As Integer
For x = 1 To 100 ("الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَ")MsgBox Next x تم الشكر بواسطة: elgokr , elgokr , ابراهيم ايبو , ابراهيم ايبو
|
|