hi

i need to perform drag and drop operation

TreeView --- TreeView
TreeView --- ListView
ListView --- TreeView

so one at a time... i have tried a bit but seem to have a problem...


Code:
Private Sub TV_ORG_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TV_ORG.DragEnter
        e.Effect = DragDropEffects.Move
    End Sub

Private Sub TV_ORG_ItemDrag(ByVal sender As Object, ByVal e As System.Windows.Forms.ItemDragEventArgs) Handles TV_ORG.ItemDrag
        DoDragDrop(e.Item, DragDropEffects.Move)
    End Sub

    Private Sub TV_ORG_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TV_ORG.DragDrop
        Dim Nd As TreeNode
        Try
            Dim newNode As TreeNode = New TreeNode(e.Data.GetData("System.Windows.Forms.TreeNode"))
            If Nd.Equals(newNode) = False Then
                Nd.Nodes.Add(New TreeNode(newNode.Clone))
                newNode.Remove()
            End If
        Catch ex As Exception
            StatusBar1.Panels(0).Text = ex.Message
        End Try
    End Sub

the problem area look like  when i debug it...

            Dim newNode As TreeNode = New TreeNode(e.Data.GetData("System.Windows.Forms.TreeNode"))

the error i get is
Cast fro TreeNode to String is not Valid