uden mærkelige tegn??

jeg har et lidt fint script som sender en mail, og virker rigtig godt, dog lige bortset fra at sådan nogle tegn som ? ! æ ø å osv. bliver lavet om til %093 et eller andet.. er det muligt at lave det sådan så den ikke gør det??

<%
    Dim objMail,emailbody
    Set objMail = Server.CreateObject("CDO.Message")
    objMail.To = "mail@mail.com"

    on Error resume next
    if request.Form("Name")<>"" then
        i=0
        FormItems=split(request.Form,"&")
        Do While Err.number=0       
            if Instr(1,FormItems(i)," = ")<>len(FormItems(i))then
                FormItems(i)=replace(replace(replace(replace(FormItems(i),"+"," "),"%2F","/"),"%2C",","),"="," = ")
                EmailBody=EmailBody & FormItems(i) & VbCrLf & VbCrLf
            end if
            i=i+1
            if Instr(1,FormItems(i),"SubmitBtn")>0 then exit Do           
        Loop
        Err.clear
    end if

    objMail.Subject = "title"
    objMail.From = "mail@mail.com"
    objMail.TextBody = EmailBody
    objMail.Send
    Set objMail = Nothing

%>

på forhånd tak..

mvh
bobolaj