Avatar billede wzglobal.com Nybegynder
24. november 2001 - 20:14 Der er 12 kommentarer og
1 løsning

Hvad er det galt ?

Jeg har denne kode :

change_password.asp :

<!--#include file=\"system.asp\" -->
<%
        strMode        = Request(\"mode\")
        strPassword    = Request(\"password\")

        Set Conn    = Server.CreateObject(\"ADODB.Connection\")
        Set Rs        = Server.CreateObject(\"ADODB.Recordset\")
   
        strSQLQuery    = \"DBQ=\" & Server.MapPath(\"system.mdb\") & \";Driver={Microsoft Access Driver (*.mdb)}\"

        Conn.Open strSQLQuery

        If strMode = \"password\" Then   
        ExecuteSQL \"system.mdb\", \"UPDATE users SET password=\'\" & strPassword & \"\' WHERE username=\'\" & strUsername & \"\';\"
        Response.Write \"<h1>-> Din kode er nu ændret til : \" & strPassword & \"</h1>\"
        End If
%>
<html>
<head>
    <title>Skift Kodeord</title>
<script>
function count() { document.password.countdown.value=document.password.password.value.length; }
</script>
<link rel=\'stylesheet\' type=\'text/css\' href=\'style.css\'>
</head>
<body bgcolor=\'#3791B3\'>

<p align=\"center\">
<form action=\'change_password.asp\' method=\'post\' name=\'password\'>
<input type=\'hidden\' name=\'mode\' value=\'password\'>
Nye Kodeord : <br>
<input type=\'password\' name=\'password\' maxlength=\'20\' style=\'font-size: 10px; color: #ffffff; border: 1 solid #ffffff; background-color:#287BA4\' onchange=\'count();\' onkeyup=\'count();\'>
<input type=\'text\' name=\'countdown\' value=\'0\' size=\'2\' style=\'font-size: 10px; color: #ffffff; border: 1 solid #ffffff; background-color:#287BA4\' readonly><br><br>
<input type=\'submit\' value=\'Skift kodeord ->\' style=\'font-size: 10px; color: #ffffff; border: 1 solid #ffffff; background-color:#287BA4\'>&nbsp;
<input type=\"reset\" value=\"Nulstil\" style=\"font-size: 8pt; color: #ffffff; border: 1 solid #ffffff; background-color:#287BA4\">
</form>
</p>

</body>
</html>
<%
Conn.Close: Set Conn = Nothing
%>

Når jeg skifter password får jeg denne medd. :

Der opstod en Microsoft VBScript-kørselsfejl fejl \'800a01a8\'

Et objekt er obligatorisk

/wz/chat/change_password.asp, linje 42

-> den skifter password fint, men hvad er har
jeg skrevet forkert i min asp kode ?
Avatar billede wzglobal.com Nybegynder
24. november 2001 - 20:21 #1
ekstra point for hurtigt svar !!!
Avatar billede c Nybegynder
24. november 2001 - 20:33 #2
prøv at skifte
<%
Conn.Close: Set Conn = Nothing
%>
ud med:
<%
Conn.Close
Set Conn = Nothing
%>

/c
Avatar billede wzglobal.com Nybegynder
24. november 2001 - 20:34 #3
ok
Avatar billede tofte Juniormester
24. november 2001 - 20:35 #4
prøv at del den i to linier
Conn.Close: Set Conn = Nothing

så den ser sådan ud
Conn.Close
Set Conn = Nothing
Avatar billede wzglobal.com Nybegynder
24. november 2001 - 20:35 #5
den det virker ikke :(
Avatar billede tofte Juniormester
24. november 2001 - 20:35 #6
jeg er blevet sløv på mine gamle dage
Avatar billede wzglobal.com Nybegynder
24. november 2001 - 20:36 #7
Den siger bare det samme !
Avatar billede c Nybegynder
24. november 2001 - 20:41 #8
linie 42, er da html, eller er det bare mig??

//c
Avatar billede ilithanos Nybegynder
24. november 2001 - 23:26 #9
du har ret c
Avatar billede eagleeye Praktikant
25. november 2001 - 11:43 #10
du har denne linie:

ExecuteSQL \"system.mdb\", \"UPDATE users SET password=\'\" & strPassword & \"\' WHERE username=\'\" & strUsername & \"\';\"

Det ligner en function ?? du har lige åbnet en connection så hvor ikke:

Conn.Execute (\"UPDATE users SET password=\'\" & strPassword & \"\' WHERE username=\'\" & strUsername & \"\';\")
Avatar billede eagleeye Praktikant
25. november 2001 - 11:52 #11
Den function du har ExecuteSQL tror jeg lukker for connection (conn) til databasen.
så vil den nemlig fejle i conn.Close
Avatar billede wzglobal.com Nybegynder
26. november 2001 - 15:25 #12
mener du så at filer skal se sådan ud ? :

<!--#include file=\"system.asp\" -->
<%
        strMode        = Request(\"mode\")
        strPassword    = Request(\"password\")

        Set Conn    = Server.CreateObject(\"ADODB.Connection\")
        Set Rs        = Server.CreateObject(\"ADODB.Recordset\")
   
        strSQLQuery    = \"DBQ=\" & Server.MapPath(\"system.mdb\") & \";Driver={Microsoft Access Driver (*.mdb)}\"

        Conn.Open strSQLQuery

        If strMode = \"password\" Then   
        Conn.Execute (\"UPDATE users SET password=\'\" & strPassword & \"\' WHERE username=\'\" & strUsername & \"\';\")
        Response.Write \"<h1>-> Din kode er nu ændret til : \" & strPassword & \"</h1>\"
        End If
%>
<html>
<head>
    <title>Skift Kodeord</title>
<script>
function count() { document.password.countdown.value=document.password.password.value.length; }
</script>
<link rel=\'stylesheet\' type=\'text/css\' href=\'style.css\'>
</head>
<body bgcolor=\'#3791B3\'>

<p align=\"center\">
<form action=\'change_password.asp\' method=\'post\' name=\'password\'>
<input type=\'hidden\' name=\'mode\' value=\'password\'>
Nye Kodeord : <br>
<input type=\'password\' name=\'password\' maxlength=\'20\' style=\'font-size: 10px; color: #ffffff; border: 1 solid #ffffff; background-color:#287BA4\' onchange=\'count();\' onkeyup=\'count();\'>
<input type=\'text\' name=\'countdown\' value=\'0\' size=\'2\' style=\'font-size: 10px; color: #ffffff; border: 1 solid #ffffff; background-color:#287BA4\' readonly><br><br>
<input type=\'submit\' value=\'Skift kodeord ->\' style=\'font-size: 10px; color: #ffffff; border: 1 solid #ffffff; background-color:#287BA4\'>&nbsp;
<input type=\"reset\" value=\"Nulstil\" style=\"font-size: 8pt; color: #ffffff; border: 1 solid #ffffff; background-color:#287BA4\">
</form>
</p>

</body>
</html>
<%
Conn.Close
Set Conn = Nothing
%>
Avatar billede wzglobal.com Nybegynder
28. november 2001 - 18:07 #13
-> eagleeye : Yes det virker ! Takker for hælpen...! her har du dine point !
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