• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

yara2005oo

اعضاء
  • عدد المشاركات

    46
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل شيء نشر بواسطة yara2005oo

  1. السلام عليكم ينفع كده يعنى ؟؟؟؟؟؟؟؟؟؟ بصراحة مش مش معقولة خاااااااااااااااالص كده عيب عليكى اوى يا مايكروسوفت انا زعلاااااااااااااااااانة منك ومخصماكى كمان حد يا جماعة يشوفولى حل بقى لانى زهقت اوى البرامج ال انا تعبت فيها بقالى 3 ايام مش شغالة على نظام تشغيل ماك اعمل انا ايه بقى فى المشكلة دى حد عند حل اهىء اهىء اهىء انا على فكرة بعيط
  2. السلام عليكم كل عام وانتم بخير ممكن لو سمحتم كود لاضافة بيانات داخل TreeView وكود لعرضها بس كده وان امكن ولو فى مشروع جاهز بالصورص كود بس بالفيجوال بيسك دوت نت تبقو مشكورين جدا وكل سنة وانتم طيبين وعيد سعيد
  3. السلام عليكم سؤال بسيط لو سمحتم يا اصحاب العلم الكبيرة يا اساتذة انا طول عمرى ببرمج بالسى شارب تطبيقات ديسك توب ابليكشن ودلوقتى انا حبيت انى اعمل نظام بيعتمد على قاعدة بيانات يسطوال 2008 من خلال شبكة نت ورك ازاى .. وهل ينفع .. انى اقوك بالدور ده فى انرويد ياريت يا جماعة لو فى كتاب او بداية الوصول للطريق ده وتبقو مشكورين جداااااااااااااااا سلام عليكم
  4. طيب معلشى انا اسفة على الاسلوب ممكن تبحثلى لانى بحث وتعبت وملائيتس خالص
  5. ارجو تصحيح لى هذا الكود For Each row As DataGridViewRow In DataGridView1.Rows Dim chk As DataGridViewCheckBoxCell = row.Cells(0) 'as DataGridViewCheckBoxCell If (Convert.ToBoolean(chk.Value)) = True Then Dim Total As Double = 0 Total += Val(row.Cells(5).Value.ToString) TextBox1.Text = Total End If الكو ده فقط خاص بجمع كل الارقام فى الداتا جريد ووضعها فى تيكست بوكس وهو صحيح ؛ اما الكود السابق وهو به خطأ ومش عارفه اصححه وهو خاص بجمع الارقام بالحقول ال بيتعلم عليها علامة صح For Each row As DataGridViewRow In DataGridView1.Rows Dim Total As Double = 0 Total += Val(row.Cells(5).Value.ToString) TextBox1.Text = Total
  6. السلام عليكم انا عندى كود خاص بطباعة تقرير من جدول واحد وافقط وانا الان عايزة طباعة تقرير اكثر من جدول من خلال الكود بالفيجوال بيسك دوت نت وشكرا لحضتركم ده الكود الخاص بطباعة تقرير من جدول واحد فقط Private Sub printView() Try Dim g As New MohamedFayed______Classes Dim ds As New Data.DataSet Dim o As New ReportView Dim u As New report_suppliers g.CrystalReport1_(cnn, ds, "select * from Table", "Table") u.SetDataSource(ds.Tables("Supllier_T")) o.CrystalReportViewer1.ReportSource = u o.Show() Catch ex As Exception End Try End Sub
  7. استاذ محمد فؤاد بعد اذن حضرتك يا فندم لدى سؤال فى المشروع الذى ارفقته ففى المشروع الذى ارفقته بها بيانات وهى كتالى شجرة الاسماء taha mohamed تمام وفى mohamed متفرع منه الاسماء التالية Islam Kamal Kamal2 تمام ؟ السؤال يا استاذ محمد لو انا عايزة اضيف اسم متفرع من kamal 2 ?????? اكتب رقم كام فى TTYPE ? واكتب رقم كام فى ID ------------------------ والسؤال الاخر لو انا عايزة اضيف فرع اخر مثل taha mohamed اكتب رقم كام فى TTYPE ? واكتب رقم كام فى ID ممكن يا استاذ محمد فؤاد بع اذن حضرتك تكتبلى مثال ازاى اضيف فرع فى المثال ال حضرتك بعاتهولى وازاى اضيف اسم متفرع من فرع ؟؟؟؟؟؟؟؟؟
  8. شكرا لكم جميعا ولو فى معلومات زيادة اضافية اتمنى ان توضع هنا و وانا وغيرى وكلنا هانستفيد وشكرا جزيرا
  9. استاذ محمد التركى بالله عليك اشرحلى الكلمين دول ويبقى كده انت عاملت ال عليك بس كده ومش هاسال اسئلة تانية Con.Open() Dim AccTableAdapter As New OleDbDataAdapter(SQLStr, Con) AccTableAdapter.Fill(ds, "Tbl1") Con.Close() CreateTree() End Sub Private Sub CreateTree() TreeView1.BeginUpdate() TreeView1.Nodes.Clear() Dim MainHeader As New TreeNode("شجرةالاسماء") MainHeader.Tag = 0 TreeView1.Nodes.Add(MainHeader) AddSubNode(MainHeader) TreeView1.EndUpdate() TreeView1.ExpandAll() TreeView1.Select() End Sub Private Sub AddSubNode(ByVal Node As TreeNode) Dim dv1 As DataView = ds.Tables("Tbl1").DefaultView dv1.RowFilter = "Type =" & CType(Node.Tag, Integer) For Each drLine As DataRowView In dv1 Dim SubNode As New TreeNode(drLine("Name").ToString()) SubNode.Tag = drLine("ID").ToString Node.Nodes.Add(SubNode) If Not SubNode.Tag Is String.Empty Then AddSubNode(SubNode) End If Next End SubPrivate Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  10. استاذ محمد التركى اولا انا اشكرك جدا ثانيا وبدون رخامة فانى استئذن حضرتك تشرحلى كود وضع بيانات فى treeview علشان انا والله مش فاهماها خالص وعايزة اتعلمها
  11. ممكن لو سمحت سؤال ID ده بتاع ايه ؟ type ده بتاع ايه ؟
  12. الباسورد بتاع الداتا بيز ايه ؟
  13. محدش عايز يساعدنى ؟
  14. شكرا ليك استاذ محمد فؤاد التركى على المساعدة بس انا حاملت اول ال فى المرفقات ولم اجد طلبى بتاعتى انا عايز تيكست بوكس اكتب فيها ( اسم المدرسة ) ا ذا كنت ارادت ان ادخل اسم فى فرع ئيسى او ادخل فى تيكست بكس ( اسم مدرس) اذا كان بينتمى فى المدرسة السابقة هاوضح اكتر لو انا داخلت اسماء المدارس الاتية مدرسة أ مدرسة ب مدرسة ج مدرسة هـ عايز بقى اعلم بالماوس فى treeview او اشار على المدرسة أ واكتب فى التيكست بوكس المدرس محمد ابراهيم المدرسة نادرية مختار المدرس ماجد طه وهكذا .. وطبعا تحفظ فى قاعدة بيانات عايز طبعا ادخل اسماء المدارس وادخل اسماء المدرسين من جوه البرنامج
  15. كل عام وانتم بخير انا عايزة اسال سؤال انا عايزة اعمل برنامجين شات كتابى بس من خلال الانترنت اكيد طبعا صعبة ومحدش عاملها قبل كده بس ياريت لو اعرف الفكرة او اعرف مركز بالقاهرة اخذ كورس فيها تبقوا مشكورين جدا
  16. السلام عليكم ارجو المساعدة للضرورى القصوى انا عايزة ارسل صورة للتقرير عن طريق الكود *************8 انا عندى صورة مخزنة فى داتا بيز وتم استرجاعها بواسطة كود الاسعلام والان هى على For2 فاريد عندما اضغط على زر ( الخاص باستعراض تقرير ) يتم ارسال الصورة ال هى فى Form2 الى تقرير فانا لدى كود خاص بارسال نصوص ولكنى لم افلح فى استدامه لارسال صورة Dim mma As CrystalDecisions.CrystalReports.Engine.TextObject mma = u.ReportDefinition.Sections("Section2").ReportObjects("Text1") mma .Text = txt.Text.ToString()
  17. السلام عليكم اريد دالة تحول الى رقم عشرى مث اذا لدينا رقم 1.7373223 فاريد ان تكون كتالى وفقط 1.73 فانا جاربت كل المعلومات ولكنها تستخدم فى بعض الارقام والبعض الاخر لائا مثل دالة fix round واخرها فارجو المساعدة وشكرا
  18. السلام عليكم الموضوع صراحة طويل شوية ومش عارفة اكتيه ازاى فعلى العموام انا هحاول اوصل لكم المعلومة يمكن اقدر الائى لها حل دلوقتى انا بدخل البيانات بالشكل ده انظر الى الصورة الاولى وهى بتتحفظ فى الجدول بنجاح ------------------------------------------------------------------------------------------------------- دلوقتى لما اجى اطبع تقرير ( كل العملاء ) فى كل دفعة اذا لم تكتمل فبليطلع لى فراغات فى التقرير فكيف يمكن حذفها هذه الفراغات ؟ الصورة الثانية علما انا بضع فى التقرير الحقل المتكرر فى section 3 والسيكن 2 label فى الصورة الاخيرة الراغ المطلوب حذفها هى فى الدفعة الثالثة والدفعة الاولى هل يمكن فى البرمجة كتابة كود يحدد لى مقاس Section3 او فى حلول اخرى ؟؟
  19. استاذ Xacker http://www.arabteam2000-forum.com/index.php?showtopic=267261 lممكن بعد اذنك تقرا الموضوع السابق ده علشان انا بطلب فيه مساهدة عاجلة جدا فى التقرير وشكرا لحضرتك وكل عام وانت بخير
  20. انا مش بعرف باللغة العربية الفسحة معلش انا من الارياف والله معلش يا جماعة اعزرونى
  21. لا انا اسف انت صح وانا ال غلط :) شكرا لك عل مساعدتك انت كده ساعدتنى بنسة 100% شكرا لحضرتك جدا يا فندم كل عام وانتم بخير يا رب ورمضان كريم علينا وعلى الامة الاسلامية
  22. اولا انا اشكرك جدا انت ساعدتنى بنسبة 80 % فقط وبارك اله فيكم يا رب العالمين انا هافهمك المشكلة 1.5 ده يعتبر متر ونصف 1.05 ده يعتبر متر وخمسة سنتمتر فانا بعمل برنامج بيحسب اولا قيمة المتر المكعب الطول فى العرض فى الارتافاع علشان يطلعلى الناتج واقص منه الراقام الزيادة معدا اخر رقمين بعد الفاصلة واضرب الناتج فى السعر واقول للعميل تفضل هذا هو السعر المطلوب بالصفر بعد رقم بيعتبر بقيمة 1.70 ده رقم 1.7 وده رقم تانى خااااااااااااالص ولو ضربت الرقم الاول فى السعر الف جنيه والرقم الثانى فى السعر الف جنيه هايبقى فى نصيب وسرقة وحراااااااااام الواحد يسرق فى رمضان وننصب على العميل :) 1.7 8 100 =170 1.70 8 100 =170 شوفت الفرق ازاى بقى ؟؟
  23. شكرا لحضرتك بس فى مشكلة الطول 2.5 * العرض 12.5 * الارتفاع 2.8 بيساوى 87.5 بعد استخدام الدالة الاخيرة بتاعت ضرتك طلع الناتج 87.50 ؟؟؟؟؟؟؟؟؟؟؟؟ ليه بقى الصفر الاخييييييييييييييييير ؟؟؟؟؟؟؟؟؟؟ 9.7 دى تسعة متر وسبعة سنتمتر 9.70 ودى تسعة متر وسبعين سنتمتر اعتقد فى فرق بين سبعة سنتمتر و سبعين سنتمتر
  24. الف شكر وجزاك الله خير انا استخدمتها بس حصلى مشكلة كبرة جدااااااااااااااااااااااااا الا وهى 1.5*2.94*2.2 = 9.702 الناتج 9.7 الكود r1.Text = Double.Parse(x1.Text) * Double.Parse(x2.Text) * Double.Parse(x3.Text) r2.Text = Math.Truncate(Double.Parse(r1.Text) * 100) / 100
  25. فى بعض الزملاء اعطونى دالة اسمها FormatNumber ولاسف باردو طلعت غلط r1.Text = Double.Parse(x1.Text) * Double.Parse(x2.Text) * Double.Parse(x3.Text) r2.Text = FormatNumber(r1.Text, 2) مثال 2.5*2.55*1.03 الناتج الاصلى 6.56625 الناتج بعد القص 6.57 انا جربت المعادلة السابقة بعد ما احذتها من بعض الاشخاص ولاسف طلعت باردو غلط