---
title: "script block error"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/54034-script-block-error"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "da97enla"
published: "2002-09-23T09:46:27.000Z"
updated: "2002-09-23T11:46:27.000Z"
replies: 9
views: 294
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/54034-script-block-error"
---

# script block error

## #1 — da97enla, 2002-09-23T09:46Z

Hej 

Jag lägger in smileys mha av asp. Nu vill jag fixa så som det är här på forumet mha javascript får då det här meddelandet.

*Active Server Pages error 'ASP 0138' 
/admin/news/edit.asp, line 2 

A script block cannot be placed inside another script block. Nested Script Block* 

Varför? 

mvh
enla

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

## #2 — @nders, 2002-09-23T09:48Z

Du har förmodligen nånting sånt här i din kod:

```
<%
 'lite kod
 'lite mer kod
<%
    'lite kod
    'lite mer kod
%>
 'kod
' annan kod
%>
```

Du kan inte nästla contextswitchar (\<% / %\>) på det sättet, och inte på något annat sätt heller igentligen. Ta bort alla utom de som är ytterst. Du ska bara öppna / stänga med switcharna när du ska byta mellan att skriva asp-kod och html.

Mvh,

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

## #3 — da97enla, 2002-09-23T10:08Z

Inte riktigt men nästan

*\<% IF session("x_userID") = "" THEN response.redirect "/admin/login.asp" %\>

\<!-- #INCLUDE VIRTUAL="/admin/open.asp" --\>

\<% öppnar databasen %\>

\<html\>

\<% kod %\>

\<html\>

\<% mera kod %\>

\<slut html\>
\<!-- #INCLUDE VIRTUAL="/admin/close.asp" --\>*

Ska jag inte stänga mellan översta asp och include filen?

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

## #4 — Denniz PoP, 2002-09-23T10:10Z

Jo, koden du har är korrekt. Skulle du kunna visa fullständig kod?
Speciellt rad 2.

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

## #5 — OveRRidE, 2002-09-23T10:10Z

Det där ser ju faktiskt helt korrekt ut. 

Har du all kod?

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

## #6 — PatrikB, 2002-09-23T10:46Z

hur ser koden ut i: \<!-- #INCLUDE VIRTUAL="/admin/open.asp" --\>

cya,
PatrikB

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

## #7 — da97enla, 2002-09-23T11:06Z

Oj det blir rätt mycket kod men här är koden där jag får felmeddelandet.

*\<%
IF session("x_userID") = "" THEN response.redirect "/admin/login.asp"
%\> 

\<!-- #INCLUDE VIRTUAL="/admin/open.asp" --\>

\<%
' ## SELECT THE SELECTED POST
SQL = "SELECT \* FROM \[news\] WHERE \[intId\] = " & request("ID") & ";"
set mySQL = Conn.Execute(SQL)
on error resume next

' ## ERRORHANDLING
' ## CHECK FOR FALSE ID, NOT IN THE DATABASE
IF mySQL.EOF THEN
	Conn.close
	set Conn = nothing
	response.redirect "index.asp"
END IF

' ## COLLECT NAMES
intId       = mySQL("intId")
dteCreated  = mySQL("dteCreated")
strSubject 	= mySQL("strSubject")
strMessage  = mySQL("strMessage")
%\>

\<HTML\>
\<HEAD\>
\<TITLE\>edit\</TITLE\>
\<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1"\>
\<META name="ROBOTS" content="NOINDEX, NOFOLLOW"\>
\<META HTTP-EQUIV="Pragma" CONTENT="no-cache"\>
\</HEAD\>

\<BODY BGCOLOR="#FFFFFF" TEXT="#000000" LINK="#000000" VLINK="#000000" ALINK="#000000"\>
\<!-- #INCLUDE VIRTUAL="/admin/menu.asp" --\> \<BR\>
\<TABLE WIDTH="400" BORDER="0" CELLSPACING="0" CELLPADDING="0"\>
  \<TR\> 
    \<TD WIDTH="50"\>&nbsp;\</TD\>
    \<TD WIDTH="100"\>\<A HREF="/admin/news/index.asp"\>\<IMG SRC="/admin/pics/icons/back.gif" WIDTH="15" HEIGHT="15" BORDER="0" TITLE="Tillbaka"\>\</A\>\</TD\>
    \<TD WIDTH="250"\>\<FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1"\>\<B\>REDIGERA 
      Nyheterna\</B\> \</FONT\>\</TD\>
  \</TR\>
