Artigo: 941330 - �ltima revis�o: segunda-feira, 16 de Junho de 2008 - Revis�o: 2.2

Como automatizar a elimina��o de c�pias de seguran�a no SharePoint Server 2007 e no Windows SharePoint Services 3.0 utilizando um script do Visual Basic

Clique aqui para exibir o artigo traduzido e o artigo original em ingl�s, lado a lado.

Ver isen��o de responsabilidades para tradu��o autom�tica

Ver produtos para os quais este artigo se aplica.

Dica do SistemaEste artigo aplica-se a um sistema operativo diferente do que est� a utilizar. Foi desactivado o conte�do do artigo, que pode n�o ser relevante para si.

Expandir tudo | Reduzir tudo

INTRODU��O

Este artigo descreve como automatizar a elimina��o de c�pias de seguran�a no Microsoft Office SharePoint Server 2007 e no Windows SharePoint Services 3.0 utilizando um script do Microsoft Visual Basic. Este artigo cont�m um exemplo de script do Visual Basic que elimina c�pias de seguran�a que s�o mais do que um determinado n�mero de dias.

Voltar ao topo

Mais Informa��o

C�pias de seguran�a devem ter uma pol�tica de reten��o configur�veis. Exemplos de pol�ticas de reten��o s�o:

C�pias de seguran�a s�o eliminadas ap�s um determinado n�mero de dias.
O n�mero de c�pias de seguran�a que s�o mantidas � limitado.

Pode tamb�m manualmente eliminar c�pias de seguran�a. No entanto, eliminar manualmente as c�pias de seguran�a n�o limpe o ficheiro de manifesto (Spbrtoc.xml) correctamente. Para resolver este problema, utilize um script para eliminar c�pias de seguran�a.

Nota Tem de ter permiss�es suficientes para efectuar este procedimento. Normalmente, a elimina��o de c�pias de seguran�a deve ser efectuada por um membro do grupo Administradores Local no computador que cont�m a pasta partilhada para as c�pias de seguran�a. Em qualquer dos casos, a pessoa que executa o script tem de ter de leitura permiss�es, permiss�es de escrita e elimina��o permiss�es para a pasta partilhada para as c�pias de seguran�a e os ficheiros de c�pia de seguran�a que est�o a ser eliminado.

aviso Utiliza��o do c�digo deste artigo � da responsabilidade do utilizador.

Microsoft fornece exemplos de programa��o ilustra��o s�, sem garantia expressa ou impl�cita, incluindo, sem limita��o, garantias impl�citas de comercializa��o e/ou adequa��o a um fim espec�fico. Este artigo pressup�e que est� familiarizado com a linguagem de programa��o apresentada e as ferramentas utilizadas para criar e depurar procedimentos. Profissionais de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas n�o modificar�o estes exemplos para proporcionarem funcionalidades adicionais nem criar�o procedimentos adaptados �s necessidades espec�ficas.
Se disp�e de limitada experi�ncia de programa��o, poder� contactar um Microsoft Certified Partner ou a servi�os de aviso. Para obter mais informa��es, visite estes Web sites da Microsoft:

Microsoft certificado Partner - https://partner.microsoft.com/global/30000104 (https://partner.microsoft.com/global/30000104)

Servi�os Microsoft aviso - http://support.microsoft.com/gp/advisoryservice (http://support.microsoft.com/gp/advisoryservice)

