| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2177 人关注过本帖
标题:还是if else 语句什么时候可省end if 嵌套多了分不清了, 请好心给我看一下 ...
取消只看楼主 加入收藏
sylknb
Rank: 4
等 级:贵宾
威 望:14
帖 子:1547
专家分:184
注 册:2006-6-3
结帖率:79.38%
收藏
 问题点数:0 回复次数:1 
还是if else 语句什么时候可省end if 嵌套多了分不清了, 请好心给我看一下。
还是if else 语句什么时候可省end if 嵌套多了分不清了什么与什么配套, 请好心给我看一下。

If Not Rs.Eof And Not Rs.Bof Then
%>
          <% If Rs("User") = Session("User") Then %>
          <tr>
            <td width="168" height="23" align="right">密码提示问题:</td>
            <td width="468">&nbsp;<%=Rs("Answer")%></td>
          </tr>
          <tr>
            <td height="23" align="right">密码提示答案:</td>
            <td>&nbsp;<%=Rs("Question")%></td>
          </tr>
          <% End If %>
          <tr>
            <td width="168" height="23" align="right">注册时间:</td>
            <td width="468">&nbsp;<%=Rs("RegTime")%></td>
          </tr>
          <tr>
            <td height="23" align="right">个人资料被浏览次数:</td>
            <td>&nbsp;<%=Rs("VisitNum")%></td>
          </tr>
          <tr>
            <td height="23" align="right">登陆次数:</td>
            <td>&nbsp;<%=Rs("LoginNum")%></td>
          </tr>
          <tr>
            <td height="30" colspan="2" align="center" bgcolor="#B5D8FF">个人信息</td>
          </tr>
          <tr>
            <td height="23" align="right">性别:</td>
            <td>&nbsp;<%     If Rs("Gender")=1 Then
                                    Response.Write "男"
                                ElseIf Rs("Gender")=0 Then
                                    Response.Write "女"
                                Else
                                    Response.Write "保密"
                                End If
                            %></td>
          </tr>
          <tr>
            <td height="23" align="right">出生日期:</td>
            <td>&nbsp;<%=Rs("Birth")%></td>
          </tr>
          <tr>
            <td height="23" align="right">个人头像:</td>
            <td>&nbsp;
                <%    If Rs("Face")<>"" Then   
                                    Response.Write "<img src=upphoto/"&Rs("Face")&" width=60 height=60>"
                                Else
                                    Response.Write "<img src=images/noface.gif width=60 height=60>"                                
                                End If
                                %></td>
          </tr>
          <tr>
            <td height="23" align="right">学历:</td>
            <td>&nbsp;<%=Rs("Edu")%></td>
          </tr>
          <tr>
            <td height="23" align="right">职业:</td>
            <td>&nbsp;<%=Rs("Work")%></td>
          </tr>
          <tr>
            <td height="23" align="right">籍贯:</td>
            <td>&nbsp;<%=Rs("Native")%></td>
          </tr>
          <tr>
            <td height="23" align="right">交友对象:</td>
            <td>&nbsp;<%=Rs("Intent")%></td>
          </tr>
          <tr>
            <td height="23" align="right">自我简介:</td>
            <td>&nbsp;<%=g_UnHtml(Rs("Aboutme"))%></td>
          </tr>
          <tr>
            <td height="30" colspan="2" align="center" bgcolor="#B5D8FF">联系方式</td>
          </tr>
             <% If Rs("User") = Session("User") Or Rs("IsView") = 0 Then %>
          <tr>
            <td height="23" align="right">QQ:</td>
            <td>&nbsp;<%=Rs("Qq")%></td>
          </tr>
          <tr>
            <td height="23" align="right">MSN:</td>
            <td>&nbsp;<%=Rs("Msn")%></td>
          </tr>
          <tr>
            <td height="23" align="right">E-Mail:</td>
            <td>&nbsp;<%=Rs("Email")%></td>
          </tr>
                  <% If Rs("User") = Session("User") Then %>
          <tr>
            <td height="23" align="right">是否隐藏联系方式:</td>
            <td>&nbsp;<% If Rs("IsView")=1 Then Response.Write "隐藏" Else Response.Write "不隐藏" %></td>
          </tr>         
          <tr>
            <td height="40" align="right"> </td>
            <td>&nbsp;&nbsp;&nbsp;<a href="edit_myinfo.asp">我要修改</a></td>这句代码放在这里与放在<% End If %>后面好象效果一样
          </tr>
                  <% End If %>    这里的 <End If %> 与上面哪一个if  配套?     
            <tr>
            <td height="40" align="right"> </td>

           <td><a href="edit_myinfo.asp">我要修改</a></td>

     <% Else %>
          <tr>
            <td height="30" align="center" colspan="2">Sorry!该会员已设置保密</td>
          </tr>        
            <% End If %>         
          <%
              If User <> Session("User") Then
                Rs("VisitNum") = Rs("VisitNum") + 1
                Rs.Update
            End If
  %>        
          <% If User <> Session("User") Then %>
          <tr>
            <td height="50" colspan=2 align=center bgcolor=#ffffff><a href="send_msg.asp?receiver=<%=user%>"><img src="images/send.gif" width="179" height="36" border="0"></a>
              <a href="my_photo.asp?user=<%=Rs("User")%>"><img src="images/btn_photo.gif" width="179" height="36" border="0"></a></td>
          </tr>
          <% End If %>
<%
    End If


[ 本帖最后由 sylknb 于 2010-3-17 12:51 编辑 ]
搜索更多相关主题的帖子: 好心 语句 end else 嵌套 
2010-03-17 12:07
sylknb
Rank: 4
等 级:贵宾
威 望:14
帖 子:1547
专家分:184
注 册:2006-6-3
收藏
得分:0 
我摘于书上:还是不太懂!!兰色的配对根据题目意思好象能配上,就是红色的 <% End If %>它到底于誰配对。因VB中有时可省ENDIF。有三个问题,请指教。

<% If Rs("User") = Session("User") Or Rs("IsView") = 0 Then %>
         
                 (1) <% If Rs("User") = Session("User") Then %>此句好象没有<%endif%>了
         
                       (2) <% If Rs("IsView")=1 Then Response.Write "隐藏" Else Response.Write "不隐%>         
                <a href="edit_myinfo.asp">我要修改</a> 这句是不是与上面ELSE 有关吗?
                           
                <% End If %>     这个<% endif%> 与  (1)配对还是与(2)配对            
            <% Else %>
<td height="30" align="center" colspan="2">Sorry!该会员已设</td></tr>        
            <% End If %>


[ 本帖最后由 sylknb 于 2010-3-17 18:39 编辑 ]
2010-03-17 18:22
快速回复:还是if else 语句什么时候可省end if 嵌套多了分不清了, 请好心给我看 ...
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017621 second(s), 8 queries.
Copyright©2004-2025, BC-CN.NET, All Rights Reserved