FileSystemObject

String indeholder \"C:\\wwwroot\\inetpub\\variabler\\45489\"

Set CopyFiles = CreateObject(\"Scripting.FileSystemObject\")
CopyFiles.CopyFile (\"C:\\inetpub\\wwwroot\\default.asp\", string)

Mappe = Request.QueryString(\"Id\")
string = Server.MapPath(\"\" & (Mappe))
string = string & \"\\default.asp\"

Set CopyFiles = CreateObject(\"Scripting.FileSystemObject\")
CopyFiles.CopyFile (\"C:\\inetpub\\wwwroot\\default.asp\", string)

øøhhm....er det ikke omvendt i din kommentar?
(C:\\inetpub\\wwwroot\\variabel\\45489)

1 svar gav

Fejltype:
Der opstod en Microsoft VBScript-kompileringsfejl (0x800A0414)
Der kan ikke bruges parenteser ved kald af en Sub
/variabler/lavfolder2.asp, line 11, column 61

som heg har set en del gange :-)) prøver lige nummer 2

2 svar gav samme fejl....

--->>superior

string indeholder værdien

C:\\inetpub\\wwwroot\\variabel\\45489

Mappe = Request.QueryString(\"Id\")
string = Server.MapPath(\".\" & (Mappe))


Set CopyFiles = CreateObject(\"Scripting.FileSystemObject\")
CopyFiles.CopyFile (\"C:\\inetpub\\wwwroot\\default.asp\", string)

Niks det dutter ikke med Server.MapPath(\".\" & (Mappe)) for så går der ged i det lidt højre oppe hvor jeg laver en mappe med navn fra string

Mappe = Request.QueryString(\"Id\")
string = Server.MapPath(\".\" & (Mappe))
string = string & \"\\\"

Set CopyFiles = CreateObject(\"Scripting.FileSystemObject\")
CopyFiles.CopyFile (\"C:\\inetpub\\wwwroot\\default.asp\", string)

Mappe = Request.QueryString(\"Id\")
string = Server.MapPath(\"\" & (Mappe))
string = string & \"\\\"

Set CopyFiles = CreateObject(\"Scripting.FileSystemObject\")
CopyFiles.CopyFile (\"C:\\inetpub\\wwwroot\\default.asp\", string) 

  Mappe = Request.QueryString(\"Id\")
string = Server.MapPath(\".\") & mappe
string = string & \"\\\"

Set CopyFiles = CreateObject(\"Scripting.FileSystemObject\")
CopyFiles.CopyFile (\"C:\\inetpub\\wwwroot\\default.asp\", string) 

<%
Dim Mappe , string

Mappe = Request.QueryString(\"Id\")
string = Server.MapPath(\"\" & (Mappe))
string = string & (\"\\\")

\'Set FileSystemFolder = CreateObject(\"Scripting.FileSystemObject\")
\'FileSystemFolder.CreateFolder  (\"\"& (string))

Set CopyFiles = CreateObject(\"Scripting.FileSystemObject\")
CopyFiles.CopyFile \"C:\\inetpub\\wwwroot\\default.asp\", string

\'Set FileSystemFile = CreateObject(\"Scripting.FileSystemObject\")
\'FileSystemFile.CreateTextFile  (\"\" & string & \"\\default.asp\" )

\'Set Filesystem = CreateObject(\"Scripting.FileSystemObject\")
\'Set FilesystemFileContext = Filesystem.OpenTextFile(\"\" & string &\"\\default.asp\", 8, true)
\'FilesystemFileContext.WriteLine (\"test\")
\'FilesystemFileContext.WriteLine (\"test\")
\'FilesystemFileContext.Close
%>

Så funger den sgu

Virker det nu ?

<%
Dim Mappe , string

Mappe = Request.QueryString(\"Id\")
string = Server.MapPath(\"\" & (Mappe))
string = string & (\"\\\")

Set FileSystemFolder = CreateObject(\"Scripting.FileSystemObject\")
FileSystemFolder.CreateFolder  (\"\"& (string))

Set CopyFiles = CreateObject(\"Scripting.FileSystemObject\")
CopyFiles.CopyFile \"C:\\inetpub\\wwwroot\\default.asp\", string

%>

Den færdige kode.

--> netsrac

Tak :-) jeg har siddet og rodet rundt med () \"\" \"\\\" (\"\" & string ) og fanden og hans pump stok.................

Findes der ikke en rigtig god vejledning i hvornår () skal bruges og hvornår de ikke skal bruges??

Som regel bruges paranteser blot for overskuelighedens skyld f.eks.

response.write(\"hej\")

response.write \"hej\"

giver samme resultat.

Ja men det er bare tit man render ind i døje når man definere variabler med andre variabler eller som ovenfor ved at proppe det ind i filesystemobject...........har ikke døje med alm. asp sider, men det har da givet en del grå hår i filesystemobject

BTW netsrac

Hvis du kender en eller anden skummel måde at definere hvorfra filen skal kopieres dynamisk, altså uden at skrive den faste sti, så må du godt lige sige til, så oprette jeg et nyt ? så du kan få nogle points.

Kan bare ikke lige se hvordan det skulle kunne lade sig gøre når filen .asp ligge i mappen \"variabler\", men det ville være rart da sit web hotel så kan rode alt det rundt de ville uden at det ville på virke scriptet.

Webhotel udbyder flytter normalt ikke rundt på drev osv. det vil jo give mange utilfredse kunder.

Nej der er selvfølgelig mange som ville miste deres DB connections og lignende.
Det er bare min måde at tænke på.............livrem og seler.........man ved jo ikke om de sætter en ny startet til at rode og han lige pludselig får en smart tanke..........


hmmmmmmmm hvis man nu feks. skrev

dim sti

sti = Server.MapPath(\"\\default.asp\")
Udskriver nu C:\\Inetpub\\wwwroot\\variabler\\default.asp

Kan man så ikke lave et script som replacer \\variabler\\default.asp med \\default.asp lægge det i en variabel og kalde den \"ren_sti\"
så kan der i teroien være lige så mange mapper foran \\variabler\\default.asp som overhovedet tænkeligt, men man er altid sikker på at ren_sti udskriver

C:\\Inetpub\\wwwroot\\default.asp

eller

Z:\\Inetpub\\wwwroot\\webs\\webs1\\webs2\\default.asp

Altså hvis default.asp ligger i roden af sit domaine (web mappe på serveren)