Para obter mais informa��es sobre as op��es de suporte est�o dispon�veis e sobre como contactar a Microsoft, visite o seguinte Web site da Microsoft: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS (http://support.microsoft.com/default.aspx?scid=fh;en-us;cntactms)

Se disp�e de limitada experi�ncia de programa��o, poder� pretender contactar um Microsoft Certified Partner ou a Microsoft mediante consultar linha (800) 936-Microsoft. Para obter mais informa��es sobre Microsoft Certified Partners, visite o seguinte Web site da Microsoft:

https://partner.microsoft.com/40011340 (https://partner.microsoft.com/40011340)

Para obter mais informa��es sobre as op��es de suporte est�o dispon�veis e sobre como contactar a Microsoft, visite o seguinte Web site da Microsoft:

http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS (http://support.microsoft.com/default.aspx?scid=fh;en-us;cntactms)

Script de exemplo

O exemplo seguinte script do Visual Basic automatiza a elimina��o de c�pias de seguran�a. Este script, c�pias de seguran�a que s�o mais do que um determinado n�mero de dias s�o eliminadas.

'       Title: BackupCleanUp
' Description: Deletes SharePoint 2007 backups that are older than a specified 
'              number of days and then removes the backups from the backup history. 

Setlocale(1033)
Dim nNumberOfDays
Dim strTOCFile
Dim dtDeleteDate

Dim sTemp

Set objXML = CreateObject("Microsoft.XMLDOM")
Set objFS  = CreateObject("Scripting.FileSystemObject")
Set objLog = objFS.OpenTextFile("BackupCleanUp.log",8,true)

' Validate command line arguments and initialize data.
If WScript.Arguments.Count = 2 Then
    If IsNumeric(WScript.Arguments(0)) Then   
        nNumberOfDays = CInt(WScript.Arguments(0))
        dtDeleteDate = DateAdd("d",nNumberOfDays*-1,Now)
    Else
        WScript.Echo "<NumberOfDays> must be an integer value."
    End If
        strTOCFile = WScript.Arguments(1)
Else
    WScript.Echo "Usage: BackupCleanUp <NumberOfDays> <PathToTOC>"
    WScript.Quit
End If

objLog.WriteLine(Now() &vbTab& "Start: Clean up backups older than " &nNumberOfDays& " days from " &strTOCFile& ".")

' Load the SharePoint backup and restore the TOC file.
objXML.Async = false
objXML.Load(strTOCFile)

If objXML.ParseError.ErrorCode <> 0 Then
    objLog.WriteLine(Now() &vbTab& "Error: Could not load the SharePoint Backup / Restore History." &vbCrLf&_
                     Now() &vbTab& "Reason: " &objXML.ParseError.Reason& ".") 
    WScript.Quit
End If

' Delete backup nodes that are older than the deletion date.
For Each objNode in objXML.DocumentElement.ChildNodes
    If CDate(objNode.SelectSingleNode("SPFinishTime").Text) < dtDeleteDate Then
        If objNode.SelectSingleNode("SPIsBackup").Text = "True" Then
            
sTemp = mid(objNode.SelectSingleNode("SPBackupDirectory").Text,1,len(objNode.SelectSingleNode("SPBackupDirectory").Text)-1)

'objFS.DeleteFolder(mid(objNode.SelectSingleNode("SPBackupDirectory").Text),1,len(objNode.SelectSingleNode("SPBackupDirectory").Text)-1)
objFS.DeleteFolder sTemp




            objLog.WriteLine(Now() &vbTab& "Deleted: " &objNode.SelectSingleNode("SPBackupDirectory").Text& ".")
            objXML.DocumentElement.RemoveChild(objNode)
        End If     
    End If
Next

' Save the XML file with the old nodes removed.
objXML.Save(strTOCFile)
objLog.WriteLine(Now() &vbTab& "Finish: Completed backup clean up.")

Voltar ao topo

Refer�ncias

Para mais informa��es sobre como efectuar c�pias de seguran�a de dados e restaurar dados utilizando o site Web de administra��o central do Microsoft SharePoint, visite o seguinte Web site da Microsoft:

http://technet2.microsoft.com/windowsserver/WSS/en/library/64171b8c-5608-4e69-881a-67996080b7ff1033.mspx (http://technet2.microsoft.com/windowsserver/WSS/en/library/64171b8c-5608-4e69-881a-67996080b7ff1033.mspx)

Voltar ao topo

A informa��o contida neste artigo aplica-se a:

Microsoft Office SharePoint Server 2007
Microsoft Windows SharePoint Services 3.0

Voltar ao topo

kbmt kbhowto kbinfo kbexpertiseinter KB941330 KbMtpt

Voltar ao topo

Tradu��o autom�tica

IMPORTANTE: Este artigo foi traduzido por um sistema de tradu��o autom�tica (tamb�m designado por Machine translation ou MT), n�o tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplica��es (MT) e artigos traduzidos por tradutores profissionais. O objectivo � simples: oferecer em Portugu�s a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradu��o autom�tica n�o � sempre perfeita. Esta pode conter erros de vocabul�rio, sintaxe ou gram�tica? erros semelhantes aos que um estrangeiro realiza ao falar em Portugu�s. A Microsoft n�o � respons�vel por incoer�ncias, erros ou estragos realizados na sequ�ncia da utiliza��o dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualiza��es frequentes ao software de tradu��o autom�tica (MT). Obrigado.

Clique aqui para ver a vers�o em Ingl�s deste artigo: 941330� (http://support.microsoft.com/kb/941330/en-us/ )

Voltar ao topo