anybody ???

But i dint understand what is the use of the following attribute?

ItemInsertLocation="Beginning"

(bcz if v dont do order by in select stmt then items are inserted at the end)

Please clarify

So if the items in your list have a priority from 0-4 then it will assign a -1

If ItemInsertLocation is set to “End” the new entry in placed at the end of the list with a Priority greater the any in the list.

So if the items in your list have a priority from 0-4 then it will assign a 5

Please help.

   Protected Sub ReorderList1_ItemReorder(ByVal sender As Object, ByVal e As AjaxControlToolkit.ReorderListItemReorderEventArgs) Handles ReorderList1.ItemReorder

       'get Old Priority

       Dim oldI As Integer = e.OldIndex

       'get New Priority

       Dim newI As Integer = e.NewIndex

       'get the selected Item Value

       Dim selectedDK As String = ReorderList1.DataKeys(oldI).ToString()

       Dim i2updateList As String = ""

       'Build update list based on everything after/equal to the new priority but not equal to the selected one and in order so they can be updated in order

       Using oConn As SqlConnection = New SqlConnection(ConfigurationManager.ConnectionStrings("ibmas terConnectionString").ConnectionString)

           Dim sqlCmd As New SqlCommand("select id from client_todolist where id <> '" & selectedDK & "' and client_id='111193' and priority >= '" & newI & "' order by priority asc", oConn)

           oConn.Open()

           Using reader As SqlDataReader = sqlCmd.ExecuteReader()

               While reader.Read()

                   If i2updateList = "" Then

                       i2updateList = reader("id").ToString

                   Else

                       i2updateList &= "," & reader("id").ToString()

                   End If

               End While

           End Using

       End Using

       Dim newPriority As Integer = newI

       Dim rolArr As String()

       rolArr = i2updateList.Split(",")

       'update each from the list by 1

       For Each x In rolArr

           newPriority = newPriority + 1

           Using myConnection As SqlConnection = New SqlConnection(ConfigurationManager.ConnectionStrings("ibmas terConnectionString").ConnectionString)

               myConnection.Open()

               Dim myCommand As SqlCommand = New SqlCommand("update client_todolist set priority = '" & newPriority & "' where id='" & x & "'", myConnection)

               myCommand.ExecuteNonQuery()

           End Using

           newPriority = newPriority

       Next

       'finally, update the selected one for its changed priority

       Using myConnection As SqlConnection = New SqlConnection(ConfigurationManager.ConnectionStrings("ibmas terConnectionString").ConnectionString)

           myConnection.Open()

           Dim myCommand As SqlCommand = New SqlCommand("update client_todolist set priority = '" & newI.ToString() & "' where id='" & selectedDK & "'", myConnection)

           myCommand.ExecuteNonQuery()

       End Using

   End Sub

Thanks

The parent item page originally used Server.Transfer to navigate to the item detail page. The reorderlist would not reorder until a postback occurred. Then I changed the parent item page to Response.Redirect to the item detail and everything worked as I originally hoped it would.

Once you do that you simply class the values using the property name in place of the column name. To save the results you'll have to cycle through all of the reorderlistitem objects using a foreach loop. The trick to this is, you can't recall the property, instead you'll have to cheat a little by storing the values inside a hiddenvalue/textbox and using findcontrol to recapture the values and store them back into the xml file.

Hopefully this put you on the right track instead of having to waste a few hours figuring it out.