Share via

Implementing with Script Components

  • Article

You implement your design as a scriptlet by creating an XML file, which is much like an HTML file, but contains special elements that define the scriptlet and its behavior. The elements used for defining script components are not standard HTML tags. Instead, they are XML elements that are specifically used for scriptlet definitions.

When defining a scriptlet, you create these elements:

  • Scriptlet element: An element that encloses the entire scriptlet definition.
  • Registration element: An element that includes information used to register your scriptlet as a COM automation component.
  • Implements element: An element that specifies the COM interface handler for the scriptlet, which determines what type of COM component the scriptlet will be. For example, for script components that you develop to be called by ASP, you should specify that the scriptlet implements the Automation handler, which allows your scriptlet to be used as a COM automation component. Inside the Implements element, you specify information specific to the interfaces you are implementing. In the case of a COM Automation component, for example, you specify the methods and properties that your scriptlet will make available.
  • Script element: An element containing the script used to implement the logic of your scriptlet. The types of script you write depends on what type of COM component you are creating. If you are creating a COM automation component, for example, you implement your scriptlet's methods and properties in the SCRIPT element.

If your scriptlet needs to access the ASP built-in objects, you must create an object that is bound to the COM+ ObjectContext object. This is necessary because the scriptlet will not be compiled until your ASP page calls it. The following VBScript snippet demonstrates binding an object to the COM+ ObjectContext object and using the bound object to access the Response object.

  Set objCurr = CreateObject("MTxAS.AppServer.1")
Set objCurrObjCont = objCurr.GetObjectContext()
Set vntResp = objCurrObjCont("Response")
Example

The following example demonstrates using a scriptlet to send a response to the client.

  <scriptlet>

<Registration
   Description="Writer"
   ProgID="Writer.Scriptlet"
   Version="1.00">
</Registration>

<implements id=Automation type=Automation>
   <method name=sendResponse>
   </method>
</implements>

<script language=VBScript>

function sendResponse()
  Dim objCurr
  Dim objCurrObjCont
  Dim vntResp

  Set objCurr = CreateObject("MTxAS.AppServer.1")
  Set objCurrObjCont = objCurr.GetObjectContext()
  vntResp = objCurrObjCont("Response").Write ("Hello World")

end function

</scriptlet>