MOTOBIT.COM - ASP upload, IIS utility Trace usage

Article | Member of Simple DNS+Traceroute.Trace | Changes | Purchase | Download

1. Identities

Library name: TCPIP 1.0 Type Library
Library code: TCPIP
Library CLSID: 741A8CC3-7EFC-11D1-BBB6-204C4F4F5020
ProgID: .Trace
Library file name: TCPIP.DLL

2. Scripting engines without types (VB Script, JavaScript, JScript, WSH, ASP)

You can create the object using CreateObject function:

Dim Trace
Set Trace = CreateObject(".Trace")
Trace.SomeMethod SomeParameters
Trace.SomeProperty = SomeValue

You can also use CreateObject method method of Server object (ASP) to put the Trace object to page scope or CreateObject method of WScript object in WSH.

You can also put the object to Application or Session scope using <object ...> tag in global.asa

<object runat="server" scope="application" id="Trace"
 progid=".Trace">
</object>

Please use ActivexObject object in JScript/JavaScript to create Trace object:

var Trace;
Trace = new ActiveXObject(".Trace");
Trace.SomeMethod(SomeParameters)
Trace.SomeProperty = SomeValue
...

3. VBA (VBA 5, VBA 6, Visual Studio, Word, Excel, MS Access, ...)

VBA 5/6: You can reference the library using menu Project -> References -> select 'TCPIP 1.0 Type Library' in the listbox (or Project -> References -> Browse -> select TCPIP.DLL file).
MSAccess, Word, Excel: Tools -> Macro -> Visual Basic Editor, then Tools -> References
Then you can write:

Dim Trace As New TCPIP.Trace
Trace.SomeMethod SomeParameters
Trace.SomeProperty = SomeValue
    ...

Dim Trace As TCPIP.Trace
...
Set Trace = New TCPIP.Trace
Trace.SomeMethod SomeParameters
Trace.SomeProperty = SomeValue
...

You can use CreateObject function also, of course:

Dim Trace As TCPIP.Trace
...
Set Trace = CreateObject(".Trace")
Trace.SomeMethod SomeParameters
Trace.SomeProperty = SomeValue
...

4. Visual Studio .NET (ASP.Net, VB.Net, C#, J#)

You can reference the library using menu Project -> Add reference -> COM tab -> select 'TCPIP 1.0 Type Library' in the listbox -> click Select. Then you can write (C#, J#):

 //create  a new Trace object
 TCPIP.Trace Trace = new TCPIP.TraceClass(); 
 Trace.set_String("Some text value"); 
 





 String SQL; 
 SQL = "Insert Into Table (BinaryColumn) values (0x" + Trace.get_HexString() + ")"; ...

or (VBA)

Dim Trace As New TCPIP.Trace 
Trace.SomeMethod(SomeParameters)
Trace.SomeProperty = SomeValue

5. T-SQL, MS SQL stored procedures and functions

DECLARE @Trace INT, @OLEResult INT 
EXECUTE @OLEResult = sp_OACreate '.Trace', @Trace OUT
IF @OLEResult <> 0 PRINT 'Error create component Trace'

--Set a property of Trace.
EXECUTE @OLEResult = sp_OASetProperty @Trace, 'PropertyName', @SomeSQLValue
IF @OLEResult <> 0 PRINT 'PropertyName set problem'

--Get a value of a property of Trace.
EXECUTE @OLEResult = sp_OAGetProperty @Trace, 'PropertyName', @SomeSQLValue OUTPUT
IF @OLEResult <> 0 PRINT 'PropertyName get problem'

--Call some method of Trace.
EXEC @OLEResult = sp_OAMethod @Trace, 'MethodName', 
 @ReturnValue OUTPUT, @parameter1, @parameter2

5. Other programming environments

Please see documentation of your programing environment, work with COM objects (OLE objects, ActiveX objects). Trace is a standard COM object, it can work with other environments, such are Delphi or PowerBuilder.