dr.pantagon
دوشنبه 05 فروردین 1387, 03:08 صبح
سلام
می خوام یک سری اطلاعات رو حذف کنم کد هم فکر می کنم درسته ولی ارورو میده نمی دونم چرا :گریه:
Private Sub DataGrid1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs ) Handles DataGrid1.ItemCommand
Dim conn As New SqlClient.SqlConnection
Dim comm As New SqlClient.SqlCommand
Dim Users As SqlClient.SqlDataReader
Dim re As SqlDataReader
If e.CommandName.Equals("cmdelete") Then
conn.ConnectionString = "workstation id=REZA;packet size=4096;user id=sa;data source=REZA;persist security info=True;initial catalog=hesabisp;password=reza"
comm.Parameters.Clear()
comm.CommandText = "delete from regisrer Where uid='" + e.CommandArgument.ToString() + "' "
conn.Open()
re = comm.ExecuteReader
re.Close()
conn.Close()
bindgrid()
End If
End Sub
می خوام یک سری اطلاعات رو حذف کنم کد هم فکر می کنم درسته ولی ارورو میده نمی دونم چرا :گریه:
Private Sub DataGrid1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs ) Handles DataGrid1.ItemCommand
Dim conn As New SqlClient.SqlConnection
Dim comm As New SqlClient.SqlCommand
Dim Users As SqlClient.SqlDataReader
Dim re As SqlDataReader
If e.CommandName.Equals("cmdelete") Then
conn.ConnectionString = "workstation id=REZA;packet size=4096;user id=sa;data source=REZA;persist security info=True;initial catalog=hesabisp;password=reza"
comm.Parameters.Clear()
comm.CommandText = "delete from regisrer Where uid='" + e.CommandArgument.ToString() + "' "
conn.Open()
re = comm.ExecuteReader
re.Close()
conn.Close()
bindgrid()
End If
End Sub