kan ikke vise mit udtræk
Jeg har denne asp fil, retbestyr.asp som skal hente alle bestyrelses medlemmer ud fra databasen, hvor man så skal kunne rette i i dem, men der kommer intet frem, kan ikke se fejlen.her er koden.
<!-- #include file="../databaseforbindelse.asp" -->
<%
'******insat**** + Jeghar sat testfejl foran alle dine request.form
'***************
function testfejl(felt)
felt=replace(felt,"'","''")
testfejl=felt
end function
'**************
'**************
Id = Request.Form ("id")
Tabelnavn = "bestyr"
If Request.ServerVariables("CONTENT_LENGTH") <> 0 Then ' Opdatering
sql="update bestyr set titel='" & testfejl(request.form("titel")) & "', navn='" & testfejl(request.form("navn")) & "', email='" & testfejl(request.form("email")) & "', pic='" & testfejl(request.form("pic")) & "' where id=" & request.form("id")
conn.execute(sql)
response.redirect "../default.asp?emne=admin"
Else
Id = Request.QueryString ("id")
' ** Inserted by Jon Brohauge 2002/08/02
' ** Hvis der ikke er specificeret et id, så vis liste over alle nyheder sorteret efter dato, nyest først.
If Id = 0 Then
' ** Vis nyhedsliste
Set rs=Conn.Execute ("Select * from " & Tabelnavn & " WHERE emne LIKE '%bestyr'")
%>
<body>
<center>
<table cellspacing=0 border=1 cellspacing="0" cellpadding="5" width=320>
<tr bgcolor=#000000>
<td>
<b><font face="arial" size="2" color="#FFFFFF">Bestyrelsen</font></b>
</td>
<td>
<font size=2 face=arial color=white><b>Ret:</b></font>
</td>
</tr>
<%
If not(rs.bof or rs.eof) Then
while not(rs.eof)
%>
<tr>
<td>
<font size=2 face=arial><%=rs("titel")%></font> </td>
<td>
<font size=2 face=arial><a href="default.asp?emne=admin&emne2=retbestyr&id=<%=rs("id")%>">Ret</a>/<a href="sletbr.asp?id=<%=rs("id")%>">Slet</a></font>
</td>
</tr>
<%
rs.movenext
wend
Else
Response.Write "Ingen Info at rette i"
End If
%>
</table>
</BODY>
</HTML>
<%
Else
' ** Vis valgte nyhed
Set rs=Conn.Execute ("Select * from " & Tabelnavn & " Where id=" & Id & "")
%>
<body bgcolor="#C0C0C0">
<center>
<Form Action=admin/retbestyr.asp method="post">
<table cellspacing=0 border=1 cellspacing="0" cellpadding="5" width=320>
<tr>
<td colspan=2 height=20 bgcolor=#000000 width="310">
<font size=2 face=arial color=white><b>Ret Bestyrelse:</b></font>
</td>
</tr>
<tr>
<td width="64">
Titel</td>
<td align=right width="236">
<input type="text" name="titel" size="32" value="<%=rs("titel")%>"></td>
</tr>
<tr>
<td width="64">
navn</td>
<td align=right width="236">
<input type="text" name="navn" size="32" value="<%=rs("navn")%>"></td>
</tr>
<tr>
<td width="64">
email</td>
<td align=right width="236">
<input type="text" name="email" size="32" value="<%=rs("email")%>"></td>
</tr>
<tr>
<td width="64">
billede</td>
<td align=right width="236">
<input type="text" name="pic" size="32" value="<%=rs("pic")%>"></td>
</tr>
<tr>
<td colspan=2 width="310">
<Div Align=right><Input type="submit" Value="Ret"></div>
</td>
</tr>
</table>
<input type="hidden" name="id" value="<%=Id%>">
</form>
</BODY>
</HTML>
<%
End If
End If
%>
