Request for Help

Solved: See the comment below.

I have a VB6 DLL component that grabs content from a database and spits it out to HTML. It’s called from a (non-.NET) ASP page in IIS5.

I compiled the DLL and loaded it onto a test server (Win2k Server). I’m using WAST to stress-test the system, and found a weird error.

About 10% of the time, I’m getting an error that says:Error Type:
MyDLL (0x800A01AD)
ActiveX component can't create object
/connect.inc.asp, line 43

Of course, line 43 is this:set mobjN = server.createobject("MyDLL.CMyClass")

I’ve researched this online, and found that permissions and DLL hell are the most often causes of this error. However, it’s only happening sometimes, and most of the time, the page works fine. Just to be sure, I tested the DLL with depends.exe (everything was loaded fine) and made sure that Everyone, Authenticated Users, IWAM_ServerName, and IUSR_ServerName had full control of the DLL file. It seems to show up when I run the stress test with about 100 users, but I’ve been able to get the pages to fail once in a while by just changing screens quickly.

I don’t think that this is a problem with the vb class module itself, since it fails as it’s creating the object, rather than throwing some weird error when calling one of the methods. When the DLL is running interpretively on my XP Pro machine, I can hit it 1000 times/minute without any failures at all, and the project never locks up or stops with errors.

Has anyone out there ever encountered this 800A01AD error sporadically? Anything else that I should check?

Any help is much appreciated.

One Response to “Request for Help”

  1. On May 9th, 2005 at 10:16:07, Isaac Schlueter Said:

    Got a solution:On Error Resume Next
    set mobjN = server.createobject("MyDLL.CMyClass")
    If Err.Number<>0 Then
       If Session("RedirectCount")>10 Then
        Response.Write("this page is temporary unavailable. please try again later")
        Response.END
       Else
        Session("RedirectCount")=Session("RedirectCount")+1
        Response.Redirect(Request.ServerVariables("Script_Name"))
       End If
    End If
    On Error Goto 0

    Much thanks to Shadow Wizard.

Leave a Reply

Comments are moderated like crazy using a variety of plugins. There is a very high likelihood that your comment won't show up right away, especially if you have never commented here before, but it was not deleted.

Please be patient, and do not post your comment more than once. It will show up once it is approved.

You must be logged in to post a comment.