CFMX 6.1

I need to trap errors at a new host, Intermedia.net. The only info I have 
is an ASP script, below, which I am not familiar with.

Can anyone tell me the equivalent variables to use with CF to extract the 
variable info?

Thanks,

Nick


<%
Function getFirstKeyOfDictionary( dictionary )
     Dim key
     For Each key in dictionary
         getFirstKeyOfDictionary = key
         Exit Function
     Next
     getFirstKeyOfDictionary = ""
End Function

Function getErrorDescription( queryString )
     getErrorDescription = Split(getFirstKeyOfDictionary(queryString),";")
End Function

Dim redirect
' Set it to False if you simply want to complain about an error
redirect = True

If redirect Then
     ' Insert your own URL to redirect to
     Response.Redirect("http://www.mydomain.com/home.asp";)
Else
     Dim errorDescription
     errorDescription = getErrorDescription(Request.QueryString)
     Response.Write("<HTML><BODY>")
     Response.Write("Error number="&errorDescription(0)&"<br>")
     Response.Write("Error URL="&errorDescription(1)&"<br>")
     Response.Write("</BODY></HMTL>")
End If
%>


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
Logware (www.logware.us): a new and convenient web-based time tracking 
application. Start tracking and documenting hours spent on a project or with a 
client with Logware today. Try it for free with a 15 day trial account.
http://www.houseoffusion.com/banners/view.cfm?bannerid=67

Message: http://www.houseoffusion.com/lists.cfm/link=i:4:194138
Archives: http://www.houseoffusion.com/cf_lists/threads.cfm/4
Subscription: http://www.houseoffusion.com/lists.cfm/link=s:4
Unsubscribe: 
http://www.houseoffusion.com/cf_lists/unsubscribe.cfm?user=11502.10531.4
Donations & Support: http://www.houseoffusion.com/tiny.cfm/54

Reply via email to