在Asp 中呼叫ActiveX dll 與標準執行檔 作相同的動作，速度差很(編號：6519)

各位大哥:
小弟使用一個C++作成的純DLL，可以轉txt成tif檔(Convert2tif.dll)。，再用VB引用作成一個標準執行檔，速度很快，不用1秒就可以轉換完成，但是如果作ActiveX DLL來讓asp呼叫，速度變成烏龜，請幫我看看那寫錯了，我的系統是NT4+IIS4+VB6+SP4。
標準執行檔程式碼
Private Declare Function FaxConvert2Tif Lib "c:\winnt\system\Convert2Tif.dll" (ByVal Soucepath As String, ByVal targetpath As String) As Boolean
Private Sub Form_Load()

transcode = FaxConvert2Tif("C:\\test.txt", "c:\\test.tif")
MsgBox transcode
End
End Sub
ActiveX Dll程式碼
Private Declare Function FaxConvert2Tif Lib "C:\WINNT\system\Convert2Tif.dll" (ByVal SrcPath As String, ByVal TarPath As String) As Boolean

Public Function trans(ByVal SPath As String, ByVal TPath As String) As Boolean
trans = FaxConvert2Tif(SPath, TPath)
End Function
在asp呼叫的程式碼
Set transtif=server.createobject("text2tif.Fax2Tif")
各位大哥:
小弟使用一個C++作成的純DLL，可以轉txt成tif檔(Convert2tif.dll)。，再用VB引用作成一個標準執行檔，速度很快，不用1秒就可以轉換完成，但是如果作ActiveX DLL來讓asp呼叫，速度變成烏龜，請幫我看看那寫錯了，我的系統是NT4+IIS4+VB6+SP4。
標準執行檔程式碼
Private Declare Function FaxConvert2Tif Lib "c:\winnt\system\Convert2Tif.dll" (ByVal Soucepath As String, ByVal targetpath As String) As Boolean
Private Sub Form_Load()

transcode = FaxConvert2Tif("C:\\test.txt", "c:\\test.tif")
MsgBox transcode
End
End Sub
ActiveX Dll程式碼
Private Declare Function FaxConvert2Tif Lib "C:\WINNT\system\Convert2Tif.dll" (ByVal SrcPath As String, ByVal TarPath As String) As Boolean

Public Function trans(ByVal SPath As String, ByVal TPath As String) As Boolean
trans = FaxConvert2Tif(SPath, TPath)
End Function
在asp呼叫的程式碼
Set transtif=server.createobject("text2tif.Fax2Tif")
　 transcode=transtif.trans("c:\\test.txt","c:\\test.tif")
　
Set transtif=nothing