Does your server have those objects installed?
What is the exact error?

Try before the code
On Error Resume Next

Then after the code
response.write Err.Code & vbCrLf & Err.Description