Vraag : Uitwisseling 2007 contacten die kwestie verwerken

Wij hebben een gebruiker met een telefoon Droid die zijn contacten dupliceerde. Zijn contacten kregen tot 145.000 tonend in Vooruitzichten. Gisteren veegde ik zijn telefoon af om de verdubbeling te verhinderen verder te gaan en probeerde om alle dubbele contacten uit zijn Vooruitzichten te verwijderen. Hij is nu neer aan 1.000 contacten die in Vooruitzichten tonen. Op dat punt ons de server eerste begin die van de Uitwisseling, het vertragen e-mail tegen 10-15 minuten vertragen. Ik sloot toen zijn Vooruitzichten die schenen om de contactenverandering te verwerken hopend om de traagheid tegen te houden. Na een uur e-mail tegengehouden stromend bij allen en wij moesten Uitwisseling rebooten om toegang te herwinnen. Vanochtend dat wij hebben geprobeerd om zijn Vooruitzichten te openen om de contacten bij te werken maar het zelfde ding gebeurde. Hoe kan ik deze kwestie en zonder de server van de Uitwisseling tezelfdertijd omhoog te knoeien bevestigen?

Antwoord : Uitwisseling 2007 contacten die kwestie verwerken



Voor zover ik weet de lijst van combobox moet worden geladen *before* wordt combobox geklikt.
Zo schijnt het dat u een andere weg kunt moeten vinden om de keus te activeren.
Misschien kon u het proberen wanneer de Vorm wordt geïnitialiseerdo, of cre�ërt een optiegroep, of een merkmeester combobox,…
(Opnieuw, illustreert dit slechts waarom dit niet genormaliseerde functionaliteit. is)

In elk geval,… zou de code kunnen zijn iets in die aard:

'Cre�ër de variabele
Verduister strWhatList als Koord
   
    'Lading de variabele met de tekst de gebruiker in inputbox ingaat
    strWhatList = InputBox („Welke Lijst?“ & vbCrLf & „(ga binnen: them voor Werknemers, of „EQ“, voor Equiptment)“)
   
    'Als de gebruiker „Cancel“ klikt,
    'ga sub zonder lijsten weg in combobox worden geladen die
    Als strWhatList = "" toen
        De 'vertoning een bericht, opent dan de vorm
        '(zonder een lijst in combobox)
        MsgBox „Geen lijst selecteerde om combobox te laden. “, vbInformation
        'Uitgang
        Sub van de uitgang
    strWhatList van ElseIf = „EM“ of strWhatList = „em“ toen
        'Lading de aangewezen lijstwaaier
        Me.cboWhatList.RowSource = „=Sheet1! A2: A8“
        'Plaats het comboboxetiket
        Me.lblWhatList.Caption = „Werknemers“
    strWhatList van ElseIf = „EQ“ of strWhatList = „eq“ toen
        Me.cboWhatList.RowSource = „=Sheet1! B2: B6“
        Me.lblWhatList.Caption = „Equiptment“
    Anders
        Ongeldige waarde van MsgBox de „, geen die lijst in combobox wordt geladen. “, vbInformation
        Sub van de uitgang
    Eind als

Ik ben zeker u u zal kunnen dit aan het werk in uw gegevensbestand aanpassen.


Ik heb een steekproef vastgemaakt

; -)

JeffCoachman
Andere oplossingen  
 
programming4us programming4us