日期:2014-05-17  浏览次数:20880 次

怎样控制字符的长度
<%while   not   r6.eof
zw=   r6( "gw ")& "/ "%>
<%=zw%>
<%r6.movenext
wend
r6.close
set   r6=nothing
%>


以上代码中生成ZW的循环数据如下
  test/test/test/test/

要怎么样控制zw的长度?


------解决方案--------------------
<%
dim i
i = 0
while not r6.eof
if i <3 then
zw= r6( "gw ")& "/ "
end if
%>
<%=zw%>
<%r6.movenext
wend
r6.close
set r6=nothing
%>
------解决方案--------------------
说实话没太看懂是什么意思?是要把这句 <%=zw%> 写成test/test/test/test/吗?
下面这个过程是把123456789这样的数值写成货币形式的,你可以把 ", "换成 "/ "
function current(aa)
if len(aa)> 3 then
num=int((len(aa)-1)/3)
init=len(aa) mod 3
if init = 0 then
first=3
else
first=init
end if
bb=mid(aa,1,first)& ", "
for m=0 to num-1
bb=bb&mid(aa,1+first+3*m,3)
if m <> (num-1) then
bb=bb& ", "
end if
next
else
bb=aa
end if
current=bb
end function