"Subscript used on non-accessible variable" beim AD UDF, zB: "_AD_GetObjectProperties"

freddyd

Hallo Zusammen,

ich bin gerade dabei mich mit dem AD UDF von water zu beschäftigen und hab Im Forum folgenden Code gefunden:

Spoiler anzeigen

[autoit]

#include <ad.au3>
#include <DATE.au3>

[/autoit] [autoit][/autoit] [autoit]

_AD_Open()
$aProperties = _AD_GetObjectProperties(@UserName, "displayname,distinguishedName,pwdlastset")
$ddd = $aProperties[3][1]
_DateTimeFormat($ddd,2)
$zuletzt = _DateTimeFormat($ddd,2)&" "&" "&_DateTimeFormat($ddd,4)
$aProperties = _AD_GetObjectProperties(@ComputerName & "$")
$PCName = $aProperties[4][1]
$PCBeschreibung = $aProperties[7][1]
msgbox(4144,"",$PCName&" "&$PCBeschreibung
_AD_Close()

[/autoit] [autoit][/autoit] [autoit][/autoit]

Er Bringt mir beim Ausführen jedoch folgenden Fehler:

Spoiler anzeigen

Code

"E:\TEST\AD_test2.au3" (7) : ==> Subscript used on non-accessible variable.:
$ddd = $aProperties[3][1]
$ddd = $aProperties^ ERROR
->16:51:55 AutoIt3.exe ended.rc:1

Wäre super wenn Ihr mir ein wenig auf die Sprünge helfen könnte !!!

Grüße
freddyd

**alpines**

Dein Array ist entweder nicht existent oder die Größe des Arrays (bzw. der Index den du ansteuern möchtest) ist falsch.
Lass dir mal nach $aProperties = ... folgendes mal ausgeben

[autoit]

MsgBox(64, "Info", "Arraygröße: " & UBound($aProperties))

[/autoit]

**Raupi**

Schau mal nach ob $aProperties überhaupt ein Array ist.
Direkt nach

[autoit]

$aProperties = _AD_GetObjectProperties(@UserName, "displayname,distinguishedName,pwdlastset")

[/autoit]

machst du mal ein

[autoit]

_ArrayDisplay ($aProperties)

[/autoit]

Und am Scriptanfang

[autoit]

#include <Array.au3>

[/autoit]

nicht vergessen.

nuts

Darum solltest du immer vor dem Zugriff auf ein Array immer prüfen ob es 1. überhaupt ein Array ist und 2. ob nicht die Größe überschritten wird.
Außer natürlich man kann vom Skript aus ganz sicher kontrollieren, dass ein Array in entsprechender Dimensionierung immer erstellt wird.

Ansonsten baust du dir überall potentielle crashs in die Skripte ein und die Fehler zu finden kann recht aufwendig werden.

**water**

Eigentlich sollte nach jedem Funktionsaufruf geprüft werden, ob die Funktion einen Fehler zurückgegeben hat (d.h. @error ist ungleich 0)

nuts

Erlaube mir da mal anderer Meinung zu sein.
Wenn man den Fehler auch später noch abfangen kann ist das nicht immer nötig und kann je nachdem auch mal weggelassen werden.
Das gilt natürlich nicht für Arrays.

Diskussion hatten wir hier schon etwas: String umformen

**water**

Wenn ich @error gleich nach dem Funktionsaufruf checke habe ich den Vorteil, dass ich genauere Informationen über den Fehler erhalte. @error kann ja unterschiedliche Werte annehmen und Detailinformationen zum Fehler werden eventuell auch über @extended übergeben.
Wenn ich nur auf Array teste, fehlt mir diese Info.

nuts

Da habe ich mich etwas ungenau ausgedrückt.
@error Prüfung ist je nach Funktion und vor dem Array Zugriff natürlich auch eine gute (bessere) Möglichkeit.

Ich meinte außerdem, dass nicht jeder Funktionsaufruf eine Fehlerabfrage zur Folge haben muss.

freddyd

@alpines

Folgendes wird angezeigt

Code

---------------------------
Info
---------------------------
Arraygröße: 0
---------------------------
OK 
---------------------------

@Raupi

hab den Code geändert:

Spoiler anzeigen

C

#include <ad.au3>
#include <DATE.au3>
#include <Array.au3>


_AD_Open()


$aProperties = _AD_GetObjectProperties(@UserName, "displayname,distinguishedName,pwdlastset")
_ArrayDisplay ($aProperties)


$ddd = $aProperties[3][1]
_DateTimeFormat($ddd,2)
$zuletzt = _DateTimeFormat($ddd,2)&" "&" "&_DateTimeFormat($ddd,4)
$aProperties = _AD_GetObjectProperties(@ComputerName & "$")
$PCName = $aProperties[4][1]
$PCBeschreibung = $aProperties[7][1]
msgbox(4144,"",$PCName&" "&$PCBeschreibung
_AD_Close()

Alles anzeigen

und bekomme diesen Fehler:

Code

"E:\TEST\AD_test2.au3" (12) : ==> Subscript used on non-accessible variable.:
$ddd = $aProperties[3][1]
$ddd = $aProperties^ ERROR

Ziel des ganzen soll am Ende sein den User eine Woche vor ablauf des Kennworts per Msgbox daran zu errinnern dieses zu ändern.

**water**

Was ist der Wert von @error nach Aufruf von _AD_GetObjectProperties?

gmmg

benutzt du die neueste Version Version 1.4.1.1 der AD UDF?

da gibt es das Beispiel _AD_GetObjectProperties.au3! Funktioniert das denn?

Gruß gmmg

**water**

Welche version von AutoIt verwendest Du?
Welche Version der UDF verwendest Du?

Vielleicht ist es ein Bug in der UDF

gmmg

die funktion wird ja in Zeile 5 und 10 mit jeweils der gleichen Variable aber verschiedenen anfragen aufgerufen!
da wird ja zwangsläufig die obersdte abfrage überschrieben!

gruß gmmg

freddyd

@water

Ich hab jetzt mal

[autoit]

ConsoleWrite(@error & @CRLF)

[/autoit]

eingefügt.

..also sieht jetzt so aus:

Spoiler anzeigen

[autoit]

#include <ad.au3>
#include <DATE.au3>
#include <Array.au3>

[/autoit] [autoit][/autoit] [autoit]

_AD_Open()

[/autoit] [autoit][/autoit] [autoit]

$aProperties = _AD_GetObjectProperties(@UserName, "displayname,distinguishedName,pwdlastset")
ConsoleWrite(@error & @CRLF)

[/autoit] [autoit][/autoit] [autoit]

_ArrayDisplay ($aProperties)

[/autoit] [autoit][/autoit] [autoit]

$ddd = $aProperties[3][1]
_DateTimeFormat($ddd,2)
$zuletzt = _DateTimeFormat($ddd,2)&" "&" "&_DateTimeFormat($ddd,4)
$aProperties = _AD_GetObjectProperties(@ComputerName & "$")
$PCName = $aProperties[4][1]
$PCBeschreibung = $aProperties[7][1]
msgbox(4144,"",$PCName&" "&$PCBeschreibung
_AD_Close()

[/autoit]

Folgendes gibt er bei der Console aus:

Spoiler anzeigen

Code

>"C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "...\AD_test2.au3" /UserParams    
+>11:40:08 Starting AutoIt3Wrapper v.2.1.2.9    Environment(Language:0407 ...)
-> Skipping AU3check: Current version doesn't support the AutoIt3 v 3.3.9.5+ syntax.
>Running:(3.3.10.2):C:\Program Files (x86)\AutoIt3\autoit3_x64.exe "...\AD_test2.au3"    
--> Press Ctrl+Alt+F5 to Restart or Ctrl+Break to Stop
1
"E:\TEST\AD_test2.au3" (13) : ==> Subscript used on non-accessible variable.:
$ddd = $aProperties[3][1]
$ddd = $aProperties^ ERROR
->11:40:08 AutoIt3.exe ended.rc:1
>Exit code: 1    Time: 0.540

Alles anzeigen

Version:
Autoit 3.3.10.2
UDF 1.4.11

**water**

@error = 1 heisst: $sObject could not be found
ist das ein Domänen-User mit dem Du angemeldet bist?

gmmg

@water , @ freddyd

bei mir funktioniert der Code in der Domäne!

Spoiler anzeigen

[autoit]

#include <D:\Data\scripte\AD_1.4.1.1_Functions\AD.au3> ; da liegt bei mir die AD.au3
#include <DATE.au3>
#include <Array.au3>
_AD_Open()
$aProperties = _AD_GetObjectProperties(@UserName, "displayname,distinguishedName,pwdlastset")
ConsoleWrite(@error & @CRLF)
_ArrayDisplay ($aProperties)
$ddd = $aProperties[3][1]
_DateTimeFormat($ddd,2)
$zuletzt = _DateTimeFormat($ddd,2)&" "&" "&_DateTimeFormat($ddd,4)
$aProperties = _AD_GetObjectProperties(@ComputerName & "$")
$PCName = $aProperties[4][1]
$PCBeschreibung = $aProperties[7][1]
msgbox(4144,"",$PCName&" "&$PCBeschreibung)
_AD_Close()

[/autoit]

gruß gmmg

freddyd

@water

Ja, ist ein Domain-User

@ gmmg

bei mir leider nicht:

Code

>"C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "...\AD_test3.au3" /UserParams    
+>08:16:04 Starting AutoIt3Wrapper v.2.1.2.9    Environment(Language:0407  Keyboard:00000407  OS:WIN_7/Service Pack 1  CPU:X64 OS:X64)
-> Skipping AU3check: Current version doesn't support the AutoIt3 v 3.3.9.5+ syntax.
>Running:(3.3.10.2):C:\Program Files (x86)\AutoIt3\autoit3_x64.exe "...\AD_test3.au3"    
--> Press Ctrl+Alt+F5 to Restart or Ctrl+Break to Stop
1
"...\AD_test3.au3" (8) : ==> Subscript used on non-accessible variable.:
$ddd = $aProperties[3][1]
$ddd = $aProperties^ ERROR
->08:16:04 AutoIt3.exe ended.rc:1
>Exit code: 1    Time: 0.726

Alles anzeigen

**water**

Poste bitte die Werte die mit _ArrayDisplay angezeigt werden.

freddyd

@water

mit "<Domain>"&@UserName also:

[autoit]

$aProperties = _AD_GetObjectProperties("<Domain>"&@UserName, "displayname,distinguishedName,pwdlastset")

[/autoit]

funktioniert es leider auch nicht.

**water**

Was zeigt _ArrayDisplay an, wenn Du nur "$aProperties = _AD_GetObjectProperties()" ausführst?