Frage : Warum begrenzt mein VB Index Resultate bis 1500?

Hallo all-knowing!

We Gebrauch der vb Index unten, die Mitgliedschaft einer globalen Sicherheitsgruppe zu extrahieren. Wir haben einige Gruppen mit über 2000 Benutzern in ihnen. Wenn sie verwendet werden, scheinen wir nicht imstande, sie zu erhalten, um uns mehr als 1500 Namen, unabhängig davon die zwei Suchparametereinstellungen zu geben. Konnten Sie bitte raten, wenn dieses eine Beschränkung ist, oder können wir sie regeln?

-----------------------------------------------------------------------------------------------------------------
Set objShell = CreateObject („Wscript.Shell“)
Set objFS = CreateObject („Scripting.FileSystemObject“)

'*** bitten um username
strUser = Inputbox („den Namen der Sicherheits-Gruppe bitte eintragen, die Sie list.")

If zum strUser = zum "" then
Msgbox „keine eingeführte Gruppennummer wünschen! Index nimmt jetzt heraus. „
WScript.Quit
End If

'*** erklären, dass Variablen und constants

Dim con
Dim rs
Dim Com
Dim objDataScript
Const DATA_FOLDER = „C:\Scripts " DATA_SCRIPT = „C:\Scripts\AD-Sicherheits-Gruppen-Mitgliedschafts-results.txt "
GetADUserDetails = 0


'*** eine AUFHEBEN-Frage, um die gründeten Werte von den Betrug des Ziels object.
Set = CreateObject („ADODB.Connection“)
Set rs = CreateObject („ADODB.Recordset“) vom
Set zu erhalten COM = CreateObject
Const („ADODB.Command“)

'*** öffnen einen Anschluss object.
con. Versorger = „ADsDSOObject "
con. Geöffnetes „aktiver Verzeichnis-Versorger“

'*** verursachen einen Befehlsgegenstand an dieses connection.
Set Com.ActiveConnection = con

'*** sammeln ADsPath, sAMAccountName und KN-Details für Ziel object
Com.CommandText = „et>; (samAccountName=“ u. strUser u. "); ADsPath, sAMAccountName, cn "/>
'*** stellte die Präferenzen für Search.
Com.Properties
Com.Properties („TIMEOUT-“) = 60 ein, die

'*** die query.
Set rs = das Com.Execute
If rs.RecordCount = 1 Then
strPath = rs durchführen. Felder (0). Wert „*** Speicherweg zum Benutzer account
Else
GetADUserDetails = 1“ *** Benutzer nicht found
End If



If GetADUserDetails = 1 then
Msgbox „Faltblattname kam nicht gefunden in Verzeichnis herein. „
WScript.Quit
Else „existiert *** Benutzer so continue
wenn nicht objFS.FolderExists (DATA_FOLDER) dann“ *** Überprüfung auf Faltblatbestehen, wenn nicht gefundenes dann create
gesetztes objFolder = objFS.CreateFolder (DATA_FOLDER)
Ende If

, wenn objFS.FileExists (DATA_SCRIPT) dann „*** Akte also existiert, Informationen zum it
auf Störungs-Zusammenfassung Next
gesetztem objDataScript = objFS.OpenTextFile anfügt (DATA_SCRIPT, 8, True)
objDataScript.WriteBlankLines (1)
objDataScript.WriteLine „************************* ********* „
objDataScript.WriteLine „*“ u. strUser
objDataScript.WriteLine „************************* ********* „
gesetztes objUser = GetObject (strPath)

arrMemberOf = objUser.GetEx („Mitglied“)
für jede Gruppe arrMemberOf
in gesetztem objGroup = in GetObject („LDAP: /“ u. Gruppe)
beendeten
GroupCN = objGroup.CN
objDataScript.WriteLine "" u. GroupCN

Next
objDataScript.Close
MsgBox „! „

Else
gesetztes objDataScript = objFS.CreateTextFile (DATA_SCRIPT, True)“ *** Akte existiert nicht, also zum it
auf Störungs-Zusammenfassung Next
/> gesetztes/>
RIPT, zutreffend) ********* „
objDataScript.WriteLine „*“ u. strUser
objDataScript.WriteLine „************************* ********* „
erhalten gesetztes objUser = GetObject (strPath)

arrMemberOf = objUser.GetEx („Mitglieds“) „*** Benutzergruppe membership
für jede Gruppe im arrMemberOf“ *** Schleife durch groups
gesetztes objGroup = GetObject („LDAP: /“ u. Gruppe)
„*** Überprüfungsgruppe ist dist Art, oder Universalsek group
GroupCN = objGroup.CN“ *** erhalten Gruppe name
objDataScript.WriteLine "" u. GroupCN „*** schreiben Gruppe name
Next
objDataScript.Close
fertiges MsgBox „!“                                          “ *** Zeigen Beendigung process

des Endes If
End If

an-----------------------------------------------------------------------------------------------------------------

Many Dank. Jede mögliche Hilfe ist sehr groß appreciated.

Antwort : Warum begrenzt mein VB Index Resultate bis 1500?

AwesomeMachine => offenbar verstehen Sie nicht die Frage, die tadellos klar ist.    Hardware-Beschleunigungsunterstützung für die MPEG-Decodierung und die Decodierung H.264 sind Unabhängiges der Eigenschaften vollständig des normalen GPU arbeitet… und ist eingeschlossen nicht in allen Videokarten.

==> narmi2 ja, ist es möglich.    Fast jeder moderne Prozessor kann MPEG2 DVDs an 1080p ohne irgendeine Vorlage vom GPU decodieren.
   
H.264 (HD Inhalt auf BluRays und HD DVDs) ist sogar CPU-intensive, aber es kann ohne GPU Vorlage mit modernen Kernarchitekturspänen auch decodiert werden, die ==> dort viel Diskussion über diese Fähigkeit auf dem AVSForums war, als die Kernarchitektur Späne zuerst vor einigen Jahren freigegeben wurden.   H.264 erfordert eine CPU mit dem Leistungsniveau eines E6600 oder besseres.   Ein E6600 nähert sich Anwendung 100% auf hohen Tätigkeitsszenen, aber kann Inhalt H.264 völlig decodieren, ohne irgendwie zu stottern, solange der Computer nicht für andere activiites während des Play-backs benutzt wird.       Die Kerben E6600 gerade in 1500 auf PassMarks CPUMark, also jede mögliche CPU mit einer PassMark Kerbe von 2000 oder verbessern sollten zum Play-backvideo ohne Hardware-Beschleunigung im GPU leicht in der Lage sein.  

Etwas Spieler-Software erlaubt Ihnen, Hardware-Beschleunigung zu sperren, die sie von der Anwendung der Hardware Vorlagen, eigenschaften auf dem GPU zu decodieren hält (wenn Geschenk).   Z.B. lässt PowerDVD einen Checkbox für „Hardware-Beschleunigung ermöglichen“ ==> zurückfallen vorbei dieses wird überprüft, wenn Ihr GPU Hardware beschleunigte Unterstützung hat, aber Sie können uncheck es, wenn Sie den Effekt auf Ihr System sehen möchten.
Weitere Lösungen  
 
programming4us programming4us