多个 If then 时出错，else if答案

【问题标题】：Error with multiple If then, else if多个 If then 时出错，else if
【发布时间】：2010-03-07 23:10:34
【问题描述】：

我是 ASP 开发的新手。

这是我的源代码：

ident = request.Form("ident")
pass=request.Form("passe")
response.write(ident)
response.write(pass)

if pass= "m" and ident="m" Then 
    Session("connect")="membre"
    response.redirect("../")
else if pass= "g" and ident="g" Then 
        Session("connect")="gest"
        response.redirect("../")
else if pass= "a" and ident="a" Then
        Session("connect")="admin"
        response.redirect("../")
else    
    response.redirect("ident.asp")
End If

但是，有了这段代码，我得到了这个：

"错误编译 Microsoft VBScript 错误 '800a0401'

Fin d'instruction 出席

/iisHelp/common/500-100.asp，第 11 行

Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod、lngPos、datNow、strQueryString、strURL -------------------------------------------------- ------------------------------------^

错误编译 Microsoft VBScript 错误 '800a03f6'

'结束'出席

/groupe2/stage23/TP3/verif_id.asp，第18行“

【问题讨论】：

有什么方法可以迁移到 ASP.NET？
ElseIf 必须是一个字

标签： asp-classic vbscript

【解决方案1】：

VB 中的Else If 必须用一个单词书写，没有空格分隔符——ElseIf。

【讨论】：

【解决方案2】：

VBScript Else if Statement

必须是elseif 或ElseIf（不含空格）

if pass= "m" and ident="m" Then 
    Session("connect")="membre"
    response.redirect("../")
elseif pass= "g" and ident="g" Then 
        Session("connect")="gest"
        response.redirect("../")
elseif pass= "a" and ident="a" Then
        Session("connect")="admin"
        response.redirect("../")
else    
    response.redirect("ident.asp")
End If

【讨论】：

【解决方案3】：

在您的文件前面（第 11 行）中，您不小心删除了导致 DIM 语句发生冲突的换行符。这会使解析器中的整个文件不同步。

将一行 DIM 语句拆分为两行（或终止第二个 DIM - 您的选择），看看是否能解决您的问题。

【讨论】：