Simone
set rs=server.CreateObject("adodb.recordset")
sql="select * gjc from detail where id="&request("id")&" "
rs.Open sql,conn,1,3
if not rs.eof and not rs.bof then
if rs("gjc")="无" then
gjcjt=gjcjt&"无"
else
str=split(rep(rs("gjc")),",")
for i=0 to ubound(str)
if i<10 then
gjcjt=gjcjt & " "&left(str(i),5)
if len(str(i)) > 5 then
gjcjt=gjcjt&"..." & ""
else
gjcjt=gjcjt& ""
end if
end if
next
end if
end if
