Ayuda con Backup y Crystal Report

Jos?.
14 de Abril del 2006
q tal? Necesito un poco de ayuda para implementar un respaldo en una BD en SQL desde una aplicacion en VB 6, pero me han dicho algunas opciones no muy usuales, q sugieren? si alguien tiene Crystal Report 8 tambien se los agradeceria.

mvallejos
14 de Abril del 2006
Un backup lo puedes hacer directamente con Transac SQL (T-SQL) de SQL Server, fijate este ejemplo

Dim Sql as String
Dim NombreBase As String
Dim NomBackUp As String

NombreBase = "<nombre de la base de datos>
NomBackUp = < Ruta completa al archivo de backup>

Sql = "BACKUP DATABASE [" & NombreBase & "] "
Sql = Sql & " TO DISK = '" & NomBackUp & "'"
Sql = Sql & " WITH INIT , NOUNLOAD
sql = sql & " , NAME = 'Prueba_backup'
sql = sql & " , SKIP , STATS = 10, NOFORMAT"

Cn.Execute Sql

Donde

Cn es una variable de tipo ADODB.Connection conectada a la base Master (Por las dudas, para no tener en uso la base de trabajo)

'Prueba_backup' es solamente el nombre lógico del dispositivo de backup, puede ir cualquier nombre.

En lo que respecta al Crystal Report 8, el CD ocupa 411 MB, no creo que alguien te lo mande, yo diría que te lo bajes, hasta donde se, muchos lo han conseguido con el EMule.

Saludos