piter11
دوشنبه 17 شهریور 1393, 02:03 صبح
من يه برنامه براي آرايشگاه نوشتم حالا دو تا باگ داره در قسمت ثبت رزرو مشتري اولا بر اساس شماره تلفن جستجو انجام ميشه خوب حالا اگه يک نفر با يک شماره تلفن بيش از يک بار رزور کنه يعني تاريخاش فرش داشته باشن تو جستجو مياد تاريخ اولي نشون ميده يعني کمتريه تا اينجاش درست ولي طرف مياد واسه فرداشم وقت ميگيره فردا بياد آرايشگاه جستجو کنه دوباره همون مال روز قبل رو نشون ميده! يکي هم اينکه اگه تاريخو شماره تماسا يکي باشن ولي ساعت ها فرق داشته باشن فقط همون ساعت اولي که ثبت کردي رو نشون ميده ديگه طرف بياد ساعت 8 صبح مثلا رزور کرده بگه ساعت 4 بعد از ظهر هم رزور مي خوام کنم ساعت 4 تشريف بيارت سرچ بزني دوباره مياد نتيجه همون 8 صبح نيشون ميده ! شرط if ميخواد اين کار خواهشا کسي کمکم کنه خلاصشو واستون بگم:
جستجو بر اساس شماره تلفن:
1-اگر شماره تلف ها يکي بودن تاريخ ها فرق داشتن بياد تاريخارو بر اساس نزولي نشون بده (آخرين تاريخ رو نشون بده بين 1393/6/12 و1393/6/14 دومي رو نشون بده در جستجو)
2-اگر شماره تماس ها و تاريخ ها هم يکي بودن ولي ساعت ها فرق داشتن بياد ساعت ها رو بر اساس نزولي نشون بده يعني زياد به کم
بين 9 صبح و 16 بعد از ظهر 16 نشون بده تو جستجو
اينم تکه کدش
cmd = New SqlCommand()
cmd.Connection = con
cmd.CommandText = "SELECT Name,LastName,Saat,Tarikh FROM RegisterUser WHERE(Tell=@Tell)"
cmd.Parameters.Add("@Tell", SqlDbType.NVarChar, 50).Value = TxtTell.Text
'con.Open()
If con.State = ConnectionState.Open Then
Dim sReader As SqlDataReader = cmd.ExecuteReader()
TxtName.Text = sReader.GetValue(0).ToString()
TxtLastName.Text = sReader.GetValue(1).ToString()
TxtTime.Text = sReader.GetValue(2).ToString()
HM_FarsiCalendar1.Text = sReader.GetValue(3).ToString()
con.Close()
Else : MessageBox.Show("پیدا نشد")
End If
End If
جستجو بر اساس شماره تلفن:
1-اگر شماره تلف ها يکي بودن تاريخ ها فرق داشتن بياد تاريخارو بر اساس نزولي نشون بده (آخرين تاريخ رو نشون بده بين 1393/6/12 و1393/6/14 دومي رو نشون بده در جستجو)
2-اگر شماره تماس ها و تاريخ ها هم يکي بودن ولي ساعت ها فرق داشتن بياد ساعت ها رو بر اساس نزولي نشون بده يعني زياد به کم
بين 9 صبح و 16 بعد از ظهر 16 نشون بده تو جستجو
اينم تکه کدش
cmd = New SqlCommand()
cmd.Connection = con
cmd.CommandText = "SELECT Name,LastName,Saat,Tarikh FROM RegisterUser WHERE(Tell=@Tell)"
cmd.Parameters.Add("@Tell", SqlDbType.NVarChar, 50).Value = TxtTell.Text
'con.Open()
If con.State = ConnectionState.Open Then
Dim sReader As SqlDataReader = cmd.ExecuteReader()
TxtName.Text = sReader.GetValue(0).ToString()
TxtLastName.Text = sReader.GetValue(1).ToString()
TxtTime.Text = sReader.GetValue(2).ToString()
HM_FarsiCalendar1.Text = sReader.GetValue(3).ToString()
con.Close()
Else : MessageBox.Show("پیدا نشد")
End If
End If