19. februar 2004 - 20:27Der er
6 kommentarer og 1 løsning
HTTP 405 - Ressourcen er ikke tilladt nu med point
<% if not request.form("plusdbog") = "" then Function fncTextChange(strText) Dim strTemp strTemp = Trim(strText) strTemp = Replace(strTemp,"""","''") strTemp = Replace(strTemp,"'","''") 'strTemp = HTMLEncode(strTemp) fncTextChange = strTemp End Function
indhold = fncTextChange(request.form("tekst")) Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("db/dagbog123412341234234.mdb") Conn.Open DSN sql = "Insert into dagbog(titel, tekst, dato) VALUES('"&request.form("titel")&"','"&request.form("tekst")&"','"&now()&"')" set rs = conn.execute(sql) set rs = nothing end if %>
<form action="admin" method="post"> Titel på din dagbogs indlæg<br> <input type="text" name="titel"><br> Dit Dagbogs indlæg<br> <textarea cols="100" rows="30" name="tekst"></textarea> <br> <br> <input type="submit" name="plusdbog" value="Tilføj"> </form>
nogle der kan se fejlen.. den skriver:
"Den side, du søger efter, kan ikke vises, fordi sidens adresse er forkert.
Hvis du har skrevet sidens adresse på adresselinjen, skal du sikre dig, at du har angivet den korrekt.
Åbn mikkel startsiden, og søg derefter efter hyperlinks til de ønskede oplysninger. HTTP 405 - Ressourcen er ikke tilladt Internet Information Services
Støv, fibre og metalliske partikler kan påvirke både uptime, levetid og driftssikkerhed. Derfor arbejder flere datacentre systematisk med contamination control.
er du sikker på at det ikke er så banalt at der ikke er rettigheder til siden. IISUser_servernavn skal have mindst læserettigheder da det er den bruger browseren tilgår filen med
<% if request.form("send") <> "" then set rs = Server.CreateObject("ADODB.Connection") conn = "DRIVER={Microsoft Access Driver (*.mdb)}; " conn = conn & "DBQ=" & server.mappath("admin/12344231234trghsdfgsdfgtr65xfgh44agdfdfgh.mdb") Bruger = Request.Form("FBruger") Pass = Request.Form("FPass") SQL ="SELECT * FROM Tuser WHERE UserID = '" & Bruger & "'" rs.Open conn set rs = rs.execute(SQL)
If rs.EOF Then Alert = "Forkert brugernavn" Elseif rs("password") = pass Then Session("Login") = Bruger Session("ID") = rs("ID") Else Alert = "Forkert Password" End If end if %> <% if not request.form("plusdbog") = "" then Function fncTextChange(strText) Dim strTemp strTemp = Trim(strText) strTemp = Replace(strTemp,"""","''") strTemp = Replace(strTemp,"'","''") 'strTemp = HTMLEncode(strTemp) fncTextChange = strTemp End Function
indhold = fncTextChange(request.form("tekst")) Set Conn = Server.CreateObject("ADODB.Connection") DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("db/dagbog123412341234234.mdb") Conn.Open DSN sql = "Insert into dagbog(titel, tekst, dato) VALUES('"&request.form("titel")&"','"&request.form("tekst")&"','"&now()&"')" set rs = conn.execute(sql) set rs = nothing end if %> <html> <head> <title>Admin for dagbog</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head>
<body> <% if session("login") = "" then %> <form action="admin.asp" method="post"> Brugernavn:<br> <input type="text" name="FBruger"><br> Password: <br> <input type="password" name="FPass"><br> <input type="submit" name="send"> </form> <% end if %> <br> <br> <% if not session("login") = "" then %> <form action="admin" method="post"> Titel på din dagbogs indlæg<br> <input type="text" name="titel"><br> Dit Dagbogs indlæg<br> <textarea cols="100" rows="30" name="tekst"></textarea> <br> <br> <input type="submit" name="plusdbog" value="Tilføj"> </form> <% end if %> </body> </html>
Prøv: Menuen Funktioner > Internetindstillinger > Avanceret > Fjern "x" i "Vis meddelelser om uskadelige HTTP-fejl" Derefter loader du siden igen. Hvilken fejl får du? (Kopier den og indsæt den her)
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.
