Introducción:
El código que te voy a mostrar está adaptado de una
respuesta en
mis foros:
http://foros.elguille.info/Mensajes.aspx?ID=24924
El autor de ese "post" es Ħąrvąl
así que... todos los "créditos" son para él, ya que lo único que he hecho yo
es hacerlo funcional y con un ejemplo, tanto para Visual Basic 2005 como
para Visual C# 2005, aunque en esta página solo te muestro el código de
Visual Basic, el código para Visual C# 2005 está en este link:
Hacer copia de
seguridad de bases de datos de SQL Server con C#
2005
¿Por qué solo para Visual Basic 2005?
Bueno, en realidad vale para cualquier versión de Visual Basic para .NET,
lo que pasa es que en este código utilizo dos cosas que son exclusivas de
Visual Basic 2005, una de ellas es la clase
SqlConnectionStringBuilder que sirve para "crear" cadenas de
conexiones a bases de datos de forma más simple. La otra característica es
que utiliza la instrucción Using para agrupar el objeto
SqlConnection, de forma que si se produce un error no se
quede la conexión abierta.
Si quieres usar este código con alguna versión
anterior de Visual Basic para .NET, simplemente quita
el uso de esa clase y crea la cadena de conexión como siempre lo has hecho
y para el uso de la conexión en el bloque Using, pues...
también lo puedes hacer como lo has estado haciendo siempre...
Y ya sin más preámbulos, veamos la aplicación de ejemplo y el código que
hay que usar para hacer una copia de seguridad de una base de SQL Server
mediante código.
En la figura 1 puedes ver el formulario en tiempo de diseño.
Figura 1. El formulario en tiempo de diseño
Ahí se indica el servidor de SQL Server que queremos usar, el nombre de la
base de datos de la que queremos hacer la copia y el nombre del fichero en
el que se hará la copia de seguridad.
Al pulsar en el botón "Hacer backup" se ejecutará el
siguiente código que es el encargado de hacer esa copia de seguridad. El
código de ese método es el siguiente:
Dim sBackup As String = "BACKUP DATABASE " & Me.txtBase.Text & _
" TO DISK = N'" & Me.txtBackup.Text & _
"' WITH NOFORMAT, NOINIT, NAME =N'" & Me.txtBase.Text & _
"-Full Database Backup',SKIP, STATS = 10"
Dim csb As New SqlConnectionStringBuilder
csb.DataSource = Me.txtServidor.Text
csb.InitialCatalog = Me.txtBase.Text
csb.IntegratedSecurity = True
Using con As New SqlConnection(csb.ConnectionString)
Try
con.Open()
Dim cmdBackUp As New SqlCommand(sBackup, con)
cmdBackUp.ExecuteNonQuery()
MessageBox.Show("Se ha creado un BackUp de La base de datos satisfactoria
"Copia de seguridad de base de datos", _
MessageBoxButtons.OK, MessageBoxIcon.Information)
con.Close()
Catch ex As Exception
MessageBox.Show(ex.Message, _
"Error al copiar la base de datos", _
MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Using
Y esto es todo.
En este ejemplo, se utilizan las credenciales del usuario de Windows, ni
que decir tiene, que si ese código lo usas con un usuario que no tiene los
"permisos" suficientes, la copia de seguridad fallará.
Una recomendación
Si el fichero que indicas en Backup ya existe, no se
sobrescribe, ya que el sistema de copia de seguridad de SQL Server lo que
hace es "agregarla", es decir, si ese fichero ya existe, y por ejemplo ocupa
40 MB, al hacer una segunda copia de seguridad en ese mismo fichero, el
tamaño crecerá hasta el doble, es decir, se van añadiendo las nuevas copias
de seguridad que se indiquen. Por tanto, si no es esa tu intención, lo que
te recomiendo es que después de hacer la copia de seguridad lo copies a otro
sitio o le cambies el nombre a las nuevas copias.
Espero que te sea de utilidad.
Nos vemos.
Guillermo
P.S.
Pulsa aquí si quieres ver cómo
restaurar una base de datos de SQL Server a partir de una copia (backup).
Espacios de nombres usados en el código de este artículo:
System.Data.SqlClient
