我有一个if..else语句,用于显示学生是否有资格根据数据库中的值进行竞争.但是,我的代码无法正常工作.
我的代码如下:
<% If (rs_view.Fields.Item("StudentStatus").Value="OK") Then %>
<strong><font color="#3300FF" size="-1" face="Arial, Helvetica, sans-serif">
<%Response.Write("You are QUALIFIED to go for competition")%>
</font></strong>
<% Else %>
<strong><font color="#FF0000" size="-1" face="Arial, Helvetica, sans-serif">
<%Response.Write("You are NOT QUALIFIED to go for competition")%>
</font></strong>
<% End If %>
Run Code Online (Sandbox Code Playgroud)
有任何想法吗?
也许记录集中的StudentStatus字段是小写的?用UCase()包裹它?
此外,您可以真正简化该代码的可读性......
<%
Dim RspMsg, RspColor
If (UCase(rs_view("StudentStatus"))="OK") Then
RspMsg = "You are QUALIFIED to go for competition"
RspColor = "#3300FF"
Else
RspMsg = "You are NOT QUALIFIED to go for competition"
RspColor = "#FF0000"
End If
%>
<strong><font color="<%=RspColor%>" size="-1" face="Arial, Helvetica, sans-serif">
<%=QualificationResponse%></font></strong>
Run Code Online (Sandbox Code Playgroud)