ASP中处理分隔字符的方法

有时候我们存取数据库时，内容只有几个字符，你是否为其建了一个字段呢。
如果很多这样的数据呢。你完全可以把其存在一个字段里就行了；
请看示例：
<center>
<%
‘数据库连接就省了
menu="index:本站主页|down:软件下载|bbs:社区论坛"

dim wdim
wdim=split(menu,"|")
for i=0 to ubound(wdim)
response.write " <a href='"&left(wdim(i),instr(wdim(i),":")-1)&".asp'>"&right(wdim(i),len(wdim(i))-instr(wdim(i),":"))&"</a>"
next
erase wdim
%>
</center>

是不是很方便呢

这是我根据以上所写的一个小程序
<%
DIM menu
dim i,c
for i=1 to 50
c="C"&i
if not request(c)="" and instr(session("menu"),request(c))=0 then
prono=request(c)&"|"+prono
end if
next
SESSION("menu")=SESSION("menu")&Cstr(prono)
if request("clear")<>"" then
session("menu")=""
response.redirect"show.asp"
end if
'有选择的删除session
for a=1 to 50
d="D"&a
if not request(d)="" and instr(session("menu"),request(d))>0 then
delpro=request(d)&"|"
session("menu")=replace(session("menu"),cstr(delpro),"")
end if
next
response.write session("menu")&"<br>"
%>
<center>
</center>
<a href="show.asp?clear=aaa">清空SESSION</a>
<form name="form1" method="post" action="">
<input type="submit" name="Submit" value="添加">
<input name="c1" type="text" id="c1">
</form>
<form name="form2" method="post" action="">
<%
menu=session("menu")
'如果右边是|则把其去掉
if right(menu,1)="|" then
menu=left(menu,len(menu)-1)
end if
dim wdim
'到:有几位数 instr(wdim(i),":") -1是把:去掉
':右边的值取wdim(i)减去左边的值。
wdim=split(menu,"|")
for i=0 to ubound(wdim)
response.write "<input type='checkbox' name=d"&i+1&" value="&wdim(i)&"><a href="&left(wdim(i),instr(wdim(i),":")-1)&".htm>"&right(wdim(i),len(wdim(i))-instr(wdim(i),":"))&"</a> "
next
erase wdim
%>
<input type="submit" name="Submit2" value="修改">
</form>

'以上程序可以做成一个购物篮程序