عاشق للبرمجة

وعليكم السلام ورحمة الله وبركاته يبدو انه توجد مشكلة في ملف app.config 1- تأكد من أن ملف app.config في نفس مسار تطبيق البرنامج . 2- بعد التأكد من مسار ملف الكونفق ، قم بفتح الملف من خلال التطبيق ، وتأكد من أن <configSections> هو أول قاسم داخل القسم الرئيسي <co…

وعليكم السلام ورحمة الله وبركاته ... أعتقد أنه لابد من استخدام الـ API لهذا الغرض ... جرب البحث في WinINET .... بالتوفيق إن شاء الله .....

تعقيب ،،،، في الواقع الترميز latin7 لا ينفع :sad: حيث أن أي نص عربي في قاعدة البيانات سيتحول إلى علامات استفهام ، مثلاً ( السلام عليكم = ؟؟؟؟؟؟ ؟؟؟؟؟ ) ، ولو قمنا بالاستعلام بتحقق شرط ما فسيقوم بجلبها ووضعها في VB form على هيئة علامات استفهام ، والسبب أن الترم…

بالفعل .. وجدت الحل :) المشكلة كانت في أن الترميز الخاص بالحقل من نوع : utf8_general_ci أما بالنسبة للحقل الآخر فكانت من نوع : latin7_general_ci قمت بتغيير كافة الحقل إلى latin7_general_ci وحللت المشكلة ، فقد كان الاستعلام يقارن قيمه من latin7_general_ci بقيمة…

وعليكم السلام ورحمة الله وبركاته , أستاذنا الحبيب ... تأكدت من نوع البيانات ، وهي من نوع VarChar(50) ، وللمعلومية قمت بحذف الحقل بالكامل ، وأنشأت حقل جديد ، وقمت بتعبئة الحقول من جديد إلا أن المشكلة لازالت موجوده ، لا أعلم لماذا يعود بدون قيم ... طرأ على بالي …

وعليكم السلام ، أخي الاستعلام يحقق الشرطين ، قمت بتغيير الـ connection string لقاعدة بيانات Access وقام بجلب النتائج ... بالنسبة لطريقة الباراميترز فجميع الطريق تؤدي إلى روما :) ، وبالنسبة لي فأنا أفضل استخدام dataAdapter ، لا أعلم لماذا ولكني أجدها أسرع وأسهل…

السلام عليكم ورحمة الله وبركاته .... لدي الكود التالي : Dim DataAdapter As New MySql.Data.MySqlClient.MySqlDataAdapter("select * from Users where UserName= '" & UserN & "' and Description= '" & Udis & "' ", con) con.Open() dataset1.Clear() DataAdapter.Fill(dat…

السلام عليكم ورحمة الله وبركاته .. فوجئت باختفاء جميع الأدوات الموجودة على الفورم بعد حدوث خطأ في ملف الـ XML وذلك بعد أن قمت بحذف الداتاسورس بالخطأ ، وبعد إرجاعه اختفى الخطأ واختفت معه جميع الـ CONTROLS الموجودة في الفورم ، والكود لازال موجود ولا يشير لاختفاء…

أخي العزيز houssam11350_11350 وعليكم السلام ورحمة الله وبركاته .. شكرا على ردك أخي الكريم .... لاحظ التالي أخي الكريم : تم إضافة الداتاسيت كأداة ، أريد تعريف الداتا سيت برمجيا وربطها بالتقرير ... هل من طريقة ؟؟ بارك الله فيك وشكرا على ردك أخي العزيز ...

السلام عليكم ورحمة الله وبركاته ... قمت بطرح سؤال في السابق على هذا الرابط : /index.php?showtopic=249357 لنعد قليلا إلى تقارير مايكروسوفت القديمة .... كانت التقارير أشبه م يكون بالفورم ، نقوم بإرسال القيم التي نريدها إلى الفورم مباشرة دون الحاجة إلى ربط التقري…

عفوا ، لم أنتبه لكلمة Windows بتاتاً :blink: شكرا على التوضيح أخي

شكرا أخوتي على الكود ، ومجرد إضافة بسيطة .. لو عرفنا متغير عام في موديول واسمه CurrentActiveForm ... Public CurrentActiveForm as string وفي حدث Activated لكل فورد نكتب : CurrentActiveForm = Formxx.name أعتقد أننا سنحصل على الفورم النشط حاليا :S

ملاحظة : أخي الكريم : dot.net2008 الكود الذي وضعته لنا يعمل 100% ولا يعيبه شئ ، كل ما عليك فعله هو استدعاء السب addserialcolumn في حدث الضغط على الزر كمثال كالتالي : addserialcolumn(DataGridView1) حيث أن DataGridView1 هي اسم أداة الداتا جريد ... بالتوفيق ...

وعليكم السلام ورحمة الله وبركاته ... أخي الحبيب VBHelper أعتقد أن الكود الذي أضفته لإضافة قيمة لخلية في الصف ، ربما الكود التالي يفيد الأخ في إضافة عمود : DataGridView1.Columns.Add("Column Name", "Column Header Caption" + (DataGridView1.Columns.Count + 1).ToSt…

في الواقع ما ذكره الأستاذ VB Helper هو الكلام الصحيح 100% ، فالبرمجة المسيرة بالأحداث تلتزم بالأحداث ، وبعد البحث العميق وجدت أن البرمجة من خلال Console Application تسمح بوضع Catch try على مستوى دالة الـ MAIN .. فما كنت أتخيله هو تصميم كلاس يتم استدعاءه في كل …

وعليكم السلام ورحمة الله وبركاته ... بالواقع السؤال بحاجة لفك خوارزميته :lol: كما قال الأخ VB Helper حدد السؤال أخي الكريم ووضح المراد بالتفصيل ، وحبذا لو تعطينا مثال لما تريد ....

وعليكم السلام ورحمة الله وبركاته ... اضبط خاصية Maximum = 100 وخاصيىة minimum = 0 وذلك للتراك بار ثم ضع الكود التالي في حدث Scroll Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar1.Scroll AxW.settings.vo…

السلام عليكم ورحمة الله وبركاته .... استخدم الكود التالي : Dim MyString As String = TextBox1.Text Dim LettersArray As Array = MyString.ToCharArray() For i = 0 To LettersArray.Length - 1 TextBox2.Text += " " + LettersArray(i) Next TextBox3.Text = TextBox3.Text.…

حياك الله أخي وطهور إن شاء الله ... نصيحتي لك أخي أن تدرس أولا سوق العمل ، وتنظر لماذا يحتاج سوق العمل في المنطقة التي تعيش فيها . بلا شك أن البرمجة متطلب هام جداً لسوق العمل ، ولا أجد أي مشكلة في أن تبرمج بلغة C# أو VB.net وأنصحك بالعمل على لغات الـ Online من…

شكرا على ردك أخي الكريم .. فقط ملحوظة بسيطة ، عند تجربة الكود قام بإعطائي الرقم الفيزيائي بوجود بعض المسافات ، لا أعلم ما هو السبب ، فقمت بتنزيل برنامج ديمو يعرض الرقم الفيزيائي وتأكدت من أن الرقم صحيح كما هو مدون على الهارددسك .. إلا أن المسافات ليست موجودة .…