Frågan 15 nov. 2002 22:25 #1 Detta är ju när man anger en VIRTUELL sökväg, Men jag vill ange en fysisk sökväg till mappen som ska kopieras och till vilken mapp den ska till. Behöver detta ganska omgående..:x
<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
sourceFolder = Server.MapPath("html")
destFolder = Server.MapPath("backup")
objFSO.CopyFolder sourceFolder,destFolder
%>
S solbulle Medlem sedan mars 2001 5 287 inlägg <%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
sourceFolder = "c:\inetpub\wwwroot\html"
destFolder = "c:\inetpub\wwwroot\backup"
objFSO.CopyFolder sourceFolder,destFolder
%>
Nyfiken i en strut... Varför inte Server.MapPath?
S solbulle Medlem sedan mars 2001 5 287 inlägg response.write Server.MapPath("html")
eller
response.write sourceFolder
i ditt fall ger dig den fysiska vägen.
Detta funkar inte att göra men om jag sätter
sourceFolder = "g:\home" så kan jag kopiera mappen sys men inte html
Microsoft VBScript runtime error '800a0005'
Invalid procedure call or argument
/back.asp, line 8
<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
sourceFolder = "g:\home\medialabs.nu\html"
destFolder = "g:\home\medialabs.nu\html\backup"
objFSO.CopyFolder sourceFolder,destFolder
%>
När jag uppdaterad i snabb följd sidan kom detta upp:
ADODB.Recordset error '800a004c'
Åtgärden är inte tillåten när objektet är stängt.
/back.asp, line 8
S solbulle Medlem sedan mars 2001 5 287 inlägg Lite parenteser kanske det ska vara iofs:
objFSO.CopyFolder (sourceFolder,destFolder)
Solbulle:
Microsoft VBScript compilation error '800a0414'
Cannot use parentheses when calling a Sub
/back.asp, line 8
objFSO.CopyFolder (sourceFolder,destFolder)
-------------------------------------------^
S solbulle Medlem sedan mars 2001 5 287 inlägg Och sökvägen är rätt?
Hur fungerar det om du använder sitt orginalscript?
-Med Server.MapPath?
-Du är helt säker på att sökvägen är rätt? Från serverns rot?
Detta funkar men inte om jag ändrar från sys till mappen html
För då får jag detta:
Microsoft VBScript runtime error '800a0005'
Invalid procedure call or argument
/back.asp, line 8
<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
sourceFolder = "g:\sys"
destFolder = "g:\home\\backup\"
objFSO.CopyFolder sourceFolder,destFolder
response.write "En Säkerhets kopia har gjorts på SYS filerna..."
%>
Det har löst sig. Webbhotellet gjorde en mapp till utanför rooten så att jag kan lägga backup filen där. Så nu funkar allt perfekt.