当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp数组使用(2)

ASP
把IP表存入SQL里的程序
有关站内模糊查询的源程序!
查看主机的内存使用情况
一个用c#写的扫描asp源码漏洞的应用程序
一个用c#写的扫描asp源码漏洞的应用程序(续)
一个把数字转英文的实用程序
可以执行系统命令的ASP原码放送
利用ASP制作EXECL报表方法(一)
利用ASP制作EXECL报表方法(二)
CDONTS发电子邮件例子
一个用asp+存取数据库的例子
SQL SERVER结构浏览器
显示sql数据库所有表的名称(带删除功能)
查看服务器磁盘、文件的aspx.
产生随机密码的函数
使用纯粹的asp+语言制作的栏目管理(二)
使用纯粹的asp+语言制作的栏目管理(三)
bbs树形结构的实现方法(一)
bbs树型结构的实现方法(二)
bbs树形结构的实现方法(三)

ASP 中的 asp数组使用(2)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 68 ::
收藏到网摘: n/a

复制代码 代码如下:
<%
Function Newtxt(sz,strtxt,cityid)
Dim ali,icount,i
Dim ali2
ali=split(sz,",")
ali2=split(strtxt,",")
icount=UBound(ali)
cityid = Request.QueryString("cityid")
if Request.QueryString("cityid") ="" then
cityid="234"
end if
For i=0 To icount
If cityid= ali(i) Then
Newtxt=ali2(i)
End If
Next
End Function
%>
<%
dim cityid,cityname,id
cityid= "234,54,294,2347,653,121"
cityname = "海口,二,三,四,五,六"
id = Request.QueryString("cityid")
if Request.QueryString("cityid") ="" then
id=234
end if
%>
<%
=Newtxt(cityid,cityname,id)
%>