asp - Fejl i update ! hvor ? ;S - Udvikleren.dk - Programmering, webdesign og grafik

Tags: asp

<< < 1 2 3 > >>

Bruger #7209 @ 26.06.05 21:33

Nogle der kan se hvad der er galt her:

Kode

Microsoft OLE DB Provider for ODBC Drivers error '80040e07'

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

/community/rediger-profil.asp, line 20

linje 20:

Kode

Conn.Execute(strSQL)

Rediger-profil.asp

Kode

<html>
<head>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("community.mdb")
Conn.Open DSN

strSQL = "update Brugere set "
strSQL = strSQL & "navn= '" & request.form("navn") & "', "
strSQL = strSQL & "born= '" & request.form("born") & "', "
strSQL = strSQL & "bosted= '" & request.form("bosted") & "', "
strSQL = strSQL & "brugernavn= '" & request.form("brugernavn") & "', "
strSQL = strSQL & "adgangskode= '" & request.form("adgangskode") & "' "
strSQL = strSQL & " Where Id = " & request.Querystring("id") & ""

' SQL sætning eksekveres 
Conn.Execute(strSQL)

%>
<form method="post" action="rediger-profil.asp?id=<%=request.Querystring("id")%>">
<table>
<tr>
<td>Navn:</td><td><input type="text" value="<%=rs("navn")%>" name="navn"></td>
</tr>
<tr>
<td>Navn:</td><td><input type="text" value="<%=rs("born")%>" name="born"></td>
</tr>
<tr>
<td>Navn:</td><td><input type="text" value="<%=rs("bosted")%>" name="bosted"></td>
</tr>
<tr>
<td>Navn:</td><td><input type="text" value="<%=rs("brugernavn")%>" name="brugernavn"></td>
</tr>
<tr>
<td>Navn:</td><td><input type="text" value="<%=rs("adgangskode")%>" name="adgangskode"></td>
</tr>
<tr>
<td></td><td><input type="submit" value="Gem" name="Submit"></td>
</tr>
</table>
<%
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>

29 svar postet i denne tråd vises herunder
0 indlæg har modtaget i alt 0 karma

Sorter efter stemmer Sorter efter dato

Bruger #7753 @ 26.06.05 22:46

kommer ingen fejlmeddelser

Den skriver bare intet i felterne?

ChristofferB ::.

Bruger #7209 @ 26.06.05 22:46

Nemlig

Bruger #7753 @ 26.06.05 22:47

Nemlig

Giv mig lige url

ChristofferB ::.

Bruger #7209 @ 26.06.05 22:49

nu er den bare tilbage til

Kode

<html>
<head>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("community.mdb")
Conn.Open DSN

strSQL = "update Brugere set "
strSQL = strSQL & "navn= '" & request.form("navn") & "', "
strSQL = strSQL & "bosted= '" & request.form("bosted") & "', "
strSQL = strSQL & "brugernavn= '" & request.form("brugernavn") & "', "
strSQL = strSQL & "adgangskode= '" & request.form("adgangskode") & "' "
strSQL = strSQL & " Where Id = " & request.Querystring("id") & ""

' SQL sætning eksekveres 
Conn.Execute(strSQL)
%>
<form method="post" action="rediger-profil.asp?id=<%=request.Querystring("id")%>">
<table>
<tr>
<td>Navn:</td><td><input type="text" value="<%=rs("navn")%>" name="navn"></td>
</tr>
<tr>
<td>By:</td><td><input type="text" value="<%=rs("bosted")%>" name="bosted"></td>
</tr>
<tr>
<td>Brugernavn:</td><td><input type="text" value="<%=rs("brugernavn")%>" name="brugernavn"></td>
</tr>
<tr>
<td>Kode:</td><td><input type="password" value="<%=rs("adgangskode")%>" name="adgangskode"></td>
</tr>
<tr>
<td></td><td><input type="submit" value="Gem" name="Submit"></td>
</tr>
</table>
<%
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>

http://www.xsound.dk/community/rediger-profil.asp?id=1

Bruger #7753 @ 26.06.05 22:54

rediger-profil.asp

Kode

<html>
<head>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("community.mdb")
Conn.Open DSN

strSQL = "Select * From Brugere where id = '" & request.querystring("id")
set rs = Conn.Execute(strSQL)

%>
<form method="post" action="rediger-update.asp?id=<%response.write request.Querystring("id")%>">
<table>
<tr>
<td>Navn:</td><td><input type="text" value="<%response.write rs("navn")%>" name="navn"></td>
</tr>
<tr>
<td>Navn:</td><td><input type="text" value="<%response.write rs("bosted")%>" name="bosted"></td>
</tr>
<tr>
<td>Navn:</td><td><input type="text" value="<%response.write rs("brugernavn")%>" name="brugernavn"></td>
</tr>
<tr>
<td>Navn:</td><td><input type="text" value="<%response.write rs("adgangskode")%>" name="adgangskode"></td>
</tr>
<tr>
<td></td><td><input type="submit" value="Gem" name="Submit"></td>
</tr>
</table>
<%
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>

update-profil.asp

Kode

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("community.mdb")
Conn.Open DSN

strSQL = "Update Brugere set navn = '" & request.form("navn") & "', bosted = '" & request.form("bosted") & "', brugernavn = '" & request.form("brugernavn") & "', adgangskode = '" & request.form("adgangskode") & "' where id = '" & request.Querystring("id") & "'"

