) Bak.Database = databasenamebak.Devices = Filesbak.Files = bak_filebak.SQLBackup srvif err.number> 0 thenresponse.write err.number & " " response.write err.description & " font> "end ifresponse.write" Backup success! font> "Elseif Act =" rest "TEN 'When you recover, you should do it when you use the database! Set srv = Server.CreateObject ( "SQLDMO.SQLServer") srv.LoginTimeout = sqlLoginTimeoutsrv.Connect sqlserver, sqlname, sqlpasswordSet rest = Server.CreateObject ( "SQLDMO.Restore") rest.Action = 0 'full db restorerest.Database = databasenamerest .Devices = Filesrest.Files = bak_filerest.ReplaceDatabase = True 'Force restore over existing databaseif err.number> 0 thenresponse.write err.number & " " response.write err.description & " font > "end ifrest.sqlrestore srv response.write" Restore success! font> "elseresponse.write No choice operation font>" End IFEND IF%> Body> html> stores the above code into ASP, upload