WBEM_FLAG_USE_AMENDED_QUALIFIERS

I have a bit of VB code I took from the Microsoft Technet Scripting resource
site as follows:
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate,(Security)}!\\" & _
strComputer & "\root\cimv2")

Set colLogFiles = objWMIService.ExecQuery _
("Select * from Win32_NTEventLogFile")

For each objLogfile in colLogFiles
strLogFileName = objLogfile.Name
Set wmiSWbemObject = GetObject _
("winmgmts:{impersonationLevel=Impersonate}!\\.\root\cimv2:" _
& "Win32_NTEventlogFile.Name='" & strLogFileName & "'")
wmiSWbemObject.MaxFileSize = 2500000000
wmiSWbemObject.OverwriteOutdated = 14
wmiSWbemObject.Put_
Next


and found it errors upon running with the following error message, "an
amended object cannot be put unless WBEM_FLAG_USE_AMENDED_QUALIFIERS is
specified"..... how do I get around this? I've checked on the MSDN site fo
help but it all goes a little over my head!!!.
Please can any clever person help?

Philip

Torgeir
Fri Oct 29 11:32:43 CDT 2004

Struggling_VB_Scripter wrote:

> [snip]
>
> and found it errors upon running with the following error message, "an
> amended object cannot be put unless WBEM_FLAG_USE_AMENDED_QUALIFIERS is
> specified"..... how do I get around this? I've checked on the MSDN site fo
> help but it all goes a little over my head!!!.
> Please can any clever person help?
>
> Philip
Hi

Google newsgroup search is your friend :-)

http://groups.google.com/groups?as_q=amended%20object%20put%20unless%20WBEM_FLAG_USE_AMENDED_QUALIFIERS&safe=images&ie=UTF-8&oe=UTF-8&as_ugroup=microsoft.public.*&lr=lang_en&as_scoring=d&hl=en

e.g. this one:

http://groups.google.com/groups?selm=0ssg0vguvemh4hs8l64nkq4akpfmtuokfh%404ax.com



--
torgeir, Microsoft MVP Scripting and WMI, Porsgrunn Norway
Administration scripting examples and an ONLINE version of
the 1328 page Scripting Guide:
http://www.microsoft.com/technet/scriptcenter/default.mspx

StrugglingVBScripter
Mon Nov 01 03:13:02 CST 2004

Torgeir,

thanks very much for your pointers, I checked out that site and found the
answer.... which was to modify the line " wmiSWbemObject.Put_" to "
wmiSWbemObject.Put_(131072)" ..... shame that Microsoft missed that crucial
bit off!.

Once again, thanks for your help.

Philip

"Torgeir Bakken (MVP)" wrote:

> Struggling_VB_Scripter wrote:
>
> > [snip]
> >
> > and found it errors upon running with the following error message, "an
> > amended object cannot be put unless WBEM_FLAG_USE_AMENDED_QUALIFIERS is
> > specified"..... how do I get around this? I've checked on the MSDN site fo
> > help but it all goes a little over my head!!!.
> > Please can any clever person help?
> >
> > Philip
> Hi
>
> Google newsgroup search is your friend :-)
>
> http://groups.google.com/groups?as_q=amended%20object%20put%20unless%20WBEM_FLAG_USE_AMENDED_QUALIFIERS&safe=images&ie=UTF-8&oe=UTF-8&as_ugroup=microsoft.public.*&lr=lang_en&as_scoring=d&hl=en
>
> e.g. this one:
>
> http://groups.google.com/groups?selm=0ssg0vguvemh4hs8l64nkq4akpfmtuokfh%404ax.com
>
>
>
> --
> torgeir, Microsoft MVP Scripting and WMI, Porsgrunn Norway
> Administration scripting examples and an ONLINE version of
> the 1328 page Scripting Guide:
> http://www.microsoft.com/technet/scriptcenter/default.mspx
>