Protected Sub DataList1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataListCommandEventArgs) 

Handles DataList1.ItemCommand
        If e.CommandName = "Visualizza" Then
            'recupero il command argument
            Dim mieivalori As String = e.CommandArgument
            'splitto in base al carattere "@" che  ho usato come separatore nel mio string.format, usatop precedentemente
            Dim val As String() = mieivalori.Split("@")

            'Istanzio le due variabili di sessione che mi servono e gli assegno i valori che mi vengono dallo split
            Session("Elemento1PresoDalDB") = val(0)
            Session("Elemento2PresoDalDB") = val(1)

      'posso finalmente andare all'altra pagina...
      Server.Transfer("altrapagina.aspx")
        End If
End Sub