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

ASP
亲密接触ASP.Net(16)
NT 下虚拟域名的实现
介绍一种效率极高的分类算法
asp+发送email
用 ASP 技术开发 WEB 调查(投票)系统 (1)
用ASP技术开发 WEB 调查(投票)系统 (2)
用ASP技术开发WEB调查(投票)系统 (3)
ASP+全新接触
ASP+上载例子
从ASP迁移至ASP+--最初的考虑(一)
从ASP迁移至ASP+--进入DataSet
将HTML表格转换为ASP+数据列表(DataList)
急不可耐了?转换其他的页面吧!
用ASP解决域名登记查询
从ASP迁移至ASP+--处理会话变量
从ASP迁移至ASP+--CustomValidator控件
从ASP迁移至ASP+--从用户那儿收集数据
展现C#(1):C#简介
展现C#(2):NGWS Runtime 基础
展现C#(3):第一个C#应用程序

ASP 中的 asp数组使用(2)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 176 ::
收藏到网摘: 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)
%>