Urgent help-Cannot create a generic script resource in my cluster

Discussion in 'Clustering' started by Ralph, Aug 26, 2004.

  1. Ralph

    Ralph Guest

    HI,

    I have a vbs script to schedule jobs to run on windows 2003 clusters, when i
    try to create the ressource, i always get an exception error, the exact
    pop-up is

    An error occurred attempting to set properties
    Exception occurred
    Error ID:-2147352567 (80020009)

    Did any has an idea what can cause this and how to correct it.

    Thanks
     
    Ralph, Aug 26, 2004
    #1
    1. Advertisements

  2. Are there any additional errors in the cluster.log ??
    Note that you can find the cluster log under %windir%\cluster
    If you would like, go ahead an email me the script and I can take a look.

    --
    Thanks,
    Loay Shbeilat
    MSCS Admin Tools STE

    "This posting is provided "AS IS" with no warranties, and confers no
    rights."
    Use of included script samples, if any, are subject to the terms specified
    at http://www.microsoft.com/info/cpyright.htm
     
    Loay Shbeilat [MS], Aug 26, 2004
    #2
    1. Advertisements

  3. Ralph

    Ralph Guest

    Thanks for your quick reply

    here is my script, i have doen a little change to it and now the i'm getting
    Member not find error when i click finish to create the cluster resource.

    Dim objWMIService
    Dim objNewJob

    strComputer = "."
    Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
    Set objNewJob = objWMIService.Get("Win32_ScheduledJob")
    JobCreated = objNewJob.Create _
    ("cscript F:\Scripts\Updatehdir.vbs", "********012500.000000-420", _
    True , 64, , True, JobID)
    Set objWMIService = nothing
    set objNewJob = nothing

    i also got this in cluster log


    000008a0.000001f0::2004/08/27-01:46:31.910 INFO Generic Script <Generic
    Script >: Loaded script engine 'VBScript' successfully.
    000008a0.000001f0::2004/08/27-01:46:31.941 ERR Generic Script <Generic
    Script >: Generic Script did not implement LooksAlive() script entry point.
    This is a required script entry point.
    000008a0.000001f0::2004/08/27-01:46:31.941 ERR Generic Script <Generic
    Script >: Error loading script 'F:\Scripts\JOBSchedule.vbs'. HRESULT:
    0x80020003
    000008a0.000001f0::2004/08/27-01:46:31.941 INFO Generic Script <Generic
    Script >: Unloaded script engine 'VBScript' successfully.
    000008a0.00000e94::2004/08/27-01:46:31.941 WARN [RM] s_RmResourceControl:
    Resource <Generic Script > control operation 0x01400086 gives
    status=2147614723...
    000001e8.00000e0c::2004/08/27-01:46:31.941 INFO [FM] FmpRmResourceControl:
    RmResourceControl returned 2147614723 for resource
    47602af6-3ae0-4251-9041-6338fb6d2c4c, resid=24655512...

    Thanks for your help
     
    Ralph, Aug 27, 2004
    #3
  4. Ralph

    Ralph Guest

    Hi,

    after few investigation, i finally get to work with the following script


    Function Online( )
    '
    ' Application VBScript uses WMI to Schedule student folder creation
    '
    On Error Resume Next
    '
    ' For the local machine only...
    '
    strComputer = "."
    '
    ' ... Connect to variable...
    '
    Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
    Set objNewJob = objWMIService.Get("Win32_ScheduledJob")
    JobCreated = objNewJob.Create _
    ("cscript C:\Updatehdir.vbs", "********012500.000000-420", _
    True , 64, , True, JobID)
    Set objWMIService = nothing
    set objNewJob = nothing

    ' ... Return success
    Online = true
    End Function

    Function LooksAlive( )
    LooksAlive = true
    End Function

    Function IsAlive( )
    IsAlive = true
    End Function


    Thanks again for your help

     
    Ralph, Aug 27, 2004
    #4
    1. Advertisements

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.