製作一個函數，asp？

-1

我試圖做一個函數來檢查像秋天####或春季學期有效和####我不斷收到此錯誤製作一個函數，asp？

微軟VBScript編譯錯誤「800a03f6」
預期的「終結」
否則
^

這裏是我的代碼...

Function IsSemester(UserInput) 
' Validation: Spring, Fall 

Temp=UserInput 

If Len(Temp)=9 Then IsSemester=True 

For P=1 to 4 

If Left(Temp,P,1)<>"Fall" Then IsSemester=False 

Next 

If Mid(Temp,5,1)<>" " Then IsSemester=False 

For P=6 to 9 

If Not IsInteger(Mid(Temp,P,9)) Then IsSemester=False 

Next 

Else 

IsSemester=True 

End If 

If Len(Temp)=11 Then IsSemester=True 

For C=1 to 6 

If Left(Temp,C,6)<>"Spring" Then IsSemester=False 

Next 

If Mid(Temp,7,1)<>" " Then IsSemester=False 

For C=8 to 11 

If Not IsInteger(Mid(Temp,8,11)) Then IsSemester=False 

Next 

Else 

IsSemester=True 
End If 
End Function

來源

2012-04-27 user1360260

太容易了，縮進你的代碼，你會發現這個問題。

Function IsSemester(UserInput) 
' Validation: Spring, Fall 

    Temp=UserInput 

    If Len(Temp)=9 Then IsSemester=True 

    For P=1 to 4 

     If Left(Temp,P,1)<>"Fall" Then IsSemester=False 

    Next 

    If Mid(Temp,5,1)<>" " Then IsSemester=False 

    For P=6 to 9 

     If Not IsInteger(Mid(Temp,P,9)) Then IsSemester=False 

    Next 

    Else 

     IsSemester=True 

    End If 

    If Len(Temp)=11 Then IsSemester=True 

    For C=1 to 6 

     If Left(Temp,C,6)<>"Spring" Then IsSemester=False 

    Next 

    If Mid(Temp,7,1)<>" " Then IsSemester=False 

    For C=8 to 11 

     If Not IsInteger(Mid(Temp,8,11)) Then IsSemester=False 

    Next 

    Else 

     IsSemester=True 
    End If 
End Function

如果使用

IF Len(temp)=9 Then IsSemester=True

意味着它是一個獨立的if語句，只有後在同一行的聲明將由該條件控制，因此對於下一行環路一個與IF無關的獨立聲明。您應該更改您的代碼

If Len(Temp)=9 Then 
    IsSemester = True 

    '<whatever your code here> 
End If

來源

2012-04-27 04:55:51 Nick

如果你指出了錯誤（特別是）這將是有益的，但我強烈同意，OP應該縮進他的代碼。 – jadarnel27 2012-04-27 05:01:38

你能看到最後的'Else'和'End If'嗎？似乎在那之前有一個'IF'丟失...... – Nick 2012-04-27 05:03:12

**我**看到你解決了這個問題。我的意思是爲了OP的好處。你應該總是解釋你的解決方案，即使它只是簡單的。請參閱此Meta帖子中的第10點：[什麼是可接受的答案？]（http://meta.stackexchange.com/questions/118582/what-is-an-acceptable-answer/118694#118694） – jadarnel27 2012-04-27 05:05:57

製作一個函數，asp？

回答

相關問題