请教：字段值显示的写法？急！

jymwise 发布于 2010-12-08 20:38， 606 次点击

请教:一个字段值的不同颜色显示
表order中的字段describe有不同的值
//要实现有结果：如果是"订单"开头的，"订单"两字用黄色表示，其他内容不变。
  如果是空的或是不是"订单"开头的,值不变。
1.可能为空
2."订单"开头的内容
3。不同的值（可能有向几万种）
<%
set rs=server.createobject("adodb.recordset")
sql="select * from order"
rs.open sql,conn

remark = rs("describe")
remark1 = mid(remark,1,2)
remark2 = mid(remark,3,200)
%>
<table border="1" width="100%" id="table1">
    <tr>
        <td align="center">字段1</td>
    </tr>

<% while not rs.eof
rs.movenext
wend%>

    <tr>
        <td><% if remark1="" or remark1 <> "订单" then
           response.write & remark
            else
           response.write "<font color=yellow>"&remark1&"</font>" & response.write & remark2 %>
         </td>
    </tr>
</table>

9 回复

gupiao1752010-12-09 00:32

这样写了以后,出了什么问题了。

是不能显示,还是有错误提示?或者根本显示不了黄色那部分!

hams2010-12-09 08:11

<% if remark1="" or remark1 <> "订单" then
           response.write remark
            else
           response.write "<font color=yellow>"&remark1&"</font>" & remark2 %>

response.write 又不是变量或常量，为什么拿来进行字符串连接？

hams2010-12-09 08:11

其次，同一个问题请不要重复发贴。

jymwise2010-12-09 08:49

是不能显示.

<% if remark1="" or remark1 <> "订单" then
           response.write remark
            else
           response.write "<font color=yellow>"&remark1&"</font>" & remark2 %>

那请教:这段话该如何写?才能得出来.
谢谢!

wangjy5002010-12-09 12:25

程序代码：

这样试试看！

hams2010-12-09 14:34

以下是引用jymwise在2010-12-9 08:49:40的发言：

是不能显示.
那请教:这段话该如何写?才能得出来.
谢谢!

不是给你改了么

jymwise2010-12-09 17:07

<%
set rs=server.createobject("adodb.recordset")
sql="select * from order"
rs.open sql,conn

remark = rs("describe")
%>
<table border="1" width="100%" id="table1">
    <tr>
        <td align="center">字段1</td>
    </tr>

<% while not rs.eof
%>

    <tr>
        <td><%= replace(remark,"订单","<font color='yellow'>订单</font>")%>
         </td>
    </tr><%rs.movenext
wend%>
</table>
按照wangjy500的写法,是可以显示,但remark = rs("describe")为空时:
报:
Microsoft VBScript 运行时错误错误 '800a005e'

无效使用 Null: 'replace'

/hl/asp/order/order_detailopen.asp，行301

谢谢!

yms1232010-12-09 17:19

<%
set rs=server.createobject("adodb.recordset")
sql="select * from order"
rs.open sql,conn
%>
<table border="1" width="100%" id="table1">
    <tr>
        <td align="center">字段1</td>
    </tr>

<% while not rs.eof
   remark = rs("describe")
%>

    <tr>
        <td>
<%
IF remark="" Then
   Response.Write "订单"
Else
   IF Mid(remark,0,2)<>"订单" Then
      Response.Write "订单"
   Else
      Response.Write replace(remark,"订单","<font color='yellow'>订单</font>")
   End IF
End IF
%>
         </td>
    </tr><%rs.movenext
wend%>
</table>

#10

hams2010-12-09 17:20

既然知道是这个错误就作个判断，为空时就不作处理。