Conn.Execute(strSQL)

Conn.Close
Set Conn = Nothing
Response.redirect "rediger-profil.asp?id=" & request.querystring("id")
%>

Prøv det her istedet!

ChristofferB ::.

Bruger #7209 @ 26.06.05 23:01

GLEM DET HELE !!!!!!!

Bruger #7209 @ 26.06.05 23:13

Det korekte:

Kode

<html>
<head>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("community.mdb")
Conn.Open DSN

strSQL = "update Brugere set "
strSQL = strSQL & "navn= '" & request.form("navn") & "', "
strSQL = strSQL & "bosted= '" & request.form("bosted") & "', "
strSQL = strSQL & "brugernavn= '" & request.form("brugernavn") & "', "
strSQL = strSQL & "adgangskode= '" & request.form("adgangskode") & "' "
strSQL = strSQL & " Where Id = " & request.Querystring("id") & ""

' SQL sætning eksekveres 
Conn.Execute(strSQL)
%>
<form method="post" action="rediger-profil.asp?id=<%=request.Querystring("id")%>">
<table>
<tr>
<td>Navn:</td><td><input type="text" value="<%=request.Querystring("navn")%>" name="navn"></td>
</tr>
<tr>
<td>By:</td><td><input type="text" value="<%=request.Querystring("bosted")%>" name="bosted"></td>
</tr>
<tr>
<td>Brugernavn:</td><td><input type="text" value="<%=request.Querystring("brugernavn")%>" name="brugernavn"></td>
</tr>
<tr>
<td>Kode:</td><td><input type="password" value="<%=request.Querystring("adgangskode")%>" name="adgangskode"></td>
</tr>
<tr>
<td></td><td><input type="submit" value="Gem" name="Submit"></td>
</tr>
</table>
<%
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>

Bruger #7753 @ 26.06.05 23:18

Det korekte:

Kode

<html>
<head>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("community.mdb")
Conn.Open DSN

strSQL = "update Brugere set "
strSQL = strSQL & "navn= '" & request.form("navn") & "', "
strSQL = strSQL & "bosted= '" & request.form("bosted") & "', "
strSQL = strSQL & "brugernavn= '" & request.form("brugernavn") & "', "
strSQL = strSQL & "adgangskode= '" & request.form("adgangskode") & "' "
strSQL = strSQL & " Where Id = " & request.Querystring("id") & ""

' SQL sætning eksekveres 
Conn.Execute(strSQL)
%>
<form method="post" action="rediger-profil.asp?id=<%=request.Querystring("id")%>">
<table>
<tr>
<td>Navn:</td><td><input type="text" value="<%=request.Querystring("navn")%>" name="navn"></td>
</tr>
<tr>
<td>By:</td><td><input type="text" value="<%=request.Querystring("bosted")%>" name="bosted"></td>
</tr>
<tr>
<td>Brugernavn:</td><td><input type="text" value="<%=request.Querystring("brugernavn")%>" name="brugernavn"></td>
</tr>
<tr>
<td>Kode:</td><td><input type="password" value="<%=request.Querystring("adgangskode")%>" name="adgangskode"></td>
</tr>
<tr>
<td></td><td><input type="submit" value="Gem" name="Submit"></td>
</tr>
</table>
<%
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>

Virker jo heller ikke

ChristofferB ::.

Bruger #6372 @ 26.06.05 23:32

hmm ... måske var min forklaring ikke den allerbedste men at ingen af jer brugte den syntes jeg nok virkede lidt pudsigt

.

Hvis du vil have at felterne skal skrive de du lige har opdateret databasen med kan du jo bare (som du selv har prøvet men dog har gjort forkert) bruge Request.Form("bla").

så kommer hele din kode til at se således ud:

Kode

<html>
<head>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("community.mdb")
Conn.Open DSN

strSQL = "update Brugere set "
strSQL = strSQL & "navn= '" & request.form("navn") & "', "
strSQL = strSQL & "bosted= '" & request.form("bosted") & "', "
strSQL = strSQL & "brugernavn= '" & request.form("brugernavn") & "', "
strSQL = strSQL & "adgangskode= '" & request.form("adgangskode") & "' "
strSQL = strSQL & " Where Id = " & request.Querystring("id") & ""

' SQL sætning eksekveres 
Conn.Execute(strSQL)
%>
<form method="post" action="rediger-profil.asp?id=<%=request.Querystring("id")%>">
<table>
<tr>
<td>Navn:</td><td><input type="text" value="<%=request.form("navn")%>" name="navn"></td>
</tr>
<tr>
<td>By:</td><td><input type="text" value="<%=request.form("bosted")%>" name="bosted"></td>
</tr>
<tr>
<td>Brugernavn:</td><td><input type="text" value="<%=request.form("brugernavn")%>" name="brugernavn"></td>
</tr>
<tr>
<td>Kode:</td><td><input type="password" value="<%=request.form("adgangskode")%>" name="adgangskode"></td>
</tr>
<tr>
<td></td><td><input type="submit" value="Gem" name="Submit"></td>
</tr>
</table>
<%
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>

<< < 1 2 3 > >>

Fejl i update ! hvor ? ;S

Karma barometer (30 dage)

Modtaget

Givet

Favorit hos
Forum tråde
Artikler