TARGET på formular resultat
Det her er på min index.asp :<form action="elevsearch.asp" method="post" enctype="application/x-www-form-urlencoded">
<input type="text" name="search" size="25" style="border: 1px solid #808080;"/><input type=image src="btn_submit.gif"/>
Resultatet (elevsearch.asp) vil jeg gerne have vist i min iframe (main)
elevsearch :
<%@LANGUAGE="VBSCRIPT"%>
<%
select case session("logstat")
case "1"
tmpvar = "bruger"
case "2"
tmpvar = "admin"
case else
response.redirect "login.asp?r="&server.urlencode(request.servervariables("script_name")&"?"&request.querystring)
End select
%>
<%
If Request.Form("search") <> "" Then
ord = Request.Form("search")
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("datab.mdb")
Conn.Open DSN
SQL = "SELECT * FROM elev where navn LIKE '%" & ord & "%' or konto LIKE '%" & ord & "%' ORDER BY gruppenr"
%>
<html>
<head>
<link rel="STYLESHEET" type="text/css" href="stylesub.css">
</head>
<body>
<br/>
<table class="tbl_main">
<tr>
<td class="main_td">
<table class="tbl_main">
<tr>
<td>Gruppe</td><td>Navn</td><td>Adresse</td><td>Telefon</td><td><Konto</td><td>Saldo</td>
</tr>
<%
Set rs = Conn.Execute(SQL)
If Not(rs.bof or rs.EOF) Then
Do while not rs.eof
%>
<tr>
<td><%=rs("gruppenr")%></td><td><%=rs("navn")%></td><td><%=rs("adresse")%>, <%=rs("postnr")%> <%=rs("postby")%></td><td><%=rs("telefon")%></td><td><%=rs("konto")%></td><td><%=rs("saldo")%></td>
</tr>
<%rs.movenext
loop
else
response.write "Der blev ikke fundet noget..."
End If
%>
<%
Conn.Close
Set Conn = Nothing
End If
%>
</table>
</td>
</tr>
</table>
</center>
</body>
</html>
