11-09-16, 05:35 PM
يا بادئ حبة حبة , لو تبحث بتلاقي الكثير في المنتدى
بعدين نحن منعطي فكرة و كود يؤدي المهمة و ان لم يكن بد بنعمل مثال
الفكرة ما يحتاجلها الكثير يعني كود بسيط يؤدي المهمة افضل للسائل لكي يتعلم اكثر
على اي حال ....
ان كنت تخزن السيارة بدون رقم فريد (لكل سيارة اقصد) فانت راح تستعلم حسب اسم السيارة
اما اذا كنت بتخزن كل نوع من السيارات برقم فريد (و هو الافضل) فانت راح تستعلم حسب رقم النوع
و لكي يكون الاستعلام واحد لكل الانواع لكي لا ندخل في كثرة الاكواد و تكرارها فالافضل عمل دالة تستقبل وسيط اما اسم السيارة او رقم النوع
هذة الدالة تستقبل اسم السيارة
الاستدعاء
بعدين نحن منعطي فكرة و كود يؤدي المهمة و ان لم يكن بد بنعمل مثال
الفكرة ما يحتاجلها الكثير يعني كود بسيط يؤدي المهمة افضل للسائل لكي يتعلم اكثر
على اي حال ....
ان كنت تخزن السيارة بدون رقم فريد (لكل سيارة اقصد) فانت راح تستعلم حسب اسم السيارة
اما اذا كنت بتخزن كل نوع من السيارات برقم فريد (و هو الافضل) فانت راح تستعلم حسب رقم النوع
و لكي يكون الاستعلام واحد لكل الانواع لكي لا ندخل في كثرة الاكواد و تكرارها فالافضل عمل دالة تستقبل وسيط اما اسم السيارة او رقم النوع
هذة الدالة تستقبل اسم السيارة
PHP كود :
Public Function GetCarBy_Name(ByVal CarName As String) As Integer
Using Con As New SqlConnection("هنا حط نص الاتصال")
Dim Serch As String = "Select Count(CarNmae) As Counter From Cars Where CarName = @CarName"
Using SerChCommand As New SqlCommand(Serch, Con)
With SerChCommand
.Parameters.AddWithValue("@CarName", CarName)
.Connection.Open()
End With
Using Reader As SqlDataReader = SerChCommand.ExecuteReader
With Reader
While .Read
If .HasRows Then
Return CInt(Reader.Item("Counter"))
Else
Return 0
End If
End While
End With
End Using
End Using
End Using
Return 0
End Function
PHP كود :
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
TextBox1.Text = GetCarBy_Name("مازدا")
TextBox2.Text = GetCarBy_Name("تويوتا")
End Sub
اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال


