Mitt mål är att få mitt prog att skriva ut en textfil så här:
<code>
<SCRIPT LANGUAGE="vbSCRIPT">
Sub Submitthis
form1.submit
End Sub
</SCRIPT>
<%
if request.form("sprak")="en" then
Response.Cookies("Språk")("Land") = en
%>
<!--#INCLUDE FILE="en_sponsor.asp"-->
<%
elseif request.form("sprak") ="sv" then
Response.Cookies("Språk")("Land") = sv
%>
<!--#INCLUDE FILE="sv_sponsor.asp"-->
<%
end if
%>

<form ACTION="sponsor.asp" METHOD="POST" NAME="form1">
<select ONCHANGE="submitthis" SIZE="1" NAME="sprak"
<SELECT Name="sprak" Value"sprak">
<OPTION Value="0"> Välj språk
<OPTION Value="en">en
<OPTION Value="sv">sv
</Select>
</form>
</code>
Det som inte går så bra för mig är biten mellan ASP-taggarna (jag visar bara det:
<code>
For Each oFile In sf.Files

If Left(oFile.Name, 6) = "Config" Or Left(oFile.Name, 3) = "ink" Then
'vi lägger inte till filerna
' frMultiLanguage.info = oFile.Name & " skall inte räknas med." & vbCrLf
Else

strFilnamn = Left(oFile.Name, 2)
strText = strText & "<%" & vbCrLf
strText = strText & "if request.form(""sprak"")=""" & strFilnamn & """ then" & vbCrLf
strText = strText & "Response.Cookies(""Språk"")(""Land"") = " & strFilnamn & vbCrLf
strText = strText & "%>" & vbCrLf
strText = strText & "<!--#INCLUDE FILE=""" & strFilnamn & "_" & frMultiLanguage.File1.FileName & """-->" & vbCrLf
strText = strText & "<%" & vbCrLf

If sf.Files.Count > 2 Then 'om det finns mer än en språkfil
strText = strText & "elseif request.form(""sprak"") =""" & strFilnamn & """ then" & vbCrLf
strText = strText & "Response.Cookies(""Språk"")(""Land"") = " & strFilnamn & vbCrLf
strText = strText & "%>" & vbCrLf
strText = strText & "<!--#INCLUDE FILE=""" & strFilnamn & "_" & frMultiLanguage.File1.FileName & """-->" & vbCrLf
strText = strText & "<%" & vbCrLf
End If

strText = strText & "end if" & vbCrLf
strText = strText & "%>" & vbCrLf
End If
Next oFile
End If
</code>
Koden fortsätter sedan, men det är detta stycke som är aktuellt.
Vad jag ville är, finns det bara en språkfil "sv_sponsor.asp" då skall skriptet lägga till
includefilen och sedan gå till end if.
Finns det mera språkfiler "en_sponsor.asp" då skall else-satsen in.
Som det nu blir så körs både if och else-satsen på varje språkfil.
Hur kan jag ordna detta?

Kan ju redan nu säga att den asp-kod som blir kommer att käka prestanda på servern så alla filer inkluderas först, sedan körs sidan, dvs. allt laddas, även de du inte använder...

Det är kanske så, men jag fick ju inte sever.execute att fungera..
Error:
<code>
Serverobjekt, ASP 0228 (0x80004005)
Anropet till Server.Execute misslyckades när sidan laddades.
</code>