---
title: "include fel i massor"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/12377-include-fel-i-massor"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "snekkorr"
published: "2001-10-31T15:16:00.000Z"
updated: "2001-10-31T15:16:00.000Z"
replies: 0
views: 140
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/12377-include-fel-i-massor"
---

# include fel i massor

## #1 — snekkorr, 2001-10-31T15:16Z

jag vill inkludera denna kod i ett html-dokument...

\<!--#INCLUDE FILE = ../admin/includes/inc/settings.asp--\>
\<!--#INCLUDE FILE = ../admin/includes/inc/adovbs.inc--\>

\<%
'---Variabler
Dim Con, rs, SQL1, SQL2, variables

Redim variables(30)

Session("variables") = variables

Set Con = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")

SQL1 = "SELECT DISTINCT fromlang FROM languages WHERE pricequote = 1 ORDER BY fromlang ASC"
	
Con.Open DB_PATH
%\>

		\<TITLE\> stratcore.com \</TITLE\>
		\<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1"\>

		\<!-- css --\>
		\<LINK REL="stylesheet" HREF="../css/style.css" TYPE="text/css"\>
		\<!-- /css --\>

	\<SCRIPT LANGUAGE="JavaScript"\>
	\<!-- 
	function kollaFormular()	{

	formObj = document.quote;
	
	if (formObj.fromlang.value == "") {
		alert("Please choose a language.");
			formObj.fromlang.focus();
		return false;
		}
	} 
	\--\>
	\</SCRIPT\>
	

            

            \<FORM ACTION="instant-quote-o1.asp" METHOD="post" NAME="quote" onSubmit="return kollaFormular()"\>
              \<TABLE BORDER="0" CELLSPACING="3" CELLPADDING="0" WIDTH="100%" ALIGN="center"\>
                \<TR VALIGN="top"\> 
                  \<TD colspan="2"\>\<SPAN CLASS="textMain"\>Translation from the 
                    following language:\</SPAN\>\<BR\>
                    \<SPAN CLASS="selectNS"\> 
                    \<SELECT NAME="fromlang"\>
                      \<OPTION value="\<%=rs("fromslang")%\>"\>Choose language \</option\>
                      \<%
rs.Open SQL1, Con

If Not rs.EOF Then
	While Not rs.EOF
		Response.Write "\<OPTION VALUE=""" & rs("fromlang") & """\>" & rs("fromlang") & "\</OPTION\>"
		rs.MoveNext
	Wend
End If

rs.Close

%\> 
                    \</SELECT\>
                    \</SPAN\> \<SPAN CLASS="textMain"\> \<BR\>
                    \<INPUT TYPE="submit" NAME="Submit" VALUE="Continue"\>
                    \<BR\>
                    \</SPAN\>\</TD\>
                \</TR\>
              \</TABLE\>
            \</FORM\>
          

jag har testat att både klistra in hela koden och att lägga den som en server side include... om man gör så så vägrar den lista alla val i \<select\>... jag har även testat lägga dessa i en iframe men då när man klickade på continue-submit-knappen så komm nästa dokument upp i samma iframe och det vill jag ju inte... nån som vet hur jag ska includa den?

Permalänk: https://www.webforum.nu/p/12377

---

Tråden på webben: https://www.webforum.nu/amne/asp/12377-include-fel-i-massor