Namespace aaaa


    Public Interface IDocumentoTemplateLista

        Sub SetXml(ByVal sXml As String)
        Function GetXml() As String

    End Interface

    Public Class bb

        Public Sub ssss()
            Dim o As Object
            Dim aa As aaaa.IDocumentoTemplateLista
        End Sub

    End Class


End Namespace

Imports System.Xml
Imports System.IO


Public Class VISURA    

Inherits System.Web.UI.UserControl

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim a As New pcs_wrapper.wrapper...(quella che mi serve non compare)    
End Sub
 

Imports pcs_wrapper.wrapper....NULLA
Imports System.Xml
Imports System.IO



Public Class VISURA_CAMERALE
    Inherits System.Web.UI.UserControl

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim x As New pcs_wrapper.wrapper..IDEM
    End Sub

    Protected Sub btnApri_68_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnApri_68.Click


        Dim ds As New DataSet
        ds.ReadXml(New StringReader(lblDatiXml_68.Text))

        rpt_68.DataSource = ds
        rpt_68.DataBind()


        rw_68.Visible = True
        rw_68.VisibleOnPageLoad = True

    End Sub