<!--#include file="../db/connection.asp" -->
<!--#include file="check.asp" -->
<%
'*** Deletes our record
if request.querystring("delete") <> "" then
id = request.querystring("delete")
rs.open "SELECT * FROM events WHERE id = "& id &"",conn,3,3
rs.delete
rs.update
response.redirect "view.asp"
rs.close
end if
%>
<%
'***Approves event
if request.querystring("approve") <> "" then
id = request.querystring("approve")
rs.open "SELECT * FROM events WHERE id="&id&"" ,conn,3,3
rs("approved") = 1
rs.update
response.redirect "view.asp"
rs.close
end if
%>
<%
'*** Selects our data
rs.open "SELECT * FROM events ORDER BY Event_Name ASC" ,conn
%>
<html>
<head>
<title>Miami Events: Events</title>
</head>
<link rel="stylesheet" type="text/css" href="../zma.css">
<body>
<div align="center">
<center>
<table border="2" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="75%" id="AutoNumber1" height="489">
<tr>
<td width="100%" height="59" bgcolor="#FFFFFF">
<!--#include file="../header.htm" --></td>
</tr>
<tr>
<td width="100%" height="461" bgcolor="#FFFFFF">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="65%" id="AutoNumber2" height="221">
<tr>
<td width="100%" height="221">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3">
<tr>
<td width="100%">
<p align="center"><a title="Back to ADMIN" href="index.asp">Back
to ADMIN</a></p>
</td>
</tr>
</table>
<p> </p>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber4" height="31">
<tr>
<td width="54%" height="15">
<h3>Name:</h3>
</td>
<td width="13%" height="15">
<h3>Edit:</h3>
</td>
<td width="15%" height="15">
<h3>Approve:</h3>
</td>
<td width="36%" height="15">
<h3>Delete</h3>
</td>
</tr>
<% Do while not rs.EOF
If rs.eof then
response.write "There are no events in the database"
end if
%>
<tr>
<td width="54%" height="20">
<p align="center"><%=rs("event_name")%></p>
</td>
<td width="13%" height="20">
<p align="center"><a href="eventdetails.asp?id=<%=rs("id")%>">
<img border="0" src="../images/edit.jpg"></a></p>
</td>
<td width="15%" height="20" align="center">
<%
If rs("approved") = 0 then
Response.write "<a href='view.asp?approve="&id&"'>Approve</a>"
Else
Response.write "<font size='1' font color='red'>Approved</font>"
End if
%></td>
<p></p>
<td width="36%" height="20">
<p align="center"><a href="view.asp?delete=<%=rs("id")%>">
<img border="0" src="../images/x.jpg"></a></p>
</td>
</tr>
<%
rs.MoveNext
loop
%>
</table>
</td>
</tr>
</table>
</center>
</div>
</td>
</tr>
</table>
</center>
</div>
</body>
</html>
<%rs.close%>
-----------------------------------------------------------
It works fine if I don't have it in the rsponse.write "", but when it's in it, doesn't work