\</TABLE\>
\<%
tmp = tmp & "\<TABLE WIDTH=""500"" BORDER=""0"" CELLSPACING=""0"" CELLPADDING=""0""\>" & vbCRLF
tmp = tmp & "\<TR\>" & vbCRLF
' ## DATE
tmp = tmp & "\<TD WIDTH=""140"" VALIGN=""TOP"" ALIGN=""RIGHT""\>" & myFont1 & mySQL("intId")
tmp = tmp &  "\</FONT\>\</TD\>" & vbCRLF
tmp = tmp & "\<TD WIDTH=""10""\>\_\_\</TD\>" & vbCRLF

' ## MESSAGE
tmp = tmp & "\<TD WIDTH=""350"" VALIGN=""TOP""\>" & myFONT1 & "\<B\>" & mySQL("strSubject")
tmp = tmp & "\</B\>\<BR\>" & replace(mySQL("strMessage"), vbCRLF, "\<BR\>" & vbCRLF ) & "\</FONT\>\</TD\>" & vbCRLF
tmp = tmp & "\</TR\>\</TABLE\>\<BR\>" & vbCRLF

' ## COMMENT
' ## SELECT THE SELECTED POST
SQL2 = "SELECT \* FROM \[comments\] WHERE \[intNewsId\] = " & mySQL("intId") & ";"
set mySQL2 = Conn.Execute(SQL2)
on error resume next

DO UNTIL mySQL2.EOF
tmp = tmp & "\<TABLE WIDTH=""500"" BORDER=""0"" CELLSPACING=""0"" CELLPADDING=""0""\>" & vbCRLF
tmp = tmp & "\<TR\>" & vbCRLF
tmp = tmp & "\<TD WIDTH=""150"" VALIGN=""TOP"" ALIGN=""CENTER""\>" & myFont1 & formatDateTime(mySQL2("dteCreated"),2) \_
 & " " & formatDateTime(mySql2("dteCreated"), 4)
tmp = tmp &  "\</FONT\>\</TD\>" & vbCRLF
tmp = tmp & "\<TD WIDTH=""350"" VALIGN=""TOP""\>" & myFONT1 & "\<B\>" & mySQL2("strPath")
tmp = tmp & "\</B\>\<BR\>" & replace(mySQL2("strMessage"), vbCRLF, "\<BR\>" & vbCRLF ) & "\</FONT\>\</TD\>" & vbCRLF
tmp = tmp & "\</TR\>\</TABLE\>\<BR\>" & vbCRLF
	mySQL2.MoveNext
LOOP

response.write tmp
	tmp = ""
%\> \<BR\>

