Visual Basic.NET - backup de base de datos sql server 2008 mediante codigo vb.net

 
Vista:
Imágen de perfil de Ignacio
Val: 83
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

backup de base de datos sql server 2008 mediante codigo vb.net

Publicado por Ignacio (42 intervenciones) el 23/05/2020 21:24:03
Tengo el siguiente codigo para hacer el backup de una base de datos sql server 2008 r2. (la aplicacion esta en diferente PC de donde se encuentra el servidor SQL 2008)

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub ButtonSalva_Click(sender As Object, e As EventArgs) Handles ButtonSalva.Click
    Try
         Dim Conexion1 As New SqlConnection("server=" + TextBoxInstancia.Text + ";database=" +   TextBoxSQL.Text + ";UID=" + TextBoxUsuario.Text.Trim() + ";pwd=" + TextBoxPass.Text.Trim() + "")
        dim s As String = InputBox("Nombre de la salva.")
         dim destino As String = InputBox("Destino de la Salva: ")
 
         if s <> ""
             s = s.Trim()
             Dim command As SqlCommand
             command = Conexion1.CreateCommand()
                 command.CommandText = "BACKUP DATABASE [" & TextBoxSQL.Text.Trim & "] TO DISK = '" & destino & s & ".bak' WITH  MEDIANAME = '" & s & "', NAME = '" & s & "'"
            Conexion1.Open()
            command.ExecuteNonQuery()
            MsgBox("Backup realizado con exito " + s.ToUpper() + ".BAK")
            Conexion1.Close()
    Catch
        MsgBox(ErrorToString())
    End Try
End Sub

==Resulta que me funciona perfecto, pero el fichero resultante .bak me lo hace en el disco del servidor SQL donde se encuenra la instancia y quiero que me lo ubique en la PC local donde esta la aplicacion, no logro hacerlo aunque le de la ubicacion de la pc local.
Como hacerlo?,gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de BERNARDO HECTOR
Val: 42
Ha disminuido su posición en 2 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

backup de base de datos sql server 2008 mediante codigo vb.net

Publicado por BERNARDO HECTOR (15 intervenciones) el 27/05/2020 04:09:56
Fijate si este procedimiento que yo utilizo para hacer un backup, con vb net 2019 y MySQL Server, te puede dar alguna idea:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
'// http://www.canalvisualbasic.net/foro/visual-basic-net/backup-mysql-vb-net-16524/
'// https://msdn.microsoft.com/es-es/library/system.windows.forms.filedialog.initialdirectory%28v=vs.110%29.aspx
Dim dlgGuardar As New SaveFileDialog
dlgGuardar.InitialDirectory = sRutaMisDoc ' esta es 1 variable para ir a Mis Docum.
dlgGuardar.Filter = "Archivos de respaldo (*.sql)|*.sql"
dlgGuardar.FilterIndex = 2
dlgGuardar.RestoreDirectory = True
Dim NombreBackup As String = "BackupCentroJubilVC_" & DateTime.Now.ToString("ddMMMMyyyy_HHmm") '   yyyyMMddhhmmss") '    "MMMM dd, yyyy"  Dim fecha As String = Date.Now.Year & Date.Now.Month & Date.Now.Day
'fecha &= "_" & Date.Now.Hour & Date.Now.Minute
With dlgGuardar
    .FileName = NombreBackup ' "New_Backup_Jubilados_" & fecha
    .Filter = "Archivos de respaldo (*.sql)|*.sql"
    If .ShowDialog = Windows.Forms.DialogResult.OK Then
        If sqldata.BackUp(Path:= .FileName, KurDir:=sRutaBin) = False Then ' KurDir:=myValue) = False Then
            MsgBox("Respaldo NO realizado. ¡Problema!", CType(MsgBoxStyle.Information + MsgBoxStyle.OkOnly, MsgBoxStyle), "Notificación del sistema")
            Module1.bSeHizoBackup = False
        Else
            'https://www.webprogramacion.com/138/vbnet/acceder-a-una-url-desde-un-winform.aspx
            System.Diagnostics.Process.Start(sDirecWeb)
            'System.Diagnostics.Process.Start("https://app.box.com/login/")
        End If
    End If
End With
Te paso varios Links que te pueden ayudar.
Quedo a tu disposición si te puedo ayudar. Suerte !!
Bernardo de Argentina
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Ignacio
Val: 83
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

backup de base de datos sql server 2008 mediante codigo vb.net

Publicado por Ignacio (42 intervenciones) el 27/05/2020 17:44:34
B, dia,muy interesante tu codigo y te doy las gracias, pero tengo varias dudas.

1- las variables sqldata , sRutaBin y Module1 que tipo de variables son ? tienen alguna referencia en .net ?
2- Que representa Kurdir ?

La duda es en estas sentencias..

1
2
3
4
5
If sqldata.BackUp(Path:= .FileName, KurDir:=sRutaBin) = False Then ' KurDir:=myValue) = False Then
 
    MsgBox("Respaldo NO realizado. ¡Problema!", CType(MsgBoxStyle.Information + MsgBoxStyle.OkOnly, MsgBoxStyle), "Notificación del sistema")
 
    Module1.bSeHizoBackup = False

y por ultimo.. donde especifico la Base de Datos que le quiero hacer la salva ?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de BERNARDO HECTOR
Val: 42
Ha disminuido su posición en 2 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

backup de base de datos sql server 2008 mediante codigo vb.net

Publicado por BERNARDO HECTOR (15 intervenciones) el 01/06/2020 21:18:32
Hola amigo. Tienes razón, debería haberte aclarado que la práctica del Backup, que me funciona muy bien, lleva muchos procedimientos y funciones que no se explican aquí. Hazme un correo por favor, a vuelta del mismo te envío todo el material y te explico paso a paso. No dispongo por ahora de tiempo para explicarlo por aquí, pero no deseo dejarte con la duda. Es todo lo que puedo hacer por falta de tiempo. Espero tus noticias. Gracias. Bernardo desde Argentina. Mi email: bernardo.planning@gmail.com
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Ignacio
Val: 83
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

backup de base de datos sql server 2008 mediante codigo vb.net

Publicado por Ignacio (42 intervenciones) el 03/06/2020 00:03:49
Le envie un Email, no se si lo recibio, el mio es ignacio@pri.gases.co.cu, gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de BERNARDO HECTOR
Val: 42
Ha disminuido su posición en 2 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

backup de base de datos sql server 2008 mediante codigo vb.net

Publicado por BERNARDO HECTOR (15 intervenciones) el 03/06/2020 01:32:13
Hola Ignacio. Puedes enviarme de nuevo? Disculpa. Lo espero. Gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Ignacio
Val: 83
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

backup de base de datos sql server 2008 mediante codigo vb.net

Publicado por Ignacio (42 intervenciones) el 03/06/2020 17:53:02
Acabo de escribirte, espero que lo recibas, salu2
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar