Problema Con Class

[EDGARDO MOGUELLA]

Buenas gente,

tratando de meterle algo de mano al ASP.NET, me cree una class Persoon.
Esta la escribi en vb.net

la compilo con el studio.net y guardo el dll en el directorio bin de la aplicacion web en cuestion..

Estoy haciendo algo mal o me falta hacer algo, pues cuando trato de crear una referencia a la clase creada ocurre un error...

agradeceria cualquier ayuda...

Código:

 Compiler Error Message: BC30182: Type expected.

Source Error:

Line 12: <script runat="server">
Line 13: 	
Line 14: 	Dim p As New Persoon()
Line 15: 	Dim p As New Persoon("Edgardo", "", "Moguella", "[email protected]")
Line 16: 	


Source File: D:\w3sites\JSNETFRAMED\persoon.aspx    Line: 14

El codigo de la classe es el siguiente.

Código:

Public Class Persoon

    Private _naam As String
    Private _voornaam As String
    Private _tussenvoegsels As String

    Private _geboortedatum As Date

    Private _adres As String
    Private _postcode As String
    Private _plaats As String

    Private _telefoon As String
    Private _mobiel As String
    Private _fax As String

    Private _email As String
    Private _url As String

    Public Property Naam() As String
        Get
            Naam = _naam
        End Get
        Set(ByVal Value As String)
            _naam = Value
        End Set
    End Property

    Public Property Voornaam() As String
        Get
            VoorNaam = _voornaam
        End Get
        Set(ByVal Value As String)
            _voornaam = Value
        End Set
    End Property

    Public Property Tussenvoegsels() As String
        Get
            Tussenvoegsels = _tussenvoegsels
        End Get
        Set(ByVal Value As String)
            _tussenvoegsels = Value
        End Set
    End Property

    Public Property GeboorteDatum() As Date
        Get
            GeboorteDatum = _geboortedatum
        End Get
        Set(ByVal Value As Date)
            _geboortedatum = Value
        End Set
    End Property

    Public Property Adres() As String
        Get
            Adres = _adres
        End Get
        Set(ByVal Value As String)
            _adres = Value
        End Set
    End Property

    Public Property PostCode() As String
        Get
            PostCode = _postcode
        End Get
        Set(ByVal Value As String)
            _postcode = Value
        End Set
    End Property

    Public Property Plaats() As String
        Get
            Plaats = _plaats
        End Get
        Set(ByVal Value As String)
            _plaats = Value
        End Set
    End Property

    Public Property Telefoon() As String
        Get
            Telefoon = _telefoon
        End Get
        Set(ByVal Value As String)
            _telefoon = Value
        End Set
    End Property

    Public Property Mobiel() As String
        Get
            Mobiel = _mobiel
        End Get
        Set(ByVal Value As String)
            _mobiel = Value
        End Set
    End Property

    Public Property Fax() As String
        Get
            Fax = _fax
        End Get
        Set(ByVal Value As String)
            _fax = Value
        End Set
    End Property

    Public Property EMail() As String
        Get
            EMail = _email
        End Get
        Set(ByVal Value As String)
            _email = Value
        End Set
    End Property

    Public Sub New()
        _naam = ""
        _voornaam = ""
        _tussenvoegsels = ""

        _geboortedatum = Now

        _adres = ""
        _postcode = ""
        _plaats = ""

        _telefoon = ""
        _mobiel = ""
        _fax = ""

        _email = ""
        _url = ""
    End Sub

    Public Sub New(ByVal Voornaam As String, ByVal Tussenvoegsels As String, ByVal Naam As String, ByVal Email As String)
        _naam = Naam
        _voornaam = Voornaam
        _tussenvoegsels = Tussenvoegsels

        _geboortedatum = Now

        _adres = ""
        _postcode = ""
        _plaats = ""

        _telefoon = ""
        _mobiel = ""
        _fax = ""

        _email = Email
        _url = ""
    End Sub

    Protected Overrides Sub Finalize()
        MyBase.Finalize()
    End Sub
End Class

la siguiente pagina aspx hace use de la clase arriba definida, o por lo menos eso es lo que quiero que suceda...

Código:

<%@ Page language="VB" %>
<%@ Import Namespace="Persoon"%>
		
<script runat="server">
	
	Dim p1 As New Persoon()
	Dim p2 As New Persoon("Edgardo", "", "Moguella", "[email protected]")
	
</script>
<html>
	<head>
		<title>Welcome</title>
   </head>
	<body>
<ASP:Label ID="Errorlabel">
<ASP:Label ID="Finishedlabel">

   </body>
</html>