-
الإعلانات
-
تسجيل عضوية جديدة في المنتدى 01/31/2016
السلام عليكم ورحمة الله وبركاته عزيزي العضو الجديد : حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة ) فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK) وقم بتفعيل إشتراككم من هناك
-
-
عدد المشاركات
5,640 -
تاريخ الانضمام
-
تاريخ اخر زياره
كل شيء نشر بواسطة محمد فؤاد تركي
-
السادة الاعضاء الافاضل هل في الامكان مساعدتي في تصدير التقرير الحالي كما موضح بالمرفق بالامتدادات الموجوده في القائمة . . . شكراً Export.rar
-
السادة الزملاء السلام عليكم ورحمة الله وبركاتة استوقفتني شجرة الحسابات والتي صممها لنا الاخ الخبير كمال النحال في برنامج الحسابات والذي ستجدونة هنا اما بخصوص شجرة الحسابات فأعجبتني كثيراً ولاحظت طلبات الكثيرين من الاعضاء حول طريقة عمل هذه الشجرة فأحببت أن أضع بالمنتدي شرح بسيط يوضح طريقة عمل الشجرة لتعم الفائده علي جميع الزملاء بسم الله نبدأ هذه هي شكل الشجرة والتي صممها الاخ كمال في برنامج الحسابات قم بتصميم جدولك والذي يوجد به جميع بنود دليل الحسابات ولاختصار الوقت تم الاستعانة بجدول الاخ كمال النحال كما هو موضح بعد الانتهاء من تصميم الشجرة يتم كتابة الكود التالي في حدث تحميل النموذج Private Sub Form_Load() Dim dbs As Database, rst As Recordset Dim nodX As Node Set dbs = CurrentDb Set rst = dbs.OpenRecordset("Accounts", dbOpenDynaset) Set nodX = TreeView2.Nodes.Add(, , "A", "Ïáíá ÇáÍÓÇÈÇÊ") With rst Do While Not .EOF Set nodX = TreeView2.Nodes.Add("A" & CStr(Nz(!ParAcc)), tvwChild, "A" & CStr(!AccID), CStr(!AccID) & ":" & !ArAccDes) nodX.EnsureVisible .MoveNext Loop End With rst.Close Set dbs = Nothing For Each nodX In TreeView2.Nodes nodX.Expanded = False nodX.Sorted = True Next End Sub ثم نقوم بعمل Sub فرعي صغير Private Sub Finder(Skey) Dim rs As Object Me.Filter = "" Set rs = Me.Recordset.Clone rs.FindFirst "[AccID] = '" & Trim(Skey) & "'" Me.Bookmark = rs.Bookmark End Sub ومهمتة ربط الشجرة بالعناصر والتكست بوكس الموجوده علي النموذج وفي حدث الضعط بالماوس علي الشجرة نكتب الكود التالي Private Sub TreeView2_NodeClick(ByVal Node As Object) Dim mykey As String With Node mykey = Right(.Key, Len(.Key) - 1) Finder (mykey) End With End Sub وبهذه الخطوات البسيطة السهلة نكون قد انهينا تصميم شجرة الحسابات وطريقة عملها مرفق مثال Tree_view.zip
- 28 ردود
-
4
-
كيف تبني برنامج مخازن ومبيعات بطريقة صحيحة ؟؟
محمد فؤاد تركي posted سؤال in قواعد بيانات Microsoft Access
أخواني الاعضاء السلام عليكم ورحمة الله وبركاتة نظراً لكثرة طلب الاعضاء في الفترة الاخيرة عن برامج المخازن وفواتير الشراء والبيع أضع بين أيديكم شرح كامل لكيفية بناء برنامج المخازن وفواتير الشراء وفواتير البيع . . . لا أحب أن أطيل عليكم كثير ودعنا ندخل في صلب الموضوع أولاً يجب علينا أولاً انشاء جدول يحتوي علي جميع الاصناف المخزنية بكافة تفاصيلها والجدول الواضح أمامك يوضح الحقول المطلوب توافرها في هذا الجدول ثانياً : - يتم انشاء جدول لتسجيل البيانات الاساسية لرأس فاتورة الشراء كما هو موضح بالصورة المرفقه أدناه وهذه البيانات عبارة عن تاريخ الفاتورة ورقم الفاتورة اسم المورد وطريقة الدفع وخلافة ثالثاً : - يتم انشاء جدول لتسجيل البيانات الاساسية لرأس فاتورة البيع كما هو موضح بالصورة المرفقه أدناه وهذه البيانات عبارة عن تاريخ الفاتورة ورقم الفاتورة اسم العميل وطريقة الدفع وخلافة رابعاً : - يتم انشاء جدول وهذا الجدول مهمتة تسجيل كافة الحركات المخزنية بداخلة سواء فواتير بيع أو فواتير شراء كما بالشكل التالي خامساً : - كيفية انشاء العلاقات ما بين هذه الجدوال وهذه النقطة مهمة جداً كما في الشكل التالي بذلك نكون قد وضعا حجر الاساس بخصوص بناء برنامج المخازن وفواتير البيع والشراء وإن شاء رب العالمين في الدرس القادم نكمل خطوات بناء البرنامج حتي نصل به لغايتنا ان شاء الله مرفق القاعدة وبها الجزء التي تم شرحة Warehouses_System.rar- 518 ردود
-
26
-
الاخوة الافاضل السلام عليكم ورحمة الله وبركاتة مرفق روابط بحجم 6.60 جيجا تقريبا دورات في برمجة الأندرويد عربي و إنجليزي بروابط مباشرة وسريعة للتحميل الدورة الأولى للمهندس والأستاذ عبدالله عيد ANDROID 101 https://archive.org/download/Android101_Abdullah.Eid/Android101_Abdullah.Eid.7z الدورة الثانية محاضرات بالعربي : برمجة وتطبيقات أندرويد عربي https://archive.org/download/Programming_using_Mobile_Android_Ar/Programming_using_Mobile_Android_Ar.7z الثالثة والاخيرة دورة بالإنجليزي للمبتدئين : Android_Complete_Tutorial_In_English_FULL https://archive.org/download/Android_Complete_Tutorial_In_English_FULL/Android_Complete_Tutorial_In_English_FULL.7z بالتوفيق للجميع
- 8 ردود
-
6
-
الاخوة الاعضاء السلام عليكم ورحمة الله وبركاتة صممت لكم مثال بسيط عبارة عن دليل تليفون لحفظ ارقامك التليفونية داخل قاعدة بياناتك لاسترجاعها في أي وقت المثال يضم بعض الافكار البسيطة التي تهم كل مبرمج 1 - تم حفظ سلسة الاتصال بقاعدة البيانات SQL Server بملف XML اسمة ConStr وذلك لكل من يريد ان يتعلم طريقة حفظ سلسلة الاتصال في ملف خارجي ليسهل عليك تغيير الاتصال بالقاعدة اينما كنت من خلال هذا الملف والمطلوب منك فقط ان تضع هذا الملف علي السواقة \:C وتغيير سلسة الاتصال لكي تناسب سيرفرك فقط 2 - تم عمل مثال علي طريقة عمل أزرار الحفظ والحذف والتعديل وجديد والذي يسأل عنها الكثيرون 3 - تم عمل مثال لطريقة عمل Navigation Buttons وهي أزرار التنقل بين السجلات 4 - تم عمل مثال لطريقة عمل Help File للبرنامج واستدعائة من خلال زر أمر بالبرنامج 5 - طريقة تصميم الاجراءات المخزنة والتي تم عمل مثال لطريقة اجراء الحفظ الحذف والتعديل 6 - مثال علي طريقة استخدام الامر IF NOT EXISTS في SQL Server وطريقة عمل MsgBox ايضا في SQL 7 - التحقق من اذا كانت البيانات مكررة او لا لن أحب أن اطول عليكم واترككم مع هذا المثال ويارب يكون فيه فائده للجميع مرفق مثال مفتوح المصدر مرفق سلسة الاتصال الخاصة بالبرنامج Tele_Index.rar ConStr.rar
- 20 ردود
-
1
-
بعض الأوامر الشائعة في برنامج الاكسس والذي يسأل عنها الكثيرون
محمد فؤاد تركي posted سؤال in قواعد بيانات Microsoft Access
أخواني الاعضاء والمشرفين الكرام السلام عليكم ورحمة الله وبركاتة استوقفني مثال بالمنتدي لاستاذنا الكبير فهد الدوسري عن الاوامر الشائعة ببرنامج الاكسس والذي يتم طلبها باستمرار من الاعضاء والاعضاء الجدد فأحببت أن أهديكم اياها لعل تعم الفائدة علي الجميع لا أحب أن أطيل عليكم وأدعكم تستمتعوا بالاوامر Fahd_Dosary.rar -
اظهار وتفعيل Target CPU في خصائص المشروع
محمد فؤاد تركي رد على محمد مسافر's موضوع في Microsoft Visual Basic.NET
اخي الفاضل محمد مسافر من القائمة Build --> Configuration Manager --> Plant form قم باختيار New ثم X86- 1 رد
-
1
-
ممكن كود تعديل ارقام الهواتف بال SQL
محمد فؤاد تركي رد على #A-H.c's موضوع في قواعد بيانات Microsoft SQL Server
أخي الفاضل بالنسبة للمطلوب الاول تفضل الحل فمن خلال هذا الاسكريبت سيتم عمل تحديث للارقام التي تبدأ بــ 010 و مكونة من 10 أرقام فقط ليصبح 0100 بدلا من 010 update Tbl_Phones set Phone = Replace(phone,010,0100)where Phone = LEFT(phone,10) and phone Like '010%'ستقوم بتنفيذ الاسكريبت علي 012 ايضا بعد الانتهاء من عمليه التحديث سيتم حذف الارقام المكررة من الجدول WITH CTE AS( SELECT phone, RN = ROW_NUMBER()OVER(PARTITION BY phone ORDER BY phone) FROM dbo.Tbl_Phones)DELETE FROM CTE WHERE RN > 1بالتوفيق- 4 ردود
-
2
-
أخي الفاضل ستجد الخطوات هنا ان شاء الله رفع موقع مع قاعدة بيانات على خادم مجاني upload asp.net and sql server database
-
المساعدة هل المستخدم ضغط موافق أو إلغاء
محمد فؤاد تركي رد على fathi alamre's موضوع في Microsoft Visual Basic.NET
يمكنك ان تحفظ الوقت و التاريخ والمستخدم في جدول وقت الضغط علي زر موافق كذلك للالغاء -
ممكن اغير فى شكل الداتا جريد ليصبح مثل هذه الصورة
محمد فؤاد تركي رد على حامد محمد الوصيف's موضوع في Microsoft Visual C#.NET
ينفع طبعا التقرير برنامج تصميم ويمكنك تصميم الشكل المناسب لك -
ممكن اغير فى شكل الداتا جريد ليصبح مثل هذه الصورة
محمد فؤاد تركي رد على حامد محمد الوصيف's موضوع في Microsoft Visual C#.NET
أخي الفاضل الجريد الافتراضية من مايكروسوفت لا يوجد بها هذه الخصائص ولكن عندي مثال مصمم بــ VB.Net وليس #C قريب من طلبك ان اردته ارسلة لك بالتوفيق -
كيفية عمل التقارير الديناميكية CrystalReport
محمد فؤاد تركي رد على aftfm's موضوع في تصميم وبرمجة التقارير
ابحث في جوجل عن دروس تشرح هذه النوعيه من التقارير حيث ان الوقت لا يسعفني الان لوضع شرح مفصل لطريقة استخدام هذه النوعيه وعلي اي حال شاهد هذا الدرس ربما يفيدك http://www.dailymotion.com/video/x1jpos9_crystal-reports-2013-tutorial-creating-a-cross-tab-report-training-lesson-16-3_tech -
كيف استخدم الإجراءات المخزنة في طباعة تقرير كريستال ريبورت
محمد فؤاد تركي رد على fathi alamre's موضوع في تصميم وبرمجة التقارير
اتمني ان يفيدك هذا الموضوع شرح عمل تقرير كريستال باستخدام Stored Procededures -
كيفية عمل التقارير الديناميكية CrystalReport
محمد فؤاد تركي رد على aftfm's موضوع في تصميم وبرمجة التقارير
استخدم تقرير Cross-Tab ستجدها أمامك عند ظهور اول شاشة للتقارير وبالمناسبة هذه النوعيه من التقارير مذكورة بالجزء الثاني من الكتاب بالتوفيق -
كيفية مسح رقم رقم من textbox وليس عمل clear للرقم كله
محمد فؤاد تركي رد على تناسيم's موضوع في Microsoft Visual Basic.NET
أختي الفاضلة لقد قمتي بالاجابة علي سؤالك من خلال شرح المشكلة بالفعل سنستخدم زر BackSpace لعمل هذا الاجراء ضعي هذا الكود في حدث الضغط علي الزر Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click TxtNumbers.Focus() SendKeys.Send("{BACKSPACE}") End Sub -
كيف أعمل برنامج تنتهي صلاحيته بعد فترة معينة
محمد فؤاد تركي رد على realy8's موضوع في Microsoft Visual C#.NET
ابحث في جوجل الامثلة كثيرة مصادر :- http://www.c-sharpcorner.com/uploadfile/tanmayit08/make-your-application-with-trial-version/ http://stackoverflow.com/questions/3625825/how-can-i-make-my-application-have-a-30-day-trial-period http://stackoverflow.com/questions/18326838/making-project-as-trial-version -
تم تعديل المثال الاصلي بحيث يكون في امكانية لتصفية البيانات وظهور نتيجة التصفية في التقرير مرفق المثال بعد التعديل Print_DataGridview_C_Sharp.rar
-
كيفية عمل التقارير الديناميكية CrystalReport
محمد فؤاد تركي رد على aftfm's موضوع في تصميم وبرمجة التقارير
اتمني ان تقرأ الكتابين الموجودين في الموضوعات المثبتة عن كيفية التعامل مع تقارير الكريستال ريبورت الكتابين مشروحين باللغة العربية- 5 ردود
-
1
-
أخي الفاضل صممت لك مثال سريعاً بالتوفيق Print_DataGridview_C_Sharp.rar
-
ارجوا المساعدة فى نقل البيانات من جدول الى جدول فى قاعدة بيانات اخري
محمد فؤاد تركي رد على dbahl75's موضوع في Microsoft Visual Basic.NET
في هذه الحالة سيتعين علينا اعاده صياغة الكود لكي يتلائم مع الطلب الجديد الكود كامل وقاعدتي البيانات محميتين بكلمات مرور Imports System.DataImports System.Data.OleDbPublic Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Using sourceConnection As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\DB.accdb;Jet OLEDB:Database Password=123456;"), destinationConnection As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\DB2.accdb;Jet OLEDB:Database Password=123456;"), adapter As New OleDbDataAdapter("SELECT * FROM Tbl_Customers", sourceConnection), insertCommand As New OleDbCommand("INSERT INTO Tbl_Customers_MovedData values (@CustID,@CustName,@JoiningDate)", destinationConnection), deleteCommand As New OleDbCommand("DELETE FROM Tbl_Customers", sourceConnection) insertCommand.Parameters.Add("@CustID", OleDbType.VarChar, 100, "CustID") insertCommand.Parameters.Add("@CustName", OleDbType.VarChar, 100, "CustName") insertCommand.Parameters.Add("@JoiningDate", OleDbType.VarChar, 100, "JoiningDate") adapter.InsertCommand = insertCommand adapter.DeleteCommand = deleteCommand adapter.AcceptChangesDuringFill = False Dim table As New DataTable adapter.Fill(table) adapter.Update(table) table.AcceptChanges() sourceConnection.Open() deleteCommand.ExecuteNonQuery() sourceConnection.Close() End Using MsgBox("Data Moved", MsgBoxStyle.Information, "Moved") End SubEnd Class- 14 ردود
-
1
-
ارجوا المساعدة فى نقل البيانات من جدول الى جدول فى قاعدة بيانات اخري
محمد فؤاد تركي رد على dbahl75's موضوع في Microsoft Visual Basic.NET
تم تعديل الملف بحيث يكون ملف القاعدة محمي بكلمة سر MoveDataFrom_TO.rar- 14 ردود
-
1
-
ارجوا المساعدة فى نقل البيانات من جدول الى جدول فى قاعدة بيانات اخري
محمد فؤاد تركي رد على dbahl75's موضوع في Microsoft Visual Basic.NET
استخدم DTS ابحث عنها في جوجل -
منع التعديل على قوائم البرنامج
محمد فؤاد تركي رد على محمد مسافر's موضوع في Microsoft Visual Basic.NET
مع الاسف لايوجد عندي ويندوز 8 لكي اجرب هذه المشكلة- 8 ردود
-
1
-
منع التعديل على قوائم البرنامج
محمد فؤاد تركي رد على محمد مسافر's موضوع في Microsoft Visual Basic.NET
المشكلة ليست في تغيير الملف من 2003 الي 2010 فقط أول نقل البيانات والعناصر من ملف لاخر؟ لابد من تغيير ايضا سلسلة الاتصال لتصبح متوافقة مع الملف الجديد اكسس 2010- 8 ردود
-
1