Tjena!
Jag har en sökfunktion på min sida, om jag vill att när man klickar på "Sök" så ska söksidan visas i en annan frame som heter huvud
Hur skriver jag då?
Såhär ser nuvarande kod ut:
<!-- #include file="adovbs.inc" -->
<html>
<head>
<title>SÖK</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="../style.css" type="text/css">
</head>
<body bgcolor="#FEE1D2" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="500" border="0" cellspacing="0" cellpadding="2" height="100%" align="center">
<tr>
<td valign="top" class="right-line">
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
</td>
</tr>
<%
IF Request.QueryString("DO") = "SOK" THEN
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/forum.mdb")&";"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * From asp WHERE INLAGG LIKE '%" & Request.Form("sokord") & "%' ORDER BY DATUM DESC"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
X=0
DO UNTIL RecSet.EOF
%>
<tr>
<td width="20" height="15"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">
<%
'########## KOLLAR OM DET FINNS NYA INLÄGG ###########
Set RecSet2 = Server.CreateObject("ADODB.Recordset")
Addera2 = "Select \* From asp WHERE REF_ID =" &RecSet("ID")
RecSet2.Open Addera2, Connect, adOpenStatic, adLockOptimistic
Y=0
DO UNTIL RecSet2.EOF
IF RecSet2("DATUM") > Now() - 1 THEN
Y=1
RecSet2.Close
Exit DO
END IF
RecSet2.MOVENEXT
LOOP
%>
<% IF Y=1 THEN %>
<% END IF %>
</font></td>
<td height="15"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">
<a href="read.asp?ID=<%=RecSet("ID")%><%=RecSet("RUBRIK")%></a></font></td>
<td width="100" height="15"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">
<%=RecSet("NAMN")%> </font></td>
<td width="125" height="15"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">
<td width="40" height="15">
<div align="center"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000"><%=RecSet("ANTALSVAR")%></font></div>
</td>
</tr>
<%
RecSet.MOVENEXT
LOOP
RecSet.CLOSE
Connect.CLOSE
Set RecSet = nothing
Set Connect = nothing
%>
</table>
<% END IF %>
<p><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000"></font></p>
<form name="form1" method="post" action="sok.asp?DO=SOK">
<font face="Verdana, Arial, Helvetica, sans-serif"> <font size="1">
Sökord:<br>
<input type="text" name="sokord" size="10" maxlength="30" class="TABELLER">
<br>
<input type="submit" name="Submit" value="Sök" alt="Sök i databasen" border = "0">
</font> </font>
</form>
<p><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif">
</font><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">
</font></p>
</td>
</tr>
</table>
</body>
</html>