Problem med ASPEmail...

Jeg har et problem med ASPEmail. Mit script således ud:


Set Mail = Server.CreateObject("Persits.MailSender")

Dim Mail As MailSender

Set Mail = New MailSender

Mail.Host = "smtp.server.dk"
Mail.Port = 25 ' Optional. Port is 25 by default

Mail.From = "mail@server.dk"
Mail.FromName = "navn" ' Optional

Mail.AddAddress "mail@noget.dk", "navn"
Mail.AddCC "nogetandet@server.dk" ' Name is optional

Mail.Subject = "Subject"
Mail.Body = "<HTML><BODY BGCOLOR=#FFFFFF>Hej<br><br>"
Mail.Body = Mail.Body & "<p>Indhold </p></BODY></HTML>"
Mail.IsHTML = True

On Error Resume Next
Mail.Send
If Err <> 0 Then
    Response.Write "An error occurred: " & Err.Description
End If

Når jeg så kører scriptet får jeg følgende fejlmeddelelse:

Fejltype:
Der opstod en Microsoft VBScript-kompileringsfejl (0x800A0401)
Slut på sætning var ventet
script.asp, line 29, column 9
Dim Mail As MailSender


Hvad har jeg gjort galt?