---

Hei
Jeg har problemer med min error handling...
Jeg har lagd en subfunction som sender mail til meg om feilen med ASPEmail,
og redirecter brukeren til en error-side.
Når jeg kaller sendMail funksjonen nederst på en side, så skjer det
ingenting...
Progress måleren nederst i vinduet stopper... -> timeout
Jeg har lagt inn en feil i connection-Objectet for å teste og siden åpner
flere tabeller som skulle vært i conn-Objectet.
Men hvis jeg i hver error sjekk kaller denne suben, eller hvis jeg
kaller den før HTML'en og utskriftene av tabellene begynner, så fungerer
det.
Men hvis jeg gjør det sånn får jeg ikke med alle errorene og de forskjellige
tabellene og conn'en lukkes ikke (eller? og er det et problem at de ikke
lukkes)

HJELP!

Her er sub'en (ligger i en asp fil som inkluderes i toppen av siden)
<%
Sub sendMail()

If feil = true then

Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.frisurf.no"

Mail.From = "error@frisch.uio.no"
Mail.FromName = "Frischsenteret - Feilmelding"

Mail.AddAddress "lars.raaum@portalen.no", "Lars Raaum"

Mail.Subject = "ADO-feil"
Mail.Body = "Feil skjedde i filen: "&
request.ServerVariables("SCRIPT_NAME") & chr(10) & chr(13) & feilmelding

Mail.Send

Mail.Close
set Mail = nothing

response.Clear
response.Redirect("/includes/feil.asp")
End if
End sub

%>

Dette er koden som jeg plasserer etter ADO-operasjoner:
If err.Number <> 0 then
feil = true
feilmelding = feilmelding & chr(13) & chr(10) & "Feil: "& err.Number & "
" & err.Description & chr(13) & chr(10) & "Kilde: " & err.Source & chr(13) &
chr(10) & "Tidspunkt: " & now & chr(13) & chr(10)
end if

På toppen av siden har jeg <% response.Buffer = true %> og <% On Error
Resume Next %>. Helt nederst på siden har jeg <% call sendMail %>

Nok en gang: hjelp!

mvh
Lars