1*cdf0e10cSrcweirAttribute VB_Name = "Module1"
2*cdf0e10cSrcweirOption Explicit
3*cdf0e10cSrcweir
4*cdf0e10cSrcweirSub main()
5*cdf0e10cSrcweir    Dim obj As Object
6*cdf0e10cSrcweir    Set obj = CreateObject("dcomtest.writerdemo.wsc")
7*cdf0e10cSrcweir    obj.run
8*cdf0e10cSrcweirEnd Sub
9