omidquest
جمعه 07 بهمن 1390, 15:22 عصر
سلام
من به وسيله كد زير
[VB]
Dim SC_v As New SqlConnection
Dim CM_v As New SqlCommand
Dim DR_v As SqlDataReader
Dim DA_v As New SqlDataAdapter
Dim str_v As String
str_v = "Data Source=174.333.57.655;Persist Security Info=True;Password=464646;User ID=username"
SC_v.ConnectionString = str_v
CM_v.Connection = SC_v
CM_v = New SqlCommand(str_v, SC_v)
CM_v.CommandText = "SELECT * FROM heyat_hesab WHERE heyat_no = '" & ddl_heyat.SelectedValue & "' "
If SC_v.State = ConnectionState.Closed Then
SC_v.Open()
End If
DR_v = CM_v.ExecuteReader()
If DR_v.Read <> False Then
lbl_mande.Text = DR_v("mande").ToString
Else
lbl_mande.Text = "0"
End If
DR_v.Close()
SC_v.Close()
[/VB
بعد از كليك كردن روي رديف مورد نظرم در گريد ويو اطلاعات فيلد مورد نظرم رو استخراج ميكنم
ولي مشكلم اينه كه من بايد آخرين ركورد بين فيلد هاي مشابه كه در شرط sql پيدا ميشن رو بدست بيارم
ولي برنامه اولي رو به من ميده
چطوري اين مشكل رو بر طرف كنم
ممنون از همه دوستان
من به وسيله كد زير
[VB]
Dim SC_v As New SqlConnection
Dim CM_v As New SqlCommand
Dim DR_v As SqlDataReader
Dim DA_v As New SqlDataAdapter
Dim str_v As String
str_v = "Data Source=174.333.57.655;Persist Security Info=True;Password=464646;User ID=username"
SC_v.ConnectionString = str_v
CM_v.Connection = SC_v
CM_v = New SqlCommand(str_v, SC_v)
CM_v.CommandText = "SELECT * FROM heyat_hesab WHERE heyat_no = '" & ddl_heyat.SelectedValue & "' "
If SC_v.State = ConnectionState.Closed Then
SC_v.Open()
End If
DR_v = CM_v.ExecuteReader()
If DR_v.Read <> False Then
lbl_mande.Text = DR_v("mande").ToString
Else
lbl_mande.Text = "0"
End If
DR_v.Close()
SC_v.Close()
[/VB
بعد از كليك كردن روي رديف مورد نظرم در گريد ويو اطلاعات فيلد مورد نظرم رو استخراج ميكنم
ولي مشكلم اينه كه من بايد آخرين ركورد بين فيلد هاي مشابه كه در شرط sql پيدا ميشن رو بدست بيارم
ولي برنامه اولي رو به من ميده
چطوري اين مشكل رو بر طرف كنم
ممنون از همه دوستان