PDA

Click to See Complete Forum and Search --> : Arrrghh!! Com Problems


josmond
Apr 22nd, 2001, 10:27 AM
I am having trouble with a com+ dll. I am using VB6 and Windows 2000 Advanced Server.
I have downloaded imgsize.zip from http://www.serverobjects.com and imported it into Component Service Manager.
I have set the idle minutes for shutdown to 1 minute. I have called the object from a VB6 form using the following code:

Dim Img As ImgSize.Check

Private Sub Command1_Click()
CheckFile ("C:\WINNT\Coffee Bean.bmp")
End Sub

Sub CheckFile(strFileName)
Set Img = New ImgSize.Check
Img.FileName = strFileName
If Img.Error <> "" Then
MsgBox "Error"
Else
MsgBox "Height:" & Img.Height & Chr(10) & "Width:" & Img.Width
End If
Set Img = Nothing
End Sub

As expected, watching Component Service Manager the imgsize ball begins to spins and after a minute it stops - GREAT!!

Now I want this to happen with ASP. I call the Object from ASP using the following code:

<%
Dim Img
sub CheckFile (strFileName)
set Img = Server.CreateObject ("ImgSize.Check")
Img.FileName = strFileName
if Img.Error <> "" then
Response.Write "Error"
else
Response.Write "<p>Image <b>" & strFileName & "</b> successfully read.<br>"
Response.Write "Image Height = <b>" & Img.Height & "</b><br>"
Response.Write "Image Width = <b>" & Img.Width & "</b></p>"
end if
set Img = nothing
end sub
CheckFile ("C:\WINNT\Coffee Bean.bmp")
%>

As expected, watching Component Service Manager the imgsize ball begins to spins and after a minute it continues to spin - it never seems to stop - arrrgghhh!!!??

Why is this?? Is this a bug??
I have checked knowledge bases to no avail.

Could someone verify that it's not just my machine that is causing this problem??

Thankyou for your interest