Problem med danske tegn tegn

Jeg har problemer med min side der ikke håndter æ ø og å rigtigt. Tegnene bliver udskrivet som æ, ø Ã¥, � eller lign.


Her er hele min kode:

<%@ Page Language="vb" ContentType="text/html"
    ResponseEncoding="ISO-8859-1" Debug="False" trace="False"%>
<%@ import Namespace="System.IO" %>

<script runat="server">
Sub Page_Load(Sender As Object, E As EventArgs)

'PARAMETERS
  Dim beginDate as Date = Request("Dato")
  Dim endDate as Date  = Request("Dato")
  Dim myLocation as String = ""
  Dim mySubject as String = Request("Subject")
  Dim myDescription as String = Request("Body")
'INITIALIZATION
  Dim mStream As new MemoryStream()
  Dim writer As new StreamWriter(mStream)
  writer.AutoFlush = true
'HEADER
  writer.WriteLine("BEGIN:VCALENDAR")
  writer.WriteLine("PRODID:-//Flo Inc.//FloSoft//EN")
  writer.WriteLine("BEGIN:VEVENT")
'BODY
  writer.WriteLine("DTSTART:" & _
            beginDate.ToUniversalTime.ToString("yyyyMMdd\THHmmss\Z") )
  writer.WriteLine("DTEND:" & _
          endDate.ToUniversalTime.ToString("yyyyMMdd\THHmmss\Z") )
  writer.WriteLine("LOCATION:" & myLocation)
  writer.WriteLine("DESCRIPTION;ENCODING=QUOTED-PRINTABLE:" & myDescription)
  writer.WriteLine("SUMMARY:" & mySubject)
'FOOTER
  writer.WriteLine("PRIORITY:3")
  writer.WriteLine("END:VEVENT")
  writer.WriteLine("END:VCALENDAR")
'MAKE IT DOWNLOADABLE
  Response.Clear() 'clears the current output content from the buffer
  Response.AppendHeader("Content-Disposition", _
            "attachment; filename=CAS-Appointment.vcs")
  Response.AppendHeader("Content-Length", mStream.Length.ToString())
  Response.ContentType = "application/download"
  Response.BinaryWrite(mStream.ToArray())
  Response.End()
End Sub
</script>