الدرس الثاني انواع البرمجيات

انواع البرمجیات :
ھناك نوعان من البرامجیات حسب الاستخدام :
) Generic Programs -1الب رامج العام ة( وھ ي البرامجی ات الت ي تك ون منتج ة لاغ راض عام ة ویمك ن أن یس تخدمھا أي
ش خص أو أي ش ركة م ن الش ركات مث ل مع الج النص وص  Wordوكام ل الب رامج المكتبی ة المنتج ة م ن قب ل ش ركة
مایكروسوفت وغیرھا من البرامج.
) Bespoke Programs -2الب رامج الخاص ة( وھ ي الب رامج المع دة خصیص ا للمس تخدم  Customizedحی ث تك ون مع دة
حصب مایرید المبتثم ر أو الش ركة ألت ي طلب ت ھ ذا البرن امج وع ادة م ا تك ون ذات حج م ص غیر مقارن ة م ع الب رامج العام ة
الاستخدام ومتعبة في نفس الوقت للمبرمج وتكون ایراداتھا اقل من البرامج العامة.
من خلال ما سبق یمكننا أن نحدد النقاط ألتي یجب على المستخدم أن یق وم بمراعاتھ ا قب ل وبع د واثن اء تص میمھ لأح د ھ ذا الن وعین
من البرامجیات .
 -1الزمن  : Timeونقصد بالزمن من ثلاث نقاط اساسیة :
أ- تحدید موعد تسلیم النظام .
ب- تحدید الفترة الزمنیة للمبرمجین لانتاج ھذا النظام .
ت- تحدید سرعة النظام أو ما یسمى استغلال موارد النظام .
 -2الجودة  : Qualityویمكننا أن ننطر إلى الجودة من ثلاث وجھات نظر :
أ- المالك  : Customerبالنسبة إلى المالك فانھ یھمھ من ناحیة الجودة التالي:
· تسلیم النظام في الموعد المحدد .
· تحقی ق الاعتمادی ة والامنی ة والام ان ف ي النظ ام & Dependability & Reliability (Security
) Safetyونقصد بالاعتمادیة تنفیذ الاعمال من دون اخطاء .
· الكفاءة )تنفیذ اكبر قدر ممكن من العملیات في اقصر وقت (
 قابلیة الصیانة ) Maintainabilityالمرونة الكافیة للتعدیل في العملی ات أو اض افتھا اوتغیی ر الص لاحیات
والمستخدمین .....
ب- المستخدم  : Userینظر المستخدم في جودة من النظام من حیث التالي :
· أن یكون مرن وسھل التعلم جید التصمیم .
· الاعتمادیة .
· الكفاءة .
ث- المطور : Developer Or Software Engineerبالنسبة للجودة في نظ ر مھن دس البرامجی ات فھ و ینظ ر لھ ا م ن
الاتجھات التالیة :
· عامل الامن والامان یكون عالیا جدا .
· جودة التصمیم الخارجي . Design
· الاعتمادیة .
· الكفاءة .
· قابلیة الصیانة .
من خلال ما سبق یمكننا الان أن نجمل كل ماسبق من النقاط في النقاط التالیة وتكون تحت السؤال التالي:
كیف یمكننا أن نحكم على النظام بانھ نظام جید أو غیر جید )المعاییر ألتي یحدد جودة النظام (
 -1قابلیة الصیانة .
 -2الكفاءة .
 -3الاعتمادیة .
 -4قابلیة الاستخدام  Usabilityونقصد بھا مدى امكانیة تعلم النظام بسھولة .
وتكون الانظمة متأرجحة ما بین تلك المعاییر بین صعود وھبوط وبالتالي على مدى امكانیة توفي تلك المعاییر تكون الانظمة افضل...
الواجب الثاني : تفحص من قبل النظام للمستخدمین إذا ادخل المستخدم الخاطئ فیقوم باعطاءه ثلاث فرص ومن ثم یق وم النظ ام
باقفال نفسھ أو یقوم باقفال نفسھ عند مروم ثلاثین ثانیة دون أن یدخل المستخدم رقم المستخدم واسم المستخدم 

استيراد فضاء اسماء قواعد البیانات‘ Imports System.Data.oledb
Public Class Form1
Dim timer As Byte = 30
Dim i As Byte = 3
Dim cnstring As String = "provider=Microsoft.Jet.OLEDB.4.0;data
source=c:\company2.mdb;" ‘جملة الاتصال بالقاعدة
Dim cn As New OleDbConnection(cnstring) ‘فئة الاتصال
Dim cmd As New OleDbCommand ‘فئة الاوامر
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
Dim bool As Boolean = False
cn.Open()
cmd.Connection = cn
cmd.CommandText = " SELECT * FROM USERS" ‘من جدول المستخدمين
Dim read As OleDbDataReader = cmd.ExecuteReader
Do While read.Read
If read("id") = TextBox1.Text AndAlso read("name") = TextBox2.Text Then
الانتقال إلى النافذة الرئیسیة عندتحقق الشرط‘ )(main.Show
Me.Hide()
bool = True
Timer1.Enabled = False
End If
Loop
If bool = False Then

i -= 1
If i = 0 Then
,"نفسه باغلاق النظام یقوم سوف محاولة اي لك یعد لم المعذرة"(MessageBox.Show
" ,!"! تنبیهMessageBoxButtons.OK, MessageBoxIcon.Warning)
Application.Exit()
Else
یبقى لم صحیحة غير ادخلتها التي السر كلمة او المستخدم اسم ان"(MessageBox.Show
, !!", MessageBoxButtons.OKتنبیه" ," البرنامج یغلق سوف والا للدخول مرات " &  " & iسوى لك
MessageBoxIcon.Information)
TextBox1.Clear()
TextBox2.Clear()
End If
End If
read.Close()
cn.Close()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Timer1.Tick
If timer Mod 2 = 0 Then
PictureBox1.Visible = True
PictureBox2.Visible = False
Else
PictureBox2.Visible = True
PictureBox1.Visible = False
End If
timer -= 1
"اوتوماتیكیا البرنامج ویغلق ثانیة " &  " & timerسوى لك یبقى لم " = Label1.Text
If timer = 0 Then
Application.Exit()
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button2.Click
Application.Exit()
End Sub
End Class

تعديل المقال