\<FORM NAME="edit" METHOD="post" ACTION="/admin/news/confirm.asp"\>
  \<TABLE WIDTH="600" BORDER="0" CELLSPACING="0" CELLPADDING="0"\>
    \<TR\> 
      \<TD WIDTH="50"\>&nbsp;\</TD\>
      \<TD WIDTH="100"\>\<FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1"\>Datum:\</FONT\>\</TD\>
      \<TD WIDTH="900" COLSPAN="2"\> \<FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1"\> 
        \<INPUT TYPE="text" NAME="dteCreated" SIZE="10" VALUE="\<%=dteCreated%\>"\>
        \</FONT\>\</TD\>
    \</TR\>
    \<TR\> 
      \<TD WIDTH="50"\>&nbsp;\</TD\>
      \<TD WIDTH="100"\>\<FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1"\>Rubrik:\</FONT\>\</TD\>
      \<TD WIDTH="900" COLSPAN="2"\> \<FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1"\> 
        \<INPUT TYPE="text" NAME="strsubject" SIZE="40" VALUE="\<%=replace(strSubject, """", "&quot;")%\>"\>
        \</FONT\>\</TD\>
    \</TR\>
    \<TR\> 
      \<TD WIDTH="50"\>&nbsp;\</TD\>
      \<TD WIDTH="100"\>\<FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1"\>Text:\</FONT\>\</TD\>
      \<TD WIDTH="300"\>\<FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1"\> 
        \<TEXTAREA NAME="strMessage" COLS="50" ROWS="10" WRAP="VIRTUAL"\>\<%=strMessage%\>\</TEXTAREA\>
        \</FONT\>\</TD\>
      \<TD WIDTH="150" VALIGN="TOP" ALIGN="CENTER"\> 
        \<TABLE WIDTH="100" BORDER="0" CELLSPACING="0" CELLPADDING="0"\>
          \<TR\>
            \<TD\>\<FONT FACE="Verdana, Georgia, Arial" SIZE="1"\>\<B\>Smileys\</B\>\</FONT\>\</TD\>
          \</TR\>
        \</TABLE\>
        \<TABLE WIDTH="100" BORDER="0" CELLSPACING="2" CELLPADDING="0"\>
          \<TR\> 
            \<TD WIDTH="34" ALIGN="CENTER"\>\<FONT FACE="Verdana, Georgia, Arial" SIZE="1"\>:)\</FONT\>\</TD\>
            \<TD WIDTH="60"\>\<a href="#" onClick="insertSmiley(':)'); return false;"\>\<IMG SRC="/admin/pics/smileys/happy.gif" WIDTH="15" HEIGHT="15" BORDER="0"\>\</a\>\</TD\>
          \</TR\>
          \<TR\> 
            \<TD ALIGN="CENTER" WIDTH="34"\>\<FONT FACE="Verdana, Georgia, Arial" SIZE="1"\>:&gt;\</FONT\>\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/vhappy.gif" WIDTH="15" HEIGHT="15"\>\</TD\>
          \</TR\>
          \<TR\> 
            \<TD ALIGN="CENTER" WIDTH="34"\>\<FONT FACE="Verdana, Georgia, Arial" SIZE="1"\>:n\</FONT\>\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/note.gif" WIDTH="15" HEIGHT="15"\>\</TD\>
          \</TR\>
          \<TR\> 
            \<TD ALIGN="CENTER" WIDTH="34"\>\<FONT FACE="Verdana, Georgia, Arial" SIZE="1"\>x(\</FONT\>\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/angryorange.gif" WIDTH="15" HEIGHT="15"\>\</TD\>
          \</TR\>
          \<TR\> 
            \<TD ALIGN="CENTER" WIDTH="34"\>\<FONT FACE="Verdana, Georgia, Arial" SIZE="1"\>:b\</FONT\>\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/bire.gif" WIDTH="26" HEIGHT="17"\>\</TD\>
          \</TR\>
          \<TR\> 
            \<TD ALIGN="CENTER" WIDTH="34"\>:r\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/shame.gif" WIDTH="15" HEIGHT="15"\>\</TD\>
          \</TR\>
          \<TR\> 
            \<TD ALIGN="CENTER" WIDTH="34"\>\<FONT FACE="Verdana, Georgia, Arial" SIZE="1"\>:x\</FONT\>\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/dead.gif" WIDTH="15" HEIGHT="15"\>\</TD\>
          \</TR\>
          \<TR\> 
            \<TD ALIGN="CENTER" WIDTH="34"\>\<FONT FACE="Verdana, Georgia, Arial" SIZE="1"\>:(\</FONT\>\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/frown.gif" WIDTH="15" HEIGHT="15"\>\</TD\>
          \</TR\>
          \<TR\> 
            \<TD ALIGN="CENTER" WIDTH="34"\>\<FONT FACE="Verdana, Georgia, Arial" SIZE="1"\>;)\</FONT\>\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/wink.gif" WIDTH="15" HEIGHT="15"\>\</TD\>
          \</TR\>
          \<TR\> 
            \<TD ALIGN="CENTER" WIDTH="34"\>:k\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/kiss.gif" WIDTH="18" HEIGHT="15"\>\</TD\>
          \</TR\>
          \<TR\>
            \<TD ALIGN="CENTER" WIDTH="34"\>;o\</TD\>
            \<TD WIDTH="60"\>\<IMG SRC="/admin/pics/smileys/winkorange.gif" WIDTH="15" HEIGHT="15"\>\</TD\>
          \</TR\>
        \</TABLE\>
      \</TD\>
    \</TR\>
    \<TR\> 
      \<TD WIDTH="50"\>&nbsp;\</TD\>
      \<TD WIDTH="100"\>\<FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1"\>\</FONT\>\</TD\>
      \<TD WIDTH="900" COLSPAN="2"\> \<FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1"\> 
        &nbsp;\<BR\>
        &nbsp; \<BR\>
        \<INPUT TYPE="hidden" NAME="dbaction" VALUE="update"\>
        \<INPUT TYPE="hidden" NAME="ID" VALUE="\<%=intId%\>"\>
        \<INPUT TYPE="submit" NAME="Submit" VALUE="Spara"\>
        \</FONT\>\</TD\>
    \</TR\>
    \</TABLE\>
\</FORM\>
\</BODY\>
\</HTML\>
\<!-- #INCLUDE VIRTUAL="/admin/close.asp" --\>*

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

## #8 — @nders, 2002-09-23T11:11Z

Hur ser koden ut i /admin/open.asp?

Använd gärna \[kod\]-taggar så blir in kod lättare att läsa.

Mvh,

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

## #9 — da97enla, 2002-09-23T11:25Z

Ok här är koden i open.asp
\<KOD\>
\<%
'## GENERIC FONTS
myFont1 = "\<FONT FACE=""Verdana, Helvetica, Geneva, Arial, Sans-Serif"" SIZE=""1"" COLOR=""#666666""\>"
myFont2 = "\<FONT FACE=""Verdana, Helvetica, Geneva, Arial, Sans-Serif"" SIZE=""2""\>"
myFont3 = "\<FONT FACE=""Verdana, Helvetica, Geneva, Arial, Sans-Serif"" SIZE=""3"" COLOR=""#6699CC""\>"

'## OPEN THE DATABASE
Set Conn = Server.CreateObject("ADODB.Connection")

'## SELECT SERVER
IF Request.ServerVariables("SERVER_NAME") = "192.168.1.44" THEN
	' ## LOCAL SERVER
	Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\\Data\\webadmin.mdb")
ELSE
	' ## WEBSERVER
	Conn.Open "DSN=d6525-webadmin;Password=@01#$nacmcmbcklbbjp"
END IF

'Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\\Data\\webadmin.mdb")

' ## SESSION LCID = SWEDEN
session.LCID=1053

' ## TRIM VARS
FUNCTION trimVars(myVar)
	tmp = request(myVar)
	tmp = replace(tmp, "\|", "")
	tmp = replace(tmp, "'", "''")
	trimVars = tmp
END FUNCTION

FUNCTION trimMyIcons(myVar)
tmp = replace(myVar, vbCRLF, "\<BR\>" & vbCRLF )
tmp = replace(tmp, ":)", "\<img src=""/own/bilder/smileys/happy.gif""\>" )
tmp = replace(tmp, ":\>", "\<img src=""/own/bilder/smileys/vhappy.gif""\>" )
tmp = replace(tmp, "x(", "\<img src=""/own/bilder/smileys/angryorange.gif""\>" )
tmp = replace(tmp, ":(", "\<img src=""/own/bilder/smileys/frown.gif""\>" )
tmp = replace(tmp, ":r", "\<img src=""/own/bilder/smileys/shame.gif""\>" )
tmp = replace(tmp, ":x", "\<img src=""/own/bilder/smileys/dead.gif""\>" )
tmp = replace(tmp, ":b", "\<img src=""/own/bilder/smileys/bire.gif""\>" )
tmp = replace(tmp, ":n", "\<img src=""/own/bilder/smileys/note.gif""\>" )
tmp = replace(tmp, ";)", "\<img src=""/own/bilder/smileys/wink.gif""\>" )
tmp = replace(tmp, ":k", "\<img src=""/own/bilder/smileys/kiss.gif""\>" )
trimMyIcons = tmp
END FUNCTION

%\>\</KOD\>

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

## #10 — Denniz PoP, 2002-09-23T11:46Z

> **da97enla skrev:**
>
> Oj det blir rätt mycket kod men här är koden där jag får felmeddelandet.
> 
> *Massa kod*

Är det dära verkligen filen /admin/news/edit.asp?

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/54034-script-block-error
