none
Монтирование почтовой базы с помощью командной строки! RRS feed

Ответы

    • Предложено в качестве ответа Artem Gusev HCG 26 августа 2009 г. 13:39
    • Помечено в качестве ответа hogust 28 августа 2009 г. 7:11
    26 августа 2009 г. 6:20
  • Немного дополню ответ:

    Вот пример, выполняющий те же действия проще:

    Монтирование:

    Set oDB = CreateObject("CDOEXM.MailboxStoreDB")

    strDB = "CN=Mailbox Store (SERVER_NAME),CN=First Storage Group,CN=InformationStore,CN=SERVER_NAME,CN=Servers,CN=First Administrative Group,CN=Administrative Groups,CN=DOMAIN,CN=Microsoft Exchange,CN=Services,CN=Configuration,DC=Domain,DC=local"

    oDB.DataSource.Open strDB
    oDB.Mount


    Размонтирование:

    аналогично, за исключением последней строки:

    oDB.Dismount
    ------------------------

    ' This code mounts/dismounts a Mailbox Store.
    ' ---------------------------------------------------------------
    ' From the book "Windows Server Cookbook" by Robbie Allen
    ' ISBN: 0-596-00633-0
    ' ---------------------------------------------------------------

    ' ------ SCRIPT CONFIGURATION ------
    strServer  = "<Exchange Server>"     ' e.g. ExchServer2
    strSGName  = "<Storage Group Name>"  ' e.g. SG1
    strMailStoreName = "<Database Name>" ' e.g. DB1
    ' ------ END CONFIGURATION ---------

    ' Find Storage Group URL
    strSearch = "CN=" & strSGName  & ","
    set objSrv = CreateObject("CDOEXM.ExchangeServer")
    objSrv.DataSource.Open strServer
    for each sg in oSrv.StorageGroups
       if (instr(1,sg,strSearch,1)>0) then strSGUrl = sg  
    next

    ' Generate Mailbox Store URL
    strMBUrl = "LDAP://CN=" & strMailStoreName & "," & strSGUrl

    ' Open Mailbox Store
    set objMb = CreateObject("CDOEXM.MailBoxStoreDB")
    objMb.DataSource.Open strMBUrl

    if (objMb.Status = 0) then
       Wscript.Echo "Mailbox store is mounted, dismounting..."
       objMb.Dismount
    else
       Wscript.Echo "Mailbox store is dismounted, mounting..."
       objMb.Mount
    end if
    Wscript.Echo "Script completed successfully."





    Если ответ Вам помог, нажмите на изображение зеленой галочки - «пометить как ответ». Если ответ был для Вас полезен, Вы можете пометить это сообщение как «полезное», нажав на ссылку "проголосовать за полезное сообщение" в правом верхнем углу сообщения.
    • Изменено Artem Gusev HCG 26 августа 2009 г. 13:47
    • Помечено в качестве ответа hogust 28 августа 2009 г. 7:11
    26 августа 2009 г. 13:40

Все ответы

    • Предложено в качестве ответа Artem Gusev HCG 26 августа 2009 г. 13:39
    • Помечено в качестве ответа hogust 28 августа 2009 г. 7:11
    26 августа 2009 г. 6:20
  • Спасибо! Сейчас попробую. И вот кстати http://www.redline-software.com/rus/support/articles/msexchange/2007/exchange2007-install-commandline-part3.php здесь описана работа с E2k7 из командной строки с помощью PowerShell. Прокатит такое с E2k3 если на сервак установить PowerShell?
    26 августа 2009 г. 11:54
  • Если вкратце, то нет

    26 августа 2009 г. 12:27
  • Немного дополню ответ:

    Вот пример, выполняющий те же действия проще:

    Монтирование:

    Set oDB = CreateObject("CDOEXM.MailboxStoreDB")

    strDB = "CN=Mailbox Store (SERVER_NAME),CN=First Storage Group,CN=InformationStore,CN=SERVER_NAME,CN=Servers,CN=First Administrative Group,CN=Administrative Groups,CN=DOMAIN,CN=Microsoft Exchange,CN=Services,CN=Configuration,DC=Domain,DC=local"

    oDB.DataSource.Open strDB
    oDB.Mount


    Размонтирование:

    аналогично, за исключением последней строки:

    oDB.Dismount
    ------------------------

    ' This code mounts/dismounts a Mailbox Store.
    ' ---------------------------------------------------------------
    ' From the book "Windows Server Cookbook" by Robbie Allen
    ' ISBN: 0-596-00633-0
    ' ---------------------------------------------------------------

    ' ------ SCRIPT CONFIGURATION ------
    strServer  = "<Exchange Server>"     ' e.g. ExchServer2
    strSGName  = "<Storage Group Name>"  ' e.g. SG1
    strMailStoreName = "<Database Name>" ' e.g. DB1
    ' ------ END CONFIGURATION ---------

    ' Find Storage Group URL
    strSearch = "CN=" & strSGName  & ","
    set objSrv = CreateObject("CDOEXM.ExchangeServer")
    objSrv.DataSource.Open strServer
    for each sg in oSrv.StorageGroups
       if (instr(1,sg,strSearch,1)>0) then strSGUrl = sg  
    next

    ' Generate Mailbox Store URL
    strMBUrl = "LDAP://CN=" & strMailStoreName & "," & strSGUrl

    ' Open Mailbox Store
    set objMb = CreateObject("CDOEXM.MailBoxStoreDB")
    objMb.DataSource.Open strMBUrl

    if (objMb.Status = 0) then
       Wscript.Echo "Mailbox store is mounted, dismounting..."
       objMb.Dismount
    else
       Wscript.Echo "Mailbox store is dismounted, mounting..."
       objMb.Mount
    end if
    Wscript.Echo "Script completed successfully."





    Если ответ Вам помог, нажмите на изображение зеленой галочки - «пометить как ответ». Если ответ был для Вас полезен, Вы можете пометить это сообщение как «полезное», нажав на ссылку "проголосовать за полезное сообщение" в правом верхнем углу сообщения.
    • Изменено Artem Gusev HCG 26 августа 2009 г. 13:47
    • Помечено в качестве ответа hogust 28 августа 2009 г. 7:11
    26 августа 2009 г. 13:40