1Attribute VB_Name = "Module1"
2Option Explicit
3
4Sub main()
5    Dim obj As Object
6    Set obj = CreateObject("dcomtest.writerdemo.wsc")
7    obj.run
8End Sub
9