Hallo,
nachdem mich peethebee gestern in der Shoutbox schon auf das @NumParams Makro aufmerksam gemacht hat stehe ich trotzdem noch vor einem Problem und brauche wahrscheinlich wieder nen kleinen Denkanstoß.
Ich habe eine UDF, die mir aus .ini Dateien gewisse Daten auslesen soll. Das funktioniert auch ohne Probleme. Allerdings will ich diese Funktion auf 2 verschiedenen Weisen in einem Skript aufrufen können. Und zwar einmal innerhalb einer Schleife, dann soll die UDF keine Parameter enthalten und sich nacheinander die Informationen aus allen ini Dateien ziehen die in einem Verzeichnis liegen, und einmal mit einem Parameter und er soll sich die Information nur aus der .ini Datei ziehen, die ich ihm als Argument mitgebe.
Funktion:
Spoiler anzeigen
Func getComputerFacts($ComputerToGetFacts)
#cs ----------------------------------------------------------------------------
Beschreibung: Liest IP, Namen, Adminlogin, Passwort und .vmx Pfad des
aktuellen Rechners aus der entsprechenden .ini Datei
Author: André Fenner
Parameter: keine, oder den Computernamen (muss mit dem Namen der ini Datei übereinstimmen)
Rückgabe: keine
Aufrufbeispiel: getComputerFacts()
getComputerFacts("Server2003")
#ce ----------------------------------------------------------------------------
TrayTip("", "Aktuelle Computerinfos auslesen...", 2)
If @NumParams = 0 Then
$ActualComputerIP[$j] = IniRead($IniDirectory & $IniFile[$j], "identity", "ip", "Kein solcher Eintrag")
$ActualComputerName[$j] = IniRead($IniDirectory & $IniFile[$j], "identity", "pcname", "Kein solcher Eintrag")
$ActualComputerAdmin[$j] = IniRead($IniDirectory & $IniFile[$j], "logon", "adminid", "Kein solcher Eintrag")
$ActualComputerPass[$j] = _StringEncrypt(0, IniRead($IniDirectory & $IniFile[$j], "logon", "adminpw", "Kein solcher Eintrag"), "Passwortverschlüsselung", 2)
$ActualComputerVmxPath[$j] = IniRead($IniDirectory & $IniFile[$j], "identity", "vmxpath", "Kein solcher Eintrag")
ElseIf @NumParams = 1 Then
If FileExists($IniDirectory & $ComputerToGetFacts) Then
$ActualComputerIP = IniRead($IniDirectory & $ComputerToGetFacts, "identity", "ip", "Kein solcher Eintrag")
$ActualComputerName = IniRead($IniDirectory & $ComputerToGetFacts, "identity", "pcname", "Kein solcher Eintrag")
$ActualComputerAdmin = IniRead($IniDirectory & $ComputerToGetFacts, "logon", "adminid", "Kein solcher Eintrag")
$ActualComputerPass = _StringEncrypt(0, IniRead($IniDirectory & $ComputerToGetFacts, "logon", "adminpw", "Kein solcher Eintrag"), "Passwortverschlüsselung", 2)
$ActualComputerVmxPath = IniRead($IniDirectory & $ComputerToGetFacts, "identity", "vmxpath", "Kein solcher Eintrag")
Else
writeErrorLog($IniDirectory & $ComputerToGetFacts & " ist nicht vorhanden")
EndIf
EndIf
EndFunc
Wenn ich aber nun die Funktion im Skript mittels
[autoit]
For $j = 1 To $i - 2 ; $i zieh ich mir woanders her
getComputerFacts()
Next
aufrufe, sagt er mir (logischerweise), dass die Funktion mit der falschen Anzahl der Argumente aufgerufen wurde.
Könnte mir jemand nen Denkanstoß geben, wie ich das Problem lösen kann?
Danke im Voraus, smoo
PS: Mir ist gerade ein Fehler hier im Forum aufgefallen: Wenn man AutoIt-Code mit "Einrückungen" (siehe meinen Code oben) hat, und dann die Vorschau Funktion nutzt, wird der Code nur noch linksbündig wieder im Editor eingefügt.
Edit BugFix: Das liegt daran, dass du deine Beiträge im 'Editor'-Register schreibst - nutze besser das 'Quellcode'-Register.