webForumDet fria alternativet

Kopiera Databas?

ASPur ASP

11 svar · 507 visningar · startad av Vinnaren

Medlem sedan sep. 2005833 inlägg
Frågan#1

Hej

Undrar om det finns något script som kan kopiera en databas??

Hade isf tänkt mig en knapp som man trycker på så ska en säkerhetskopia av databasen tas, finns redan en kopia så ska den skrivas över.

Går det?? isf hur?

Tacksam för all hjälp :stud

Medlem sedan mars 20023 686 inlägg
#2

Vad är det för databas? Access, MSSQL, MySQL osv osv osv??

Medlem sedan sep. 2005833 inlägg
#3

Det är Access :D

Medlem sedan juni 200032 967 inlägg
#4

Du kan använda Filesystemobject för att kopiera filer.

http://www.devguru.com/technologies/vbscript/14051.asp

Mvh

Medlem sedan sep. 2005833 inlägg
#5

funkar inte så bra, det händer ingenting med den koden :q

Hade tänkt mig att den filen som det tas en backup på ska ha
namn-backup.mdb

Medlem sedan juni 200032 967 inlägg
#6

Hur ser din kod ut nu då?
Får du något felmeddelande, eller står browsern bara och tuggar?
Om det senare: har du Norton på maskinen se till att inaktivera "Script blocking".

mvh

Medlem sedan sep. 2005833 inlägg
#7

Koden jag har är:

<%
dim filesys
set filesys=CreateObject("Scripting.FileSystemObject")
If filesys.FileExists("c:\inetpub\db\forumet.mdb") Then
filesys.CopyFile "c:\inetpub\db\forumet.mdb", "c:\inetpub\db\"
End If
%>

har provat att inaktivera Norton men den står fortfarande o "tuggar" :OO

Medlem sedan juni 200032 967 inlägg
#8

Jag vet inte om det är det bästa att inaktivera Norton, prova att inaktivera script blocking bara.

http://www.iisfaq.com/default.aspx?View=A387

Medlem sedan sep. 2005833 inlägg
#9

ok, nu kommer jag till en vit sida, så den "tuggar" inte längre. Men kan man inte göra så att den heter tex. namn-backup.mdb ??? och sen så att det står på "den vita sidan" tex. Backup utförd eller något, eller Backup misslyckades??

Medlem sedan juni 200032 967 inlägg
#10

Men kan man inte göra så att den heter tex. namn-backup.mdb ???

Jo, det är bara att specificera filnamnet också i koden...

filesys.CopyFile "c:\inetpub\db\forumet.mdb", "c:\inetpub\db\forumet-backup.mdb"

och sen så att det står på "den vita sidan" tex. Backup utförd eller något, eller Backup misslyckades??

Jo, vi kan lägga in lite felhantering...

<% 
on error resume next
dim filesys 
set filesys=CreateObject("Scripting.FileSystemObject") 
If filesys.FileExists("c:\inetpub\db\forumet.mdb") Then 
     filesys.CopyFile "c:\inetpub\db\forumet.mdb", "c:\inetpub\db\forumet-backup.mdb" 
else
     error = 1
End If 
if err.number<>0 or error = 1 then
     Response.write "något blev galet, ingen backup fjukades"
else
     Response.write "weee"
end if
%>
Medlem sedan sep. 2005833 inlägg
#11

ååå, det funkar, Tusen tack :D

Medlem sedan juli 200412 913 inlägg
#12

vad bra... det där skulle man ju kunna använda själv :) jag får en massa spam i gästboken... då skulle man kunna rensa bort det. Sedan med det där ta backup, nästa gång man får spam och det inte kommit nåt annat, då tar jag den där igen, fast åt andra hållet alltså. finfint! :)

264 ms totalt · 3 externa anrop · v20260731065814-full.b746b907
132 ms — hämta forumlista (db)
127 ms — hämta statistik (db)
135 ms — hämta tråd, inlägg och bilagor (db)