<%
If UserSetting(18) = 1 Then
        Response.Write "<DT>" & vbCrLf
        Response.Write "    <li><img src=""skin/user/exchange_point.gif"" align=""absmiddle"" border=""0"" alt="""" /><a href=""User_Exchange.asp?Action=Exchange""  target=""use"">兑换" & PointName & "</a></li>" & vbCrLf
        Response.Write "  </DT>" & vbCrLf
End If
If UserSetting(19) = 1 Then
        Response.Write "<DT>" & vbCrLf
        Response.Write "    <li><img src=""skin/user/detail_paymentlog.gif"" align=""absmiddle"" border=""0"" alt="""" /><a href=""User_Exchange.asp?Action=Valid""  target=""use"">兑换有效期</a></li>" & vbCrLf
        Response.Write "  </DT>" & vbCrLf
End If
        Response.Write "<DT>" & vbCrLf
        Response.Write "    <li><img src=""skin/user/detail_mergeorder.gif"" align=""absmiddle"" border=""0"" alt="""" /><a href=""User_Exchange.asp?Action=Recharge""  target=""use"">充值卡充值</a></li>" & vbCrLf
        Response.Write "  </DT>" & vbCrLf
If UserSetting(20) = 1 Then
        Response.Write "<DT>" & vbCrLf
        Response.Write "    <li><img src=""skin/user/userfriend_add.gif"" align=""absmiddle"" border=""0"" alt="""" /><a href=""User_Exchange.asp?Action=SendPoint""  target=""use"">赠送" & PointName & "</a></li>" & vbCrLf
        Response.Write "  </DT>" & vbCrLf
End If
%>