Can WSC components share code?

ASP Free Forums Sponsor:

August 14th, 2009, 04:11 AM

spot

Registered User

Join Date: Aug 2009

Posts: 8

Time spent in forums: 2 h 48 m 42 sec
Reputation Power: 0

Can WSC components share code?

Is it possible to have code that can be shared between components within a WSC? Something like this for example;

Code:

<package>

<component id='a'>
  <public>
    <property name="p"><get/></property>
  </public>
  <script language="VBScript">
    <![CDATA[
      Function get_p()
        get_p = Hello()
      End Function
    ]]>
  </script>
</component>

<component id='b'>
  <public>
    <property name="p"><get/></property>
  </public>
  <script language="VBScript">
    <![CDATA[
      Function get_p()
        get_p = Hello()
      End Function
    ]]>
  </script>
</component>

Function Hello()
  Hello = "Hello world"
End Function

</package>

Wrapping up the "Sub Hello()" code as a component would make it public.

What I want the ability to share code between components within the package without making the shared code public. Is that possible?

Regards.

August 15th, 2009, 04:12 AM

Nilpo

Shaolin Scripter!™

ASP Free Intermediate (1500 - 1999 posts)

Join Date: Jun 2006

Location: Salem, OH

Posts: 1,880

Folding Points: 214558 Folding Title: Super Ultimate Folder - Level 1

Time spent in forums: 1 Week 2 Days 8 h 47 m 8 sec
Reputation Power: 967

Quote:

Originally Posted by spot

Wrapping up the "Sub Hello()" code as a component would make it public.

Enclosing a function in a component does not make it public. It must be declared public like this:

vb Code:

Original - vb Code
<component> <?component error="false" debug="false"?> <public> <method name="Hello"> </method> </public> </component>

<component>
   <?component error="false" debug="false"?>
   <public>
       <method name="Hello">
       </method>
   </public>
</component>

You can learn more by reading my three-part series on Windows Script Components.

Introducing Custom Objects with WSC

Creating a Custom Object with WSC

Coding a Custom Object with WSC

__________________

Don't like me? Click it.

Scripting problems? Windows questions? Ask the Windows Guru!

Stay up to date with all of my latest content. Follow me on Twitter!

Help us help you! Post your exact error message with these easy tips!

Last edited by Nilpo : August 15th, 2009 at 04:16 AM.

August 15th, 2009, 05:45 AM

spot

Registered User

Join Date: Aug 2009

Posts: 8

Time spent in forums: 2 h 48 m 42 sec
Reputation Power: 0

Thanks Nilpo.

How do I reference the second component from the first one without making its properties public?

Say Component A uses Component B like this;

Code:

<?xml version="1.0"?>
<package>

<component id="A">
  <public>
    <property name="P"><get/></property>
  </public>

  <script language="VBScript">
  <![CDATA[
  Option Explicit

  Function get_P()
    Dim objB
    Set objB = CreateComponent("B")
    get_P = "Hello " & objB.P
  End Function

  ]]>
  </script>
</component>

<component id="B">

  <public>
    <property name="P"><get/></property>
  </public>

  <script language="VBScript">
  <![CDATA[
  Option Explicit

  Function get_P()
    get_P = "world"
  End Function

  ]]>
  </script>
</component>

</package>

Calling code:

Code:

<%
Dim strWscPath, objA

strWscPath = Server.MapPath("main.wsc")
Set objA = GetObject("script:" & strWscPath & "#A")
Response.Write(objA.P)
Set objA = Nothing
%>

Result: "Hello world".

But I can't get component A to use component B without making component B public.

Do you know if it is possible?

Thanks.

August 15th, 2009, 10:12 AM

Nilpo

Shaolin Scripter!™

Join Date: Jun 2006

Location: Salem, OH

Posts: 1,880

Time spent in forums: 1 Week 2 Days 8 h 47 m 8 sec
Reputation Power: 967

To my knowledge this isn't possible. A component cannot see a method in another component unless it's exposed publicly. That's the nature of having a self contained object.

You can, however, have private methods within a single component.

August 17th, 2009, 02:12 PM

spot

Registered User

Join Date: Aug 2009

Posts: 8

Time spent in forums: 2 h 48 m 42 sec
Reputation Power: 0

Thanks for the info Nilpo

Viewing: ASP Free Forums > System Administration > Windows Scripting > Can WSC components share code?

« Previous Thread | Next Thread »

Thread Tools	Search this Thread
Email this Page	Search this Thread: Advanced Search
Display Modes	Rate This Thread
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode	Rate This Thread:

Posting Rules
You may not post new threads You may not post replies You may not post attachments You may not edit your posts vB code is On Smilies are On [IMG] code is On HTML code is Off

View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox

Forum Jump

Free IT White Papers!

How to Present Effectively Online
This white paper offers practical and actionable advice on the key steps that any presenter should consider as they plan and execute a Webinar or online meeting.

Open Source Security Myths
Open Source Software (OSS) is computer software whose source code is available to the general public with relaxed or non-existent intellectual property restrictions (or arrangement such as the public domain), and is usually developed with the input of many contributors.

Power and Cooling Capacity Management for Data Centers
This paper describes the principles for achieving power and cooling capacity management.

Scalable, Fault-Tolerant NAS for Oracle - The Next Generation
For several years NAS has been evolving as a storage alternative for Oracle databases, and for good reason: NAS is quite often the simplest, most cost-effective storage approach for Oracle. Learn about the benefits that HP's approach to scalable NAS brings to Oracle environments in this comprehensive white paper.

Understanding Web Application Security Challenges
This white paper discusses many common threats and preventive measures for Web application security, and explains what you can do to help protect your organization.

More Free IT White Papers!