asp有条件的包含错误Microsoft VBScript编译错误'800a0400'
我遵循玛莎的建议在这里: if page is default then include if not default then 而我错过了一些东西,因为我无法让它显示滑块。asp有条件的包含错误Microsoft VBScript编译错误'800a0400'
这是滑块代码,以及我如何使用Martha'e的建议。
这是滑块(引导旋转木马)代码(与玛莎的建议被整合)
<div class="jumbotron">
<div class="container">
<div class="row fz-slider-wrap">
<div class="col-md-4 fz-slider-caption">
DFD Fioriere
</div>
<div class="col-md-8 fz-slider-image">
<div id="fz-gallery-slider" class="carousel slide" data-ride="carousel">
<!-- Indicators -->
<ol class="carousel-indicators">
<li data-target="#fz-gallery-slider" data-slide-to="0" class="active"></li>
<li data-target="#fz-gallery-slider" data-slide-to="1"></li>
<li data-target="#fz-gallery-slider" data-slide-to="2"></li>
</ol>
<!-- Wrapper for slides -->
<div class="carousel-inner">
<div class="item active">
<img class="fz-img-box" src="images/slider/03.jpg" alt="slider 1" />
</div>
<div class="item">
<img class="fz-img-box" src="images/slider/01.jpg" alt="slider 2" />
</div>
<div class="item">
<img class="fz-img-box" src="images//slider/06.jpg" alt="slider 3" />
</div>
</div>
</div>
</div>
</div>
</div>
</div><!-- .jumbotron -->
这是发生了什么: 如果我把上面的代码中
<%
Sub DisplaySlider()
slider code
%>
<%
End Sub
%>
我得到加载default.asp时出现此错误
Microsoft VBScript编译错误'800a0400'
预计声明
/afz_includes/jumbotron.asp,3号线
如果我换滑块代码',我得到同样的错误,但4号线 如果我在“我得到同样的包裹滑码错误(第3行) 我也尝试用“,并chnaged”的类和id为',但不断得到错误的每一行滑块代码。
下面是我穿上的default.asp和
<!-- #include virtual="/afz_includes/slider.html" -->
<%
scriptname = Request.ServerVariables("Script_Name")
If InStr(scriptname, "default.asp") > 0 Then
DisplaySlider
Else
Response.Write "<div class='fz-v-spacer-top'></div>"
End If
%>
其他网页,我不知道这是否是一个错字,总之我试图挽救滑块既作为HTML,ASP和,但同样的错误。
看起来您已将滑块的代码放入ASP代码分隔符(<%
和%>
)中,因此编译器正在尝试将其视为VBScript,但它显然不是。
在ASP经典中,您将服务器端VBScript代码放入<% %>
块中。 HTML代码确实是而不是进入这些块,除非你是Response.Write
-ing它。
<%
Sub DisplaySlider()
%>
<div class="jumbotron">
<div class="container">
...
</div>
</div><!-- .jumbotron -->
<%
End Sub
%>
谢谢。是的,我认为这不是要走的路,但我按照你所建议的方式使用它之后尝试过,在这种情况下,滑块不显示,但隔离区工作正常。 – keneso
您可否详细说明'DisplaySlider'代码?它是否正确地使用'End'关键字完成? –
看起来你的子程序缺少'End Sub'。 – Lankymart
谢谢你们两位。是的,最后的剪辑是在那里()我只是集中在滑块代码应该是根据我对马莎的建议的理解。更新了OP – keneso