Avatar billede www.triffid.dk Nybegynder
27. april 2001 - 11:33 Der er 6 kommentarer og
1 løsning

oprette side +lidt mere

jeg har igennem en andens sprøgsmål fundet ud af at man opretter asp-sider med følgende kode:

<%
  Set fso = CreateObject(\"Scripting.FileSystemObject\")
  Set MyFile = fso.CreateTextFile(server.mappath(\"side.asp\"), True)
  MyFile.Write(request.form(\"indhold\"))
  MyFile.Close
%>

Men hvad så når man selv vil definere sidens navn, er det bare: <%
  Set fso = CreateObject(\"Scripting.FileSystemObject\")
  Set MyFile = fso.CreateTextFile(server.mappath(\"(request.form(\"sidenavn\").asp\"), True)
  MyFile.Write(request.form(\"indhold\"))
  MyFile.Close
%>   

eller ?

Og så lige en ekstra lille ting...hvordan sørger man for at den ikke kan overskrive en allerede oprettet side ?
Avatar billede spectual Nybegynder
27. april 2001 - 14:47 #1
<%
function Opretside (filnavn)

  Set fso = CreateObject(\"Scripting.FileSystemObject\")
  Set MyFile = fso.CreateTextFile(server.mappath(filnavn), True)
  MyFile.Write(request.form(\"indhold\"))
  MyFile.Close

end function

Opretside (\"side.asp\")

%>

Hvis du vil have den til at oprette efter en form:

Opretside (request (\"filnavn\"))

Øjeblik...
Avatar billede spectual Nybegynder
27. april 2001 - 14:49 #2
<%
function Opretside (filnavn)

  Set fso = CreateObject(\"Scripting.FileSystemObject\")
  if (fso.FileExists(filnavn)) then exit function
  Set MyFile = fso.CreateTextFile(server.mappath(filnavn), True)
  MyFile.Write(request.form(\"indhold\"))
  MyFile.Close

end function

Opretside (\"side.asp\")

%>

Nu overskriver den ikke eksisterende sider
Avatar billede spectual Nybegynder
27. april 2001 - 14:52 #3
Ups. Der var en lille swipser. Her er en testet version:

<%

function Opretside (filnavn)

  Set fso = CreateObject(\"Scripting.FileSystemObject\")
  if (fso.FileExists(server.mappath(filnavn))) then exit function
  Set MyFile = fso.CreateTextFile(server.mappath(filnavn), True)
  MyFile.Write(request.form(\"indhold\"))
  MyFile.Close

end function

Opretside (\"side.asp\")
%>
Avatar billede www.triffid.dk Nybegynder
27. april 2001 - 15:20 #4
på forhånd tak....men jeg har desværre ikke lige tid til at checke dem lige nu, gør det senere----
Avatar billede spectual Nybegynder
30. april 2001 - 09:09 #5
helt i orden. Foriøvrigt har jeg testet det.
Avatar billede www.triffid.dk Nybegynder
30. april 2001 - 19:14 #6
hmm har desværre (pga bla. søs\' konfirmation) ikke haft tid til at prøve selv, så du får bare pointne.......værsgo :)
Avatar billede spectual Nybegynder
01. maj 2001 - 13:52 #7
tak :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester