$web = Get-SPWeb <URL del SubSitio>
$lista= $web.Lists["Nombre Lista"]
$columna = $lista.Fields["Modified"]
$columna.Indexed
$columna.Indexed = $true
$columna.Update()
$lista.Update()
$web.Dispose()

$web = Get-SPWeb <URL del SubSitio>
$lista = $web.Lists["Nombre Lista"]
$columna = $lista.Fields["Modificado"]
$columna.Indexed
$columna.Indexed = $true
$columna.Update()
$lista.Update()
$web.Dispose()

Option Explicit


Dim oAPI, oArgs
Dim SourceID, ManagedEntityId, TargetComputer
Dim oDiscoveryData, oInst
Dim oFso


Set oAPI = CreateObject("MOM.ScriptAPI")

' Arguments:

' 0 - SourceID

' 1 - ManagedEntityID

' 2 - ComputerIdentity

Set oArgs = WScript.Arguments
if oArgs.Count < 3 Then
Call oAPI.LogScriptEvent("DiscoveryFICHERO.vbs",9999,2, _
"script was called with fewer than three arguments and was not executed.")
Wscript.Quit -1
End If

SourceId = oArgs(0) ' The GUID of the discovery object that launched the script.
ManagedEntityId = oArgs(1) ' The GUID of the computer class targeted by the script.
TargetComputer = oArgs(2) ' The FQDN of the computer targeted by the script.

Set oFso = CreateObject("Scripting.FileSystemObject")

Set oDiscoveryData = oAPI.CreateDiscoveryData(0, SourceId, ManagedEntityId)

If (oFso.FileExists("C:\windows\FICHERO.ini")) Then

' Discovered the application. Create the application instance.
Set oInst = oDiscoveryData.CreateClassInstance("$MPElement[Name='FICHERO.Server']$")

' Define the property values for this instance. Available
' properties are determined by the Management Pack that
' defines the class.
Call oInst.AddProperty("$MPElement[Name='Windows!Microsoft.Windows.Computer']/PrincipalName$", TargetComputer)
Call oInst.AddProperty("$MPElement[Name='Wautemis.Server']/IsFICHERO$", "True")
Call oDiscoveryData.AddInstance(oInst)
End If

' Submit the discovery data for processing.
Call oAPI.Return(oDiscoveryData) 

SELECT * FROM dbo.EVENT
WHERE EVENTID= 13344

Miniaturas adjuntas

// Creates a custom property that is a Boolean value.
// This property will display as a check box in the
// property pane.

private bool _myBool;

[Category("Custom Properties")]
[DefaultValue(c_MyBoolDefault)]
[WebPartStorage(Storage.Personal)]
[FriendlyNameAttribute("Custom Boolean")]
[Description("Select to set value to True.")]
[Browsable(true)]
[XmlElement(ElementName="MyBoolean")]
// The accessor for this property.
public bool MyBool
{
get
{
return _myBool;
}
set
{
_myBool = value;
}
}

 [AttributeDeclaration1, AttributeDeclaration2,...]
public PropertyTypePropertyVariable
private PropertyTypePrivatePropertyVariable
{
get
{
return PrivatePropertyVariable;
}
set
{
PrivatePropertyVariable = value;
}
}