Script: "Systemprodukt" auslesen

[HeikoR]

Leider habe ich hier noch nicht viele Beispiele in der Richtung - insofern noch eine Frage:

Ich möchte das "Systemprodukt" bei Windows-Rechnern (die ich über rxscan offline abfrage - aber hier habe ich schon einen Script an den ich es anhängen kann) abfragen und dann in die "Gerätebeschreibung" übertragen.

Zweck ist es Berichte mit "Gerätebeschreibung" zu haben wo ich dann eben diverse Geräteklassen unter einer Spalte gut erkennen und deren Typ unterscheiden kann.

Einen passenden Befehl in die Richtung habe ich im Handbuch leider nicht gefunden - also dann hier ...

[WernerB]

Leider ist mir die Frage nicht ganz klar.

Auf jeden Fall kann man die Gerätebeschreibung in AfterScan() mit

Code: Alles auswählen

SetDeviceProperty "DESCRIPTION", "meine Beschreibung"

setzen.

[HeikoR]

Ok - mal kurz ausgedrückt:

Ich möchte das aus Windows ausgelesene "Systemprodukt" (das ist im Beispiel der Rechnertyp)

Systemprodukt.jpg (10.24 KiB) 23858 mal betrachtet

auslesen und in das Datenfeld "Gerätebeschreibung" schreiben.

... das ganze dann für Geräteklassenübergreifende Berichte - aber das ist hier ja egal

[WernerB]

Das würde so gehen:

Code: Alles auswählen

Function AfterScan()
  Dim psSystem
  Set psSystem = GetPropertySet("SYSTEM", 1)
  If Not psSystem Is Nothing Then
    SetDeviceProperty "DESCRIPTION", psSystem("MODEL")
  End If
End Function