linkting
jeg har lavet en post sån jeg kan skrive det ind fra admin siden og så viser det på en anden side, men hvordan gør jeg sån at på siden det er kun navnet på teksten og så når man klikker på navnet kommer der en ny side frem??den ene kodeside :
<!-- #include file = "code_library.asp" -->
<%
If session("Admin") <> "OK" then
Response.Write "Ingen adgang!!!"
Response.End
End If
OpenConn("member.mdb")
If Request ("mode") = "opret" then
SQL = "insert into member (nickname, real name, age, connection, status, primary w, secondary w, quote, e-mail) values ('" & request("nickname") & "', '" & request("real name") & "', '" & request("age") & "', '" & request("connection") & "', '" & request("status") & "', '" & request("primary w") & "', '" & request("secondary w") & "', '" & request("quote") & "', '" & request("e-mail") & "' )"
Conn.execute( SQL )
besked = "memberet er nu blevet tilføjet ! Klik <a href='showmembers.asp'>her</a> for at se members!"
End if
%>
<html>
<title>..:: Attacking Monsters ::..</title>
<head>
</head>
<body bgcolor="ffffff">
<font size='2' face='verdana' color='black'><b>
<br><br>
<% = besked %>
<% if request ("mode") = "" then %>
<b>Her kan du tilføje medlem !<br></b><br>
<form action="member.asp">
<input type="hidden" Name="Mode" Value="opret">
<input type="hidden" Name="member_id" Value="<% = Request("member_id")%>">
Nickname : <br><input type='text' name='nickname'><br>
Real name : <br><input type='text' name='real name'><br>
Age : <br><input type='text' name='Age'><br>
Connection : <br><input type='text' name='Connection'><br>
Status : <br><input type='text' name='status'><br>
Primary W : <br><input type='text' name='primary w'><br>
Secondary W : <br><input type='text' name='secondary w'><br>
Quote : <br><input type='text' name='quote'><br>
E-mail : <br>
<input type="text" name="E-mail"><br>
<input type="Submit" value="Send" name=Submit1> <input type="Reset" value="Slet" name=Reset1><br>
<br>
</form>
<% End If %>
</body>
</html>
DEN ANDEN :
<!-- #include file = "code_library.asp" -->
<%
OpenConn("member.mdb")
If request("mode") = "delete" then
SQL = "delete from news where member_id = " & request("member_id")
If session("Admin") = "OK" then
Conn.Execute(SQL)
End If
End If
SQL = "select * from member order by status desc"
Set news = Conn.Execute ( SQL )
%>
<html>
<head>
<title>..:: Attacking Monsters ::..</title>
</head>
<body bgcolor="ffffff">
<font color="black">
<face='verdena'>
<body>
</body>
</head>
</html>
