Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

KiXtart Benutzerdefinierte Funktion - Anfängerfrage

Frage Entwicklung KiXtart

Mitglied: johnde

johnde (Level 1) - Jetzt verbinden

07.08.2013, aktualisiert 17:27 Uhr, 2280 Aufrufe, 1 Kommentar

Hallo

Ich habe die Betreuung eines Netzwerkes mit einem gut funktionierenden KiXtart-Login-Script übernommen.
Nun möchte ich das Script durch eine Benutzerdefinierte Funktion ergänzen und scheitere grandios


Ich rufe das Script zum Test ein Batch-File mit folgendem Inhalt auf:
\\domänenname\NETLOGON\kix32.exe \\domänenname\netlogon\test3_CompInGroup.scr



Das eigentliche Script habe ich aus der KiXtart UDF library collection. Siehe im Anhang.
Beim Aufruf erhalte ich folgende Fehlermeldung:


Script error : unknown command !.
Function ComputerInGroup($group,optional $Domain)


Offenbar habe ich den Aufruf/Einbau der UDF nicht kapiert. Oder was könnte hier falsch sein.
Ich weiss, ist ist sicher eine Anfängerfrage, bin aber trotzdem froh für Hilfe.


Danke
John

test3_CompInGroup.scr:
01.
02.
;Version         1.00 
03.
;Date            2003-Sep-03 
04.
;Revision Reason 1.00 
05.
;Parameters      $group      = name of group to test for 
06.
;                $domain     = optional parameter for testing a different domain than current 
07.
;Remarks         see Ingroup(), but for computer accounts instead of user accounts 
08.
;Returns         1 if in specified group 
09.
;                0 if not 
10.
;                @error =1 for bad group or domain 
11.
;Dependencies    ADSI 
12.
;KiXtart Ver     Written and tested with KiXtart v4.21  
13.
;Example         If ComputerInGroup('domain computers')=1 
14.
;                     ? 'Computer is a member' 
15.
;                endif 
16.
 
17.
 
18.
Function ComputerInGroup($group,optional $Domain) 
19.
	Dim $oGrp 
20.
	if not $domain		$domain=@domain		endif 
21.
	$oGrp = GetObject("WinNT://" + $domain + "/"  + $group + ",group" ) 
22.
	if @error	exit 1		endif 
23.
 
24.
	if $oGrp.IsMember("WinNT://" + $domain + "/"  + @wksta + "$$" ) 
25.
		$ComputerInGroup=1 
26.
	else 
27.
		$ComputerInGroup=0 
28.
		endif 
29.
endfunction 
30.
	 
31.
 
32.
If ComputerInGroup('testcomputer')=1 
33.
                     ? 'Computer is a member' 
34.
 
Mitglied: johnde
08.08.2013 um 09:11 Uhr
Hallo

Lösung selber gefunden.
Benutzerdefinierte Funktionen gehen erst mit kiXtrart ab Version 4.

Vielleicht hilft das ja jemandem anderen, Zeit zu sparen.

John
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(8)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Microsoft Office
gelöst Excel: Text in Zellbereich prüfen mit Vergleichstext ggf. mit Exact-Funktion (5)

Frage von Michi1 zum Thema Microsoft Office ...

JavaScript
AngularJS Variable über Input in Funktion ausführen

Frage von badkilla zum Thema JavaScript ...

LAN, WAN, Wireless
Hat On Networks PL500PS WLAN-Funktion? (4)

Frage von Andy1987 zum Thema LAN, WAN, Wireless ...

iOS
IOS 10.2 bringt SOS-Funktion aufs iPhone

Link von sabines zum Thema iOS ...

Heiß diskutierte Inhalte
Microsoft
Ordner mit LW-Buchstaben versehen und benennen (21)

Frage von Xaero1982 zum Thema Microsoft ...

Netzwerkmanagement
gelöst Anregungen, kleiner Betrieb, IT-Umgebung (18)

Frage von Unwichtig zum Thema Netzwerkmanagement ...

Windows Update
Treiberinstallation durch Windows Update läßt sich nicht verhindern (17)

Frage von liquidbase zum Thema Windows Update ...