<PRE>
<package>
<job id="Farm">
<reference object="MetaFrameCOM.MetaFrameFarm"/>
<script language="VBScript">
Set theFarm = CreateObject("MetaFrameCOM.MetaFrameFarm")
theFarm.Initialize(MetaFrameWinFarmObject)
MsgBox("MetaFrame Farm Name: " & theFarm.FarmName)
</script>
</job>
</package>
</PRE>
Das obrige Script funktioniert soweit als wsf.
Ich möchte dieses nun in Delphi umschreiben.
Wie müsste der Code bei Delphi aussehen?
<package>
<job id="Farm">
<reference object="MetaFrameCOM.MetaFrameFarm"/>
<script language="VBScript">
Set theFarm = CreateObject("MetaFrameCOM.MetaFrameFarm")
theFarm.Initialize(MetaFrameWinFarmObject)
MsgBox("MetaFrame Farm Name: " & theFarm.FarmName)
</script>
</job>
</package>
</PRE>
Das obrige Script funktioniert soweit als wsf.
Ich möchte dieses nun in Delphi umschreiben.
Wie müsste der Code bei Delphi aussehen?
Comment