Jump to content

chucki

Members
  • Gesamte Inhalte

    30
  • Registriert seit

  • Letzter Besuch

Alle erstellten Inhalte von chucki

  1. Hey, diese funktion ist mir bekannt. Ich habe jedoch einige Probleme damit: Beim zurückrufen der Mail erscheint im Postfach des Empfängers lediglich noch eine Mail "Rückruf". Öffnet der Empfänger diese zuerst, wird alles gelöscht. Öffnet er aber die eigentliche Mail (welche ich zurückgerufen habe) dann kann er sie normal lesen und der Rückruf schlägt fehl. Ich habe darüber bei Microsoft infos über die einstellungen in den Verlaufs Optionen gefunden. Allerdings stimmt die funktion nicht mit der dort beschrieben funktion überein. Hat jemand eine Lösung wie ich sie zurück rufe ohne das der Empfänger was davon mitbekommt (natürlich nur im ungelesenen zustand) ???? Vielen Dank für eure Antwort
  2. Okok... hast ja recht. Es tut mir leid das ich gleich so überreagiert habe ;) hier das vbs Script: (vielleicht hilft es jemanden der das selbe prob hat!) -------------------------------- Const ADS_SCOPE_SUBTREE = 2 dim n dim z dim dn n = inputbox("Bitte mailboxnamen eingeben!") Set objConnection = CreateObject("ADODB.Connection") Set objCommand = CreateObject("ADODB.Command") objConnection.Provider = "ADsDSOObject" objConnection.Open "Active Directory Provider" Set objCommand.ActiveConnection = objConnection objCommand.CommandText = "Select distinguishedName, name, msExchAssistantName from 'LDAP://DC=domäne,DC=intra' " & "where objectClass='user' and name = '" & n & "' " objCommand.Properties("Page Size") = 1000 objCommand.Properties("Timeout") = 30 objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE objCommand.Properties("Cache Results") = False Set objRecordSet = objCommand.Execute objRecordSet.MoveFirst Do Until objRecordSet.EOF dn = objRecordSet.Fields("distinguishedName").Value Wscript.Echo "Name: " & objRecordSet.Fields("distinguishedName").Value Wscript.Echo "Assistant: " & objRecordSet.Fields("msExchAssistantName").Value objRecordSet.MoveNext Loop z = inputbox("Bitte 'Assistant' namen eingeben!") Set objUser = GetObject ("LDAP://" & dn & "") objUser.Put "msExchAssistantName", z objUser.SetInfo set objUser = nothing set objRecordSet = Nothing Set objCommand = nothing Set objConnection = nothing _______________________ aufruf mit cmd datei mit folgendem Inhalt: cscript c:\lage_des_scriptes\getname.vbs
  3. Is ja ein Klasse Forum hier.... nicht mal eine Idee kam! Ich habe jetzt mittels vbs Scribt das Feld ausgelesen... sehr lange Suche. Das Feld Assistent kann nicht über das AD verändert werden. Über das Feld "distinguishedName" läßt sich auch der Assistent auslesen und dann ändern!
  4. Hallo zusammen! Ich habe folgendes Problem: In der globalen Adressliste gibt es unter Eigenschaften des Users ein Feld in dem der Assistent angegeben ist. Dieses Feld scheint noch aus der Zeit von Exchange 5.5 zu stammen, da es im AD keinerlei einstellungsmöglichkeiten für dieses Feld gibt. Hier steht jetzt leider immer noch (muß bei migration übernommen worden sein) bei einem Chef der Name einer bereits ausgeschiedenen Sekretärin drin, obwohl über die Stellvertretung bereits eine neue Sekretärin definiert ist. Dieser Eintrag scheint sich dahin aber nicht replizieren. Wie kann ich diesen Eintrag ändern? Muß ich jetzt in die tiefen des ADSIEDIT vordringen um diesen verweisten Eintrag ändern zu können??? Wenn ja, kann mich da einer hinführen Vielen Dank für eure Antworten.
×
×
  • Neu erstellen...