'如果q的长度大于0,则查找所有的hint
if len(q)>0 then
hint=""
for i=1 to 30
if q=ucase(mid(a(i),1,len(q))) then
if hint="" then
hint=a(i)
else
hint=hint & " , " & a(i)
end if
end if
next
end if
'如果找不到hint,则输出"no suggestion"
'或者输出正确的值
if hint="" then
response.write("no suggestion")
else
response.write(hint)
end if
%>作者: Alvin 时间: 2011-4-10 00:35:41