繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp数组使用(2)
- ASP
- SQL数据操作基础(中级) 6
- SQL数据操作基础(中级) 7
- SQL数据操作基础(中级) 8
- SQL数据操作基础(中级) 9
- SQL数据操作基础(中级) 10
- XML DOM介绍和例子（一）
- XML DOM介绍和例子（二）
- XML DOM介绍和例子（三）
- ADO 光 标 基 础 (1)
- ADO 光 标 基 础 (2)
- SQL语言快速入门之三
- ASP+学习笔记（一）
- ASP+学习笔记（二）
- ASP+学习笔记（三）
- ASP+学习笔记（四）
- ASP+学习笔记（五）
- ASP+配置 — ASP+配置概念（一）
- Microsoft 脚本编码器(4) --- 编码示例
- VPN技术详解(上)
- VPN技术详解(中)
ASP 中的 asp数组使用(2)
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 157 ::
收藏到网摘: 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)
%>
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)
%>
评论 (0) All
