用ADIR函数
语法
ADIR(ArrayName [, cFileSkeleton [, cAttribute ]])
参数
ArrayName
指定数组名。如果数组不存在,Visual FoxPro 将自动创建此数组。如果数组存在,但其大小不足以包含所有信息,则 Visual FoxPro 自动增加数组大小,使得数组能容纳所有信息。如果数组超过了所需大小,Visual FoxPro 将截掉多余部分。如果数组存在,并且 ADIR( )
函数由于没找到匹配文件而返回 0,则数组保持不变。如果数组不存在,并且 ADIR( ) 函数返回零,则不创建数组。
下表说明了数组中每列的内容及其数据类型:
列 数组内容 数值类型
1 文件名 字符型
2 文件大小 数值型
3 文件日期 日期型
4 文件时间 字符型
5 文件属性 字符型
数组的最后一列包含匹配文件的文件属性。每个文件属性值由一个字母表示,一个文件可有多个属性。下表说明每个字母表示的文件属性含义:
字母 属性
A 档案文件 一 可读写(在 FoxPro for Macintosh 中,此属性无效)
H 隐藏文件
R 只读文件
S 系统文件
D 目录或文件夹
cFileSkeleton
指定文件梗概,以便存储满足搜索条件的文件名或扩展名的文件信息。例如,条件可以是所有表、所有文本文件、所有文件名第一个字母为“A”的文件,等等。这些通配查询在 cFileSkeleton 中可以包含通配符 和 。其中问号代表单个字符,星号代表任意字符串。在文件梗概中,可在任意位置使用任意个数的通配符。
在 Visual FoxPro、FoxPro for Windows 和 FoxPro for MS-DOS 中,可以指定驱动器和目录名,程序将在此驱动器和目录下搜索匹配文件。如果不指定驱动器和目录名,将把当前目录下的文件信息存入数组中。
在 FoxPro for Macintosh 中,可以搜索匹配文件名的卷和文件夹。如果不指定卷和文件夹,FoxPro for Macintosh 将当前文件夹中的文件信息存入数组中。
cAttribute
指定在返回内容中包含子目录或嵌套文件夹、隐藏或系统文件、或者卷名。
cAttribute 可以是 D、H 和 S 的任意组合。如果包含 D,除了返回匹配 cFileSkeleton 的文件名外,还将返回当前目录的子目录或当前文件夹的嵌套文件夹。如果包含 H,将返回与 cFileSkeleton 指定相匹配的隐藏文件信息。如果包含 S,将返回与 cFileSkeleton 指定通配文件名相匹配的系统文件信息。
如果 cFileSkeleton 为空字符串,仅返回子目录或嵌套文件夹名、隐藏或系统文件。
cAttribute 参数中包含字符 V,将返回当前驱动器的卷名。如果 V 和 D、H 或 S 一起包含在数组中,则只返回卷名。卷名存入数组的第一个元素中,并截去数组的其余部分。
返回值类型
数值型
说明
对于每一个文件,ADIR( ) 将文件名、大小、日期、时间和属性信息存入数组。
例子:
=adir(abc,"d:\123\jpg")
把d:\123文件夹下jpg照片文件的名字、大小、日期、时间和属性信息存入数组abc
原定计划从本篇开始就要给大家介绍 ASP 内建的 ActiveX
组件 但是考虑到我们在往后的学习中将会接触到大量的数据库查询 因此作者临时决定花一到两篇的篇幅向大家简要介绍一些数据库查询语言的基本知识 这其实也是学习
ASP
所必须掌握的一门知识 是否能够灵活地运用数据库查询语言 将直接关系到
ASP 程序的执行效率等一系列问题 所以请各位务必重视
相信很多朋友都听说过 SQL
这个名字 如果你是计算机方面的行家 SQL
的大名一定是如雷贯耳 那么 SQL 究竟是什么呢SQL 一词实际上是
"Structured Query Language"
结构式查询语言的缩写 是用于对存放在计算机数据库中的数据进行组织 管理和检索的一种工具;是一种特定类型的数据库
关系数据库 而控制这种数据库的计算机程序就是我们常说的
DBMS 数据库管理系统 譬如 SQL Server Oracle Sybase DB
等等 当用户想要检索数据库中的数据时 就通过 SQL
语言发出请求 接着 DBMS 对该 SQL
请求进行处理并检索所要求的数据 最后将其返回给用户 此过程被称作为数据库查询 这也就是数据库查询语言这一名称的由来
SQL 并不是象 C COBOL 和 Fortran 语言那样的完整的计算机语言 SQL
没有用于条件测试的 IF 语句 也没有用于程序分支的 Goto
语句以及循环语句 For 或 Do 确切的讲 SQL 是一种数据库子语言 SQL
语句可以被嵌入到另一种语言中 从而使其具有数据库存取功能 SQL
也非严格的结构式语言 它的句法更接近英语语句 因此易于理解 大多数
SQL 语句都是直述其意 读起来就象自然语言一样明了 SQL
还是一种交互式查询语言 允许用户直接查询存储数据 利用这一交互特性 用户可以在很短的时间内回答相当复杂的问题 而同样问题若让程序员编写相应的报表程序则可能要用几个星期甚至更长时间
在大部分 ASP 应用程序中我们都会接触到数据库 而我们在编写
ASP 应用程序时用来进行数据库 *** 作的标准语法正是 SQL 因此 SQL
语法的重要性是不言而喻的 下面 我们就从最常用的 SQL 语句 SELECT
着手 一步一步地来学习 SQL
查询是 SQL 语言的核心 而用于表达 SQL 查询的 SELECT
语句则是功能最强也是最为复杂的 SQL
语句 它从数据库中检索数据 并将查询结果提供给用户 在本文中我们将建立一个名为
tianjiao 的简单数据库 该库中存放了一个叫 sales
的销售记录表 如下所示 :
姓名
性别
工资
销售目标
销售额
地区
书生
男
上海
吴冠军
男
北京
雷鸣
男
四川
雪儿
女
广州
顾一
男
大连
阿卓
女
天津
熠天
男
全国
在该表中有六列即六个字段 :
姓名 性别 工资 销售目标 销售额 地区 首先我们用 Select
语句列出姓名 销售目标和销售额 :
Select 姓名 销售目标 销售额 From sales
结果如下 :
姓名
销售目标
销售额
书生
吴冠军
雷鸣
雪儿
顾一
阿卓
熠天
然后 我们再列出所有男性的姓名 销售目标和销售额 :
Select 姓名 销售目标 销售额 From sales Where 性别 =" 男
"
结果如下 :
姓名
销售目标
销售额
书生
吴冠军
雷鸣
顾一
熠天
接下来 我们做一个相对复杂的查询 列出销售额大于销售目标的所有男性的姓名 销售目标和销售额 并且按销售目标排序
Select 姓名 销售目标 销售额
Form sales
Where 销售额 > 销售目标
And 性别 =" 男 "
Order By 销售目标
结果如下 :
姓名
销售目标
销售额
书生
雷鸣
顾一
熠天
大家可以看到 对于简单查询 SQL Select
语句和英文语法很相象 我们来分析一下 SELECT
语句的完整格式 它包括六个子句 其中 SELECT 和FROM
子句是必须的 其它子句可以任选 每个子句的功能如下 :
Select 子句列出所有要求 SELECT 语句检索的数据项 它放在
SELECT
语句开始处 指定此查询要检索的数据项 这些数据项通常用选择表表示 即一组用“ ”隔开的选择项 按照从左到右的顺序 每个选择项产生的一个列的查询结果 一个选择项可能是以下项目
( ) 列名 标识 FROM
子句指定表中的列 如果列名作为选择项 则 SQL
直接从数据库表中每行取出该列的值 再将其放在查询结果的相应行中
( ) 常数 指定在查询结果的每行中都放上该值
( ) SQL
表达式 说明必须将要放入查询结果中的值按表达式的规定进行计算
From 子句列出包含所要查询数据的表 它由关键字 FROM
后跟一组用逗号分开的表名组成 每个表明都代表一个包括该查询要检索数据的表 这些表称为此
SQL 语句的表源 因为查询结果都源于它们
Where 子句告诉 SQL
只查询某些行中的数据 这些行用搜索条件描述
Group By
子句指定汇总查询 即不是对每行产生一个查询结果 而是将相似的行进行分组 再对每组产生一个汇总结果
Having 子句告诉 SQL 只产生有 Group By
得到的某些组的结果 和 Where
子句一样 所需要的组也用一个搜索条件指定
Order By
子句将查询结果按一列或多列中的数据排序 如果省略此子句 则查询结果将是无序的
下面作者将提供一个简单但实用的运用 SQL 语句查询的 ASP
程序供大家参考
为了使大家更清楚更直接地了解 SQL 语法在 ASP
中的应用 我们先将查询的所有核心过程写成一个名为 query table 的SUB 然后利用
ASP 的服务器端包容功能调用该 SUB 请将以下语句剪贴到记事簿 保存为
subdBTable inc 文件 并置于虚拟目录 asptest 下:
< %
sub query table(inputquery)
set conntemp=server createobject("adodb connection")
conntemp open "DSN=Student;uid=student;pwd=aspmagic"
set rstemp=conntemp execute(inputquery)
howmanyfields=rstemp fields count
统计数据库中的列数
%>
< table border= >< tr>
< %
for I= to howmanyfields
%>
< td>< b>< %=rstemp(I) name%>< /B>< /TD>
< % next %>
< /tr>
< %
do while not rstemp eof
%>
< tr>
< % for I = to howmanyfields
thisvalue=rstemp(I)
If isnull(thisvalue) then
thisvalue="
如果字段为空 则将变量 thisvalue 的值定义为一个空格
end if%>
< td valign=top>< %=thisvalue%>< /td>
< % next %>
< /tr>
< %rstemp movenext
loop%>
< /table>
< %
rstemp close
set rstemp=nothing
conntemp close
set conntemp=nothingend sub%>
完成了 SUB 的定义过程 在下面几个 ASP
程序中我们只要加入想要使用的 SQL
查询语句 并调用该过程就可以非常方便的得到查询结果 将以下四段代码分别保存为
asp a asp asp b asp asp c asp asp d asp 四个 asp 文件
< HEAD>< TITLE>asp a asp< /TITLE>< /HEAD>
< HTML>< body bgcolor="#FFFFFF">
< %
call query table("select from publishers where name like A%% ")
将表 publishers 中所有姓名中有字母 A 的记录查询出来
%>
< ! #include virtual="/asptest/subdBTable inc" >< /BODY><
/HTML>
< HEAD>< TITLE>asp b asp< /TITLE>< /HEAD>< HTML><
body bgcolor="#FFFFFF">
< %
call query table("select from titles where Year_Published > = ")
将表 titles 中所有发表年份大于或等于 年的记录查询出来
%>
< ! #include virtual="/asptest/subdBTable inc" >< /BODY><
/HTML>
< HEAD>< TITLE>asp c asp< /TITLE>< /HEAD>< HTML><
body bgcolor="#FFFFFF">
< %
call query table("select from publishers where amount> and
sex= male ")
将表 publishers 中所有数量大于 且性别为男的记录查询出来
%>
< ! #include virtual="/asptest/subdBTable inc" >< /BODY><
/HTML>
< HEAD>< TITLE>asp d asp< /TITLE>< /HEAD>< HTML><
body bgcolor="#FFFFFF">
< %
call query table("select from publishers where state< > NY ")
将表 publishers 中所有所在城市不为纽约的记录查询出来
%>
< ! #include virtual="/asptest/subdBTable inc" >< /BODY><
/HTML>
利用 subdBTable inc 文件中的所定义的过程 query table 你就可以非常迅速地对数据库进行查询 你所要做的只是将“conntemp open
"DSN=Student;uid=student;pwd=aspmagic"”中的数据库名称 用户身份和密码稍加改动 并在调用
query table 时输入想要使用的 SQL 查询语句即可 是不是很简单
这就是 ASP 和 SQL 的魅力所在 !!!
今天 我们虽然用了一整篇的篇幅只学习了一个 SQL
指令 但请你相信你所获得远不同于一个 DOS 指令 SELECT
指令使得你可以非常容易地对数据库进行查询 或许在这之前你对数据库查询还一无所知 但是通过本篇的学习 你其实已经会使用
ASP 进行常用的数据库查询了 是不是很激动
lishixinzhi/Article/program/net/201311/14199
你能不能把IIS报错的打开啊?
现在看不出怎么错。
=====================================================
你压缩包里的SQL少了个字段,这样试试:
sql="insert into student(StudentUsename,StudentPwd,StudentName,StudentSex,StudentBirthday,StudentTel,StudentEmail,yuanxi,zhuanye) values('"&StudentUsename&"','"&StudentPwd&"','"&StudentName&"','"&StudentSex&"','"StudentBirthday"','"&StudentTel&"','"&StudentEmail&"','"&yuanxi&"','"&zhuanye&"')"
========================================================
set rs=servercreateobject("adodbrecordset") 这句不要
rsopen sql,conn,3,3 改成:
connexecute(sql)
CloseConn
代码是连在一起的么?建议你把变量定义成全局的,不要放在while循环里面,如下:
string
bookid
=
“”;
while(resnext()){
bookid=resgetstring(1);
}
而且connection
第一次已经取了,也可以这样定义了之后直接在下面进行使用,没必要再写一遍
以上就是关于asp如何批量获取一个文件夹下所有文件的文件名然后存入数据库全部的内容,包括:asp如何批量获取一个文件夹下所有文件的文件名然后存入数据库、ASP基础入门:数据库查询语言(1)、Asp中如何将表单信息储存到数据库中等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)