Op de pagina profile.asp kan je dus je profiel veranderen. Alles is ok, je kan al je data bekijken, veranderen, maar niet 'saven' of 'updaten'.
Je hoeft niets te veranderen in je profiel, als je update dan is er een fout.
Het ligt dus aan de Update statement.
Deze foutmelding krijg je:
Dit is de pagina:
Ik gebruik PWS (Windows 98), Microsoft Access 2000 (geen SQL-gedoe)
plz help me, kheb et nodig tegen de vakantie!
Je hoeft niets te veranderen in je profiel, als je update dan is er een fout.
Het ligt dus aan de Update statement.
Deze foutmelding krijg je:
code:
1
2
3
| Microsoft JET Database Engine fout '80040e14' Syntax error in UPDATE statement. profile.asp, regel 38 |
Dit is de pagina:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
| <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Profile</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="home.css" rel="stylesheet" type="text/css">
</head>
<body oncontextmenu="return false" ondragstart="return false" onselectstart="return false">
<%
action = Request.Querystring("action")
strDB = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("data.mdb")
set data = server.createobject("ADODB.Recordset")
data.activeconnection = strDB
data.source = "SELECT * FROM tstdb_Member WHERE Username ='" & Session("Username") & "'"
data.open
if action = "update" then
Password = Request.Form("Password")%>
<%if Password = "" then Response.Write "<a href=""javascript:history.go(-1)"" class=""text"">Please enter a valid password</a>" end if %>
<%FName = Request.Form("FName")%>
<%if FName = "" then Response.Write "<a href=""javascript:history.go(-1)"" class=""text"">Please enter your First Name</a>" end if%>
<%LName = Request.Form("LName")%>
<%if LName = "" then Response.Write "<a href=""javascript:history.go(-1)"" class=""text"">Please enter your Last Name</a>" end if%>
<%Email = Request.Form("Email")%>
<%if Email = "" then Response.Write "<a href=""javascript:history.go(-1)"" class=""text"">Please enter your Last Emailaddress</a>" end if%>
<%Street = Request.Form("Street")%>
<%if Street = "" then Response.Write "<a href=""javascript:history.go(-1)"" class=""text"">Please enter your Street</a>" end if%>
<%Num = Request.Form("Num")%>
<%if Num = "" then Response.Write "<a href=""javascript:history.go(-1)"" class=""text"">Please enter your Streetnumber</a>" end if%>
<%City = Request.Form("City")%>
<%if City = "" then Response.Write "<a href=""javascript:history.go(-1)"" class=""text"">Please enter your City</a>" end if%>
<%Age = Request.Form("Age")%>
<%if Age = "" then Response.Write "<a href=""javascript:history.go(-1)"" class=""text"">Please enter your Age</a>" end if%>
<%Homepage = Request.Form("Homepage")%>
<%set edit = server.createobject("ADODB.Command")
edit.ActiveConnection = strDB ' the strDB is from the data.asp we included in this page
edit.commandtext = "UPDATE tstdb_Member SET Password='Password',FName='FName',LName='LName',Email='Email',Street='Street',Num='Num',City='City',Age='Age',Homepage='Homepage' WHERE Username = '" & Session("Username") & "'"
edit.execute () %>
<%else%>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="15" colspan="2" background="pic/titlebar_bg.gif">[img]"pic/profile.jpg"[/img]</td>
</tr>
<tr>
<td bgcolor="#333333" valign="top">
<form action="profile.asp?action=update" method="post">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="48%" class="text"><div align="right">Username:</div></td>
<td width="2%" class="text"> </td>
<td width="48%"><p class="text"><%=data("Username")%></p></td>
</tr>
<tr>
<td class="text"><div align="right">Password:</div></td>
<td class="text"> </td>
<td><input type="password" class="input" name="Password" value="<%=data("Password")%>"></td>
</tr>
<tr>
<td class="text"><div align="right">Firstname:</div></td>
<td class="text"> </td>
<td><input type="text" class="input" name="FName" value="<%=data("FName")%>"></td>
</tr>
<tr>
<td class="text"><div align="right">Lastname:</div></td>
<td class="text"> </td>
<td><input type="text" class="input" name="LName" value="<%=data("LName")%>"></td>
</tr>
<tr>
<td class="text"><div align="right">E-mailaddress:</div></td>
<td class="text"> </td>
<td><input name="Email" type="text" class="input" value="<%=data("Email")%>" size="30"></td>
</tr>
<tr>
<td class="text"><div align="right">Street & number:</div></td>
<td class="text"> </td>
<td><input name="Street" type="text" class="input" value="<%=data("Street")%>" size="30">
<input name="Num" type="text" class="input" size="3" maxlength="3" value="<%=data("Num")%>"></td>
</tr>
<tr>
<td class="text"><div align="right">City:</div></td>
<td class="text"> </td>
<td><input type="text" class="input" name="City" value="<%=data("City")%>"></td>
</tr>
<tr>
<td class="text"><div align="right">Age:</div></td>
<td class="text"> </td>
<td><input name="Age" type="text" class="input" value="<%=data("Age")%>" size="3"></td>
</tr>
<tr>
<td class="text"><div align="right">Homepage:</div></td>
<td class="text"> </td>
<td><input name="Homepage" type="text" class="input" value="<%=data("Homepage")%>" size="35"></td>
</tr>
<tr>
<td class="text"><div align="right"></div></td>
<td class="text"> </td>
<td><input type="submit" class="button" name="Submit" value="Update"></td>
</tr>
</table>
</form></td>
</tr>
</table>
<%
data.close
end if
%>
</body>
</html> |
Ik gebruik PWS (Windows 98), Microsoft Access 2000 (geen SQL-gedoe)
plz help me, kheb et nodig tegen de vakantie!
/u/56680/gurgi.png?f=community)
Dit topic is gesloten.