asp获取一个文件夹及其子文件夹下的所有图片地址
原文链接:http://www.iwapr.cn/article/daima/30.html
ASP/Visual Basic代码
<%
dim picurl,all_picurl
'皆是全局变量:分别定义图片的链接地址;所有指定文件夹(包括指定文件夹的子文件夹下图片url地址)
picurl="" '设置图片链接地址默认值为空,为下面的checkfolders()函数执行picurl=picurl&"..."做准备.
Function checkRegExp(strPattern,str) '正则匹配算法,strPattern代表正则表达式,str代表需要查询匹配的字符串
Dim Exp
if str="" or isnull(str) then '检测你要查询的字符串是否为空,如果为空就返回false
checkRegExp=false
end if
Set objExp=New regExp
objExp.pattern=strPattern '指定匹配模板
objExp.ignoreCase=false '是否忽略大小写,这里不忽略,你也可以设置忽略
objExp.Global=True '指定是否全局匹配,这里设置为全局匹配
checkRegExp=objExp.Test(str) '返回查询结果,也可以这样写 return objExp.Test(str)
End function
相关文档：
ASP编码规范
第一章 ASP编码规范通述
ASP编码分为两大部分，一部分为静态文件编码，一部分为包含服务器端脚本的动态文件编码。
静态文件编码分script编码和HTML编码两部分。
服务器端编码则分为服务器脚本、客户端脚本、HTML脚本三部分。
编码规范采用如下约定：
� ......
本程序是asp实现 php uc_client 功能
程序说明
网上的一些代码号称UCenter 整合ASp，但是大部分都没有一个实例，只有一个加密解密函数，很多新手无法利用其进行实际应用。
近期公司网站项目--课堂无忧 需整合asp ucenter，研究了一把UCenter，写了这个范例程序
虽然只简单写了登陆和注册部分功能的实现，其余模块您可以 ......
txt文件是下面这样的，
一行一条数据，用逗号分隔
下面写出asp文件
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!--#include file="inc/conn.asp" -->
<%
filespec=server.mappath("txt.txt")
Const ForRead ......
学习目的：学会用表单元素向服务器传送变量，然后显示变量在客户端的浏览器。
首先，让我们来看一下DREAMWEAVER的表单元素毛刷。
下面我们来一个一个看表单元素。1、文本域，这个是最基本的，传送的是文本信息，一般用户名，密码都要用这个传送，不过要是密码的话要在类型里面选择密码，这样就会以*代替显示� ......
<%
for i=1 to rs.recordCount '变量i从1循环到数据库中的全部记录数
if (i mod 1 =1) then '每个tr即每行显示1个记录,可根据需要自行修改, 将左边的1修改为2即显示两行。
response.write "<tr align='center'>"
end if
%>
此处为要循环的内容
<%if (i mod 1 = 0) then ......
