vbscript的问题，在线等

2009-07-23 08:50:27 147 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

VBScript 安装使用教程 VBScript是微软基于Visual Basic开发的轻量级脚本语言，主要用于Windows系统管理、自动化脚本和网页开发。文章介绍了VBScript的基本环境配置（内置于Windows系统）、执行方式（WSH或双击运行.vbs文件），并提供了基础语法示例（变量声明、输入输出、条件判断、循环）以及进阶操作（文件处理、注册表修改）。还包含常见问题解答和学习资源推荐。虽然VBScript在新系统中逐渐被淘汰，但在旧系统维护中仍有实用价值。阅读详情

这是出问题的代码块



	 <%   

         login = session("login")

         If strComp(login,"success",vbBinaryCompare)=0 Then

      %>

		<!-- #include file="loginjsps/loginsuccess.asp" -->  	

      <%  

         ElseIf strComp(login,"failure",vbBinaryCompare)=0 Then

      %>

		<!-- #include file="loginjsps/loginfailure.asp" -->  	

      <%

	  	 Else

      %> 

	  		<!-- #include file="loginjsps/login.asp" -->

	 <%

	 	End If

	 %>

浏览器提示：

技术信息（用于支持人员）

错误类型：
Microsoft VBScript 编译器错误 (0x800A03EA)
语法错误
/djyy/default.asp, line 20
ElseIf strComp(login,"failure",vbBinaryCompare)=0 Then

浏览器类型：
Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) )

网页：
GET /djyy/default.asp

时间：
2009年7月23日, 20:47:55

详细信息：
Microsoft 支持
我看来看去也没什么错误啊，郁闷的很

...全文

JAVA PPT转MP4 （基于VBSCRIPT）场景：业务需要，要使用JAVA根据ppt模板自动生成MP4视频。调研：查了一下比较符合的PPT 操作方式，POI，ASPOSE，VBA1. POI 支持PPT文件的读，修改，写。HSLF，XLSF支持PNG，以及基于Graphics2D 的输入文件格式详见：XLSF2. ASPOSE 支持的输出文件相对多一些 outputFormat,但是，很遗憾，不支持MP4类视频文件。3. VBSCRIPT... 阅读详情

tanlingyun

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

toury 2009-07-23

打赏
举报

[Quote=引用 4 楼 tanlingyun 的回复:]
不行啊，我需要根据条件的不同而决定把哪些页面包含进来，用redirect之后就转到了一个新页
[/Quote]
ASP不允许动态包含文件

把那些文件中的内容做成类调用吧

hookee 2009-07-23

打赏
举报

原因已经说了，asp是先include再编译的，所以不是动态include的。
如果那些include的asp可以单独返回结果的话，可以用Server.Execute

tanlingyun 2009-07-23

打赏
举报

不行啊，我需要根据条件的不同而决定把哪些页面包含进来，用redirect之后就转到了一个新页

hookee 2009-07-23

打赏
举报

asp是先include再编译的，所以这么些的话要保证所有include的asp加载进来后组成的语句语法都正确。
要么就



<%   

         login = session("login")

         If strComp(login,"success",vbBinaryCompare)=0 Then

           response.redirect "loginjsps/loginsuccess.asp"      

         ElseIf strComp(login,"failure",vbBinaryCompare)=0 Then

           response.redirect "loginjsps/loginfailure.asp"      

        Else

           response.redirect "loginjsps/login.asp"

        End If

%>

或者

<%   

         login = session("login")

         If strComp(login,"success",vbBinaryCompare)=0 Then

           Server.Execute "loginjsps/loginsuccess.asp"      

         ElseIf strComp(login,"failure",vbBinaryCompare)=0 Then

           Server.Execute "loginjsps/loginfailure.asp"      

        Else

           Server.Execute "loginjsps/login.asp"

        End If

%>

tanlingyun 2009-07-23

打赏
举报

不少吧
If condition [ Then ]
[ statements ]
[ ElseIf elseifcondition [ Then ]
[ elseifstatements ] ]
[ Else
[ elsestatements ] ]
End If
-or-
If condition Then [ statements ] [ Else [ elsestatements ] ]
这是msdn上的语法

MR丶CHAN 2009-07-23

打赏
举报

看是不是少个end if呢

vbscript的问题，在线等

相关推荐