cs_elpens
Messages postés260Date d'inscriptionvendredi 2 décembre 2005StatutMembreDernière intervention 3 novembre 2007
-
1 mars 2006 à 11:47
cs_elpens
Messages postés260Date d'inscriptionvendredi 2 décembre 2005StatutMembreDernière intervention 3 novembre 2007
-
2 mars 2006 à 11:00
Bonjour,
J'ai depuis quelque temps une erreur de reférencement (NULL REFERENCE EXCEPTION).
Voilà mon code :
Public
Function retreiveUserInfos(
ByVal SAMAccount()
As
String)
As
String()()
Dim countUser
As
Integer = SAMAccount.Length
'Array containing FirstName, LastName, cmpId
Dim userInfos(countUser)()
As
Object
'set the ldap path
Dim root
As
New DirectoryEntry(
"LDAP://OU=Companies,DC=group,DC=net")
Dim searcher
As
New DirectorySearcher(root)
Dim DirEntry
As DirectoryEntry
For i
As
Integer = 0
To countUser
'Searching on the samAccount
searcher.Filter =
"(SAMAccountName=" & SAMAccount(i) &
")"
Dim result
As SearchResult = searcher.FindOne
DirEntry = result.GetDirectoryEntry()
Cette erreur survient quand j'accède au premier enregistrement dans mon tableau userInfos(0)(0)
Ce que je ne comprend pas, c'est que je définis mon tableau d'une longueur fixe... alors pourquoi ce problème de référencement???
jesusonline
Messages postés6814Date d'inscriptiondimanche 15 décembre 2002StatutMembreDernière intervention13 octobre 201029 1 mars 2006 à 12:34
Bonjour,
il n'y a rien d'anormal
tu déclares bien un tableau de countUser tableau vide mais ensuite tu essaye d'aller dans le 1er élément du tableau contenu dans l'element i (un tableau vide)
il faudrais donc faire un truc du genre : Dim userInfos(countUser)(10)
As
Object