mahyar12
چهارشنبه 18 آبان 1390, 10:03 صبح
سلام بر همه دوستان گرامی خسته نباشید
من چند سال پیش با vb.net2005کار کردم اما مدتی که ازش دور شدم وحالا دچار مشکل شدم
من می خوام به طور مثال شماره دانشجوی یه نفر رو بخونم و بقیه اطلاعات رو در لیبل نمایش بدم ویا یه شماره رو بخونم و تمامی اطلاعات در مورد اون رو حذف کنم
قبلا این کار رو کردم ، با اینکه کدش رو دارم در این ورژن مورد قبول نیست
نمونه ای از کدهی که قبلا نوشتم
Dim c, a, l, t, q As SqlClient.SqlCommand
s = "select name1 from funtionstudent where stno=@txt1 and password1=@txt2"
c = New SqlClient.SqlCommand(s, Me.SqlConnection1)
c.Parameters.Add("@txt1", Me.TextBox1.Text)
Me.SqlConnection1.Open()
Me.Label1.Text = c.ExecuteScalar()
یا برای حذف
Dim h, h1 As SqlClient.SqlCommand
Dim l, l1 As String
Dim p, p1 As SqlClient.SqlDataReader
l1 = "delete from sabt where cnamber=@w and snamber=@u"
h1 = New SqlClient.SqlCommand(l1, Me.SqlConnection1)
h1.Parameters.Add("@w", Me.TextBox1.Text)
h1.Parameters.Add("@u", Me.snamber.Text)
Me.SqlConnection1.Open()
h1.ExecuteNonQuery()
l = "select snamber,cnamber from sabt where snamber=@s"
h = New SqlClient.SqlCommand(l, Me.SqlConnection1)
h.Parameters.Add("@s", Me.snamber.Text)
p = h.ExecuteReader
Me.DataGrid1.DataSource = p
Me.DataGrid1.DataBind()
p.Close()
Me.SqlConnection1.Close()
اما الان هیچ کدوم کاربرد نداره اصلا نمی شناسه
چی کار کنم:گریه::گیج:
من چند سال پیش با vb.net2005کار کردم اما مدتی که ازش دور شدم وحالا دچار مشکل شدم
من می خوام به طور مثال شماره دانشجوی یه نفر رو بخونم و بقیه اطلاعات رو در لیبل نمایش بدم ویا یه شماره رو بخونم و تمامی اطلاعات در مورد اون رو حذف کنم
قبلا این کار رو کردم ، با اینکه کدش رو دارم در این ورژن مورد قبول نیست
نمونه ای از کدهی که قبلا نوشتم
Dim c, a, l, t, q As SqlClient.SqlCommand
s = "select name1 from funtionstudent where stno=@txt1 and password1=@txt2"
c = New SqlClient.SqlCommand(s, Me.SqlConnection1)
c.Parameters.Add("@txt1", Me.TextBox1.Text)
Me.SqlConnection1.Open()
Me.Label1.Text = c.ExecuteScalar()
یا برای حذف
Dim h, h1 As SqlClient.SqlCommand
Dim l, l1 As String
Dim p, p1 As SqlClient.SqlDataReader
l1 = "delete from sabt where cnamber=@w and snamber=@u"
h1 = New SqlClient.SqlCommand(l1, Me.SqlConnection1)
h1.Parameters.Add("@w", Me.TextBox1.Text)
h1.Parameters.Add("@u", Me.snamber.Text)
Me.SqlConnection1.Open()
h1.ExecuteNonQuery()
l = "select snamber,cnamber from sabt where snamber=@s"
h = New SqlClient.SqlCommand(l, Me.SqlConnection1)
h.Parameters.Add("@s", Me.snamber.Text)
p = h.ExecuteReader
Me.DataGrid1.DataSource = p
Me.DataGrid1.DataBind()
p.Close()
Me.SqlConnection1.Close()
اما الان هیچ کدوم کاربرد نداره اصلا نمی شناسه
چی کار کنم:گریه::گیج: