[سؤال] عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183) +--- الموضوع : [سؤال] عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة (/showthread.php?tid=3620) |
عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - 0theghost0 - 10-08-14 السلام عليكم كثير من المواقع التي قمت بتسجيل عندهم ولكن لايخبروني مكان الخطأ او التعديل السليم للكود دائما يقولون لي عليك بأن تبحث وتتعلم ولكن هم لايعلمون كثير ما ابحث واسأل حتى اني اوقات اتصل ببعض المبرمجين ليعطوني او يدرسوني بمبلغ مادي لكن للاسف المبرمجين ليس لديهم وقت للدريسي او تعليمي لذا فكرت اني ابحث واحاول اني اطور نفسي في عالم البرمجة لان هذا طموحي على ماوصلت لهذا المستوى الضئيل من البرمجة لدي صديقي خبير في البرمجمة ووضيفته في البرمجة فيجوال بيسك لكن الان هو سوف يكمل دينه بإذن الله ولا اعتقد انه راح يكون فاضي لي : الان اضعكم مع هذا الكود : اريد ان يقرأء لي الصورة من access 2013 الى البرنامج هذا هو الكود : Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged Try Dim myMS As New IO.MemoryStream Dim dt As New DataTable cmd.Connection = dbConnect() cmd.CommandText = "Select * from PcGame where Game_Name = '" & ComboBox1.Text & "'" dr = cmd.ExecuteReader While dr.Read() DateTimePicker1.Value = dr("Game_Release").ToString TextBox2.Text = dr("Game_Rating").ToString TextBox3.Text = dr("Game_Developed").ToString TextBox4.Text = dr("Game_Published").ToString TextBox5.Text = dr("Game_Genres").ToString TextBox6.Text = dr("Game_Price").ToString Gamepic.Text = dr("Game_Pic").ToString End While dr.Close() Me.Gamepic.DataBindings.Add(New Binding("Image", "PcGame.Game_Pic", True)) Catch ex As Exception MessageBox.Show(ex.Message, "Read Error", MessageBoxButtons.OK, MessageBoxIcon.Error) End Try End Sub اتمنى مساعدتي في هذا البرنامج فقط لدي هذة المشكلة واذا واجهتني مشكلة ثانية راح اتقدم وبكل سرور في وضع مشكلتي عندكم ليتم خدمتي بشكل صحيح RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 10-08-14 وعليكم السلام ... شوف المشاركة هنا http://vb4arb.com/vb/thread-3604.html قسم المشاريع به عدد جيد من الامثلة. RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - 0theghost0 - 12-08-14 اخي اسعود انت حاولت تساعدني لكن لم تساعدني في شيء فأنا اريد ان يقرأ البرنامج الصورة من قاعدة البيانات من خلال استخدام ComBoBox فهل يوجد شرح افضل او مثال ؟؟ RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 12-08-14 طيب اخي عطني صورة لواجهة المثال اللي عندك وباذن الله اجهز لك مثال جديد RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - kslawy - 12-08-14 السلام عليكم ورحمة الله وبركاته إذا كان نوع حقل الصورة في قاعدة البيانات من نوع OLE جرب قراءة بيانات الصورة بهذا الكود: كود : Dim barrImg As Byte() = DirectCast(dr("Game_Pic"), Byte()) RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - 0theghost0 - 13-08-14 Gamepic.Image = Image.FromStream( mstream) هنا يكون الخطأ : mstream ما الحل ؟ RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 13-08-14 اخي الكريم 0theghost0 ماهي الطريقة التي حفظت بها الصورة بالقاعدة؟ RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - 0theghost0 - 13-08-14 صورة لتوضيح اكثر كما طلب الاخ سعود : http://s12.postimg.org/axbye5cz1/Untitled.png RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - 0theghost0 - 13-08-14 OLE Object RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 13-08-14 اخي الكريم كما هو واضح بالصورة فلقد قمت بالاسناد مرتين لمربع الصورة اسمح لي اخي ان اصمم مثال بسيط جديد يحتوي الفكرة التالية: كومبوبوكس باسماء اشخاص وعند نقر اي اسم يتم اظهار صورته بمربع الصورة. اذا هذا المراد اكتب رد. |