24-11-19, 11:26 AM
السلام عليكم ورحمة الله
عندي كودين استعلام
وهم
المشكله ان الكود الي تحت شغال بس الي فوق غير شغال
واذا غير اماكنهم نفس الشي الكود الي يكون تحت يشتغل والي يكون فوق ما يشتغل
انا اريد اعمل استعلامين في نفس الوقت بس ما اعرف وين الغلط جربت اغير واشوي بس ما ضبط
هنا الاستعلام الاول عن الاسم اذا مودجود CALLop = @CALLop
والاستعلام الثاني عن الدوله اذا موجوده country=@country
افيدوني بارك الله فيكم
وشكرا
عندي كودين استعلام
وهم
كود :
Dim conn42 As New SQLiteConnection(String.Format("Data Source= C:\LOG\{0}\DB{1}.s3db", strcallbk, bklogcontest))
If conn42.State <> ConnectionState.Open Then conn42.Open()
If (conn42.State = ConnectionState.Open) Then
Dim cmd2 As New SQLiteCommand("SELECT COUNT(*) FROM DBqsos WHERE CALLop = @CALLop AND MODE=@MODE and Band=@Band", conn42)
cmd2.Parameters.AddWithValue("CALLop", Trim(a3))
cmd2.Parameters.AddWithValue("mode", TextBox3.Text)
cmd2.Parameters.AddWithValue("Band", TextBox4.Text)
Dim rowCount As Integer = Convert.ToInt32(cmd2.ExecuteScalar())
If rowCount <> 0 Then
c1 = "Work"
Else
c1 = "New"
End If
Dim cmd22 As New SQLiteCommand("SELECT COUNT(*) FROM DBqsos country=@country AND MODE=@MODE and Band=@Band", conn42)
cmd22.Parameters.AddWithValue("country", Trim(country.Text))
cmd22.Parameters.AddWithValue("mode", TextBox3.Text)
cmd22.Parameters.AddWithValue("Band", TextBox4.Text)
Dim rowCount1 As Integer = Convert.ToInt32(cmd22.ExecuteScalar())
If rowCount1 <> 0 Then
c1 = "CW"
Else
c1 = "CN"
End If
End Ifالمشكله ان الكود الي تحت شغال بس الي فوق غير شغال
واذا غير اماكنهم نفس الشي الكود الي يكون تحت يشتغل والي يكون فوق ما يشتغل
انا اريد اعمل استعلامين في نفس الوقت بس ما اعرف وين الغلط جربت اغير واشوي بس ما ضبط
هنا الاستعلام الاول عن الاسم اذا مودجود CALLop = @CALLop
والاستعلام الثاني عن الدوله اذا موجوده country=@country
افيدوني بارك الله فيكم
وشكرا