how to debug a server program

[=?Utf-8?B?YzY3NjIyOA==?=]

I have a testing client program, the purpose is send a xml file to a server
program, and the server return another xml message. So I wrote a testing
server program the simple one and make sure the communication is fine. After
that I started to program more complicated server program, since there are
many compliation error. The client program keep displaying:
The remote server returned an invalid statuscode: #8221;500 Internal Server
Error

Is there any way to display a detailed error message about the server
program in the web browser? So I can quickly debugging it and fix it, not to
have to waiting for an email from the program?

Thanks.

<%
Set xmlDom=CreateOb ject("Microsoft .XMLDOM")

XMLDom.async =False
xmlDom.load Server.MapPath( "0925SelectTest .xml")
DataToSend = xmlDom.xml

dim xmlhttp
set xmlhttp = server.Createob ject("MSXML2.Se rverXMLHTTP")
xmlhttp.Open "POST","htt ps://xxxx.com/TestCompleteB2B .asp",false
xmlhttp.setRequ estHeader "Content-Type", "applicatio n/x-www-form-urlencoded"
xmlhttp.send xmlDom.xml
if(Err <0) then
Response.Write( "An error occured when retrieving data from an external
source.<br />")
Response.Write( Err.Description )
Response.End
end if
On error goto 0
'if request is not Ok then display detailed message about the request
problem
if(xmlHttp.stat us <200) then
Response.Write( "The remote server returned an invalid statuscode: #8221;"
& _
xmlHttp.status & " " & xmlHttp.statusT ext)
Response.End
end if

'
--
Betty