okai se her, det er den søge funktion de har men ikke virker.. hvor smider jeg dette ind ?:
<HTML>
<!--#INCLUDE FILE="txt/databas.asp"-->
<!--#INCLUDE FILE="txt/english.txt"-->
<!-- #include file="db/adovbs.inc" -->
<HEAD>
<%
Function stripHTML(strHTML)
strHTML = strHTML & ""
Dim objRegExp, strOutput
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern = "<(.|\n)+?>"
strOutput = objRegExp.Replace(strHTML, "")
stripHTML = strOutput 'Return the value of strOutput
Set objRegExp = Nothing
End Function
%>
<STYLE>
<!--#INCLUDE FILE="txt/style.txt"-->
body { scrollbar-base-color: #ECECEC }
.text {color:"#747474"; border:1px solid #D5D5D5;font-family: Arial; background: #FFFFFF; font-size:11px; font-weight: bold }
.submit {color:"#747474"; font-family: Arial; background: "#FDFDFD"; font-size:10px; font-weight: bold; }
.submit2 {color:"#000000"; font-family: Arial; background: "#EDEDED"; font-size:10px; font-weight: bold; }
<!--#INCLUDE FILE="txt/style.txt"-->
</STYLE>
</HEAD>
<TITLE>Moviemakers.Nu - Film community made by moviemakers for moviemakers!</TITLE>
<BODY BGCOLOR="#FFFFFF" TEXT="#747474" LINK="#000000" leftMargin="0" topMargin="0" marginheight="0" marginwith="0">
<FONT SIZE="1" FACE="Verdana">
<TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" COLS="0" WIDTH="100%">
<TR>
<TD HEIGHT="26" WIDTH="467"><IMG SRC="pictures/logo.gif"></TD>
<TD HEIGHT="26" WIDTH="100%" BACKGROUND="pictures/up_bg.gif"></TD>
</TR>
<TR>
<TD HEIGHT="1" WIDTH="100%" BGCOLOR="#A0A2A1" COLSPAN="2"></TD>
</TR>
<TR>
<TD HEIGHT="1" WIDTH="100%" BGCOLOR="#E6E6E6" COLSPAN="2"></TD>
</TR>
</TABLE>
<TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" COLS="0" WIDTH="100%">
<TR>
<TD HEIGHT="75" WIDTH="700" BGCOLOR="#000000">
<OBJECT classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
codebase="
http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0"
WIDTH="800" HEIGHT="150" id="lmg_flashlogo" ALIGN="">
<PARAM NAME=movie VALUE="lmg_flashlogo.swf"> <PARAM NAME=quality VALUE=high> <PARAM NAME=bgcolor VALUE=#FFFFFF>
<EMBED src="lmg_flashlogo.swf" quality=high bgcolor=#FFFFFF WIDTH="698" HEIGHT="75" NAME="lmg_flashlogo" ALIGN=""
TYPE="application/x-shockwave-flash" PLUGINSPAGE="
http://www.macromedia.com/go/getflashplayer"></EMBED></OBJECT></TD>
<TD HEIGHT="75" WIDTH="100%" BGCOLOR="#FFFFFF"></TD>
</TR>
</TABLE>
<TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" COLS="0" WIDTH="100%">
<TR>
<TD HEIGHT="1" WIDTH="100%" BGCOLOR="#E6E6E6" COLSPAN="2"></TD>
</TR>
<TR>
<TD HEIGHT="1" WIDTH="100%" BGCOLOR="#A0A2A1" COLSPAN="2"></TD>
</TR>
<TR>
<TD HEIGHT="15" WIDTH="100%" COLSPAN="2" BACKGROUND="pictures/up_bg2.gif"></TD>
</TR>
<TR>
<TD HEIGHT="1" WIDTH="100%" BGCOLOR="#FFFFFF" COLSPAN="2"></TD>
</TR>
<TR>
<TD HEIGHT="1" WIDTH="100%" BGCOLOR="#A0A2A1" COLSPAN="2"></TD>
</TR>
<TR>
<TD HEIGHT="10" WIDTH="100%" COLSPAN="2"></TD>
</TR>
</TABLE>
<TABLE>
<TR>
<TD WIDTH="5"></TD>
<TD WIDTH="137" VALIGN="top">
<!--#INCLUDE FILE="txt/meny.txt"-->
</TD>
<TD WIDTH="600" VALIGN="top">
<TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" COLS="0">
<TR>
<TD WIDTH="550" VALIGN="top">
<TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" COLS="0">
<TR>
<TD WIDTH="550" HEIGHT="1" BGCOLOR="#DADADA" COLSPAN="3"></TD>
</TR>
<TR>
<TD WIDTH="1" BGCOLOR="#DADADA"></TD>
<TD WIDTH="548" HEIGHT="51" VALIGN="top" BGCOLOR="#FEFEFE"><IMG SRC="pictures/forum.gif"></TD>
<TD WIDTH="1" BGCOLOR="#DADADA"></TD>
</TR>
<TR>
<TD WIDTH="1" BGCOLOR="#DADADA"></TD>
<TD WIDTH="548" HEIGHT="337" VALIGN="top" BGCOLOR="#FAFAFA">
<FONT SIZE="1"><CENTER>
<BR><%=Request.Form("sok")%>, <%=Request.Form("username")%>, <%=Request.Form("username_choice")%>, <%=Request.Form("forum")%>
<P>
<%
IF NOT Request.Form("username") = "" THEN
IF Request.Form("username_choice") = "exakt" THEN
user_query = " username='" & Request.Form("username") & "'"
ELSE
user_query = " username='%" & Request.Form("username") & "%'"
END IF
END IF
IF NOT Request.Form("forum") = "alla" THEN
forum_query = " WHERE forum=" & Request.Form("forum") & " AND" & user_query
ELSE
forum_query = "WHERE" & user_query
END IF
%>
<%=forum_query%>
<P><I>Do not write things in the forum that can be rude to other members, doing<BR> that may lead to that we will remove your account.</I>
</TD>
<TD WIDTH="1" BGCOLOR="#DADADA"></TD>
</TR>
<TR>
<TD WIDTH="1" BGCOLOR="#DADADA"></TD>
<TD WIDTH="548" HEIGHT="37" VALIGN="top"><IMG SRC="pictures/recension_down.gif"></TD>
<TD WIDTH="1" BGCOLOR="#DADADA"></TD>
</TR>
<TR>
<TD WIDTH="550" HEIGHT="1" BGCOLOR="#DADADA" COLSPAN="3"></TD>
</TR>
</TABLE>
</TD>
</TR>
</TABLE>
