整理了一些t-sql技巧
把长日期转换为短日期 Convert(char(10),getdate(),120)
MS-SQL数据库开发常用汇总 1.按姓氏笔画排序:
Select * From TableName Order By CustomerName Collate Chinese_PRC_Stroke_ci_as
2.数据库加密:
select encrypt('原始密码')
select pwdencrypt('原始密码')
select pwdcompare('原始密码','加密后密码') = 1--相同；否则不相同 encrypt('原始密码')
select pwdencrypt('原始密码')
select pwdcompare('原始密码','加密后密码') = 1--相同；否则不相同
3.取回表中字段:
declare @list varchar(1000),@sql nvarchar(1000)
select @list=@list+','+b.name from sysobjects a,syscolumns b where a.id=b.id and a.name='表A'
set @sql='select '+right(@list,len(@list)-1)+' from 表A'
exec (@sql)
4.查看硬盘分区:
EXEC master..xp_fixeddrives
5.比较A,B表是否相等:
if (select checksum_agg(binary_checksum(*)) from A)
=
(select checksum_agg(binary_checksum(*)) from B)
print '相等'
else
print '不相等'
6.杀掉所有的事件探察器进程:
DECLARE hcforeach CURSOR GLOBAL FOR SELECT 'kill '+RTRIM(spid) FROM master.dbo.sysprocesses
WHERE program_name IN('SQL profiler',N'SQL 事件探查器')
EXEC sp_msforeach_worker '?'
7.记录搜索:
开头到N条记录
Select Top N * From 表
-------------------------------
N到M条记录(要有主索引ID)
Select Top M-N * From 表 Where ID in (Select Top M ID From 表) Order by ID Desc
----------------------------------
N到结尾记录
Select Top N * From 表 Order by ID Desc
8.如何修改数据库的名称:
sp_renamedb 'old_name', 'new_name'
9：获取当前数据库中的所有用户表
select Name from sysobjects where xtype='u' and status>=0
10：获取某一个表的所有字段
select name from syscolumns where id=object_id('表名')
11：查看与某一个表相关的视图、存储过程、函数
select a.* from sysobjects a, syscomments b where a.id = b.id and b.text like '%表名%'
12：查看当前数据库中所有存储过程
select name as 存储过程名称 from sysobjects where xtype='P'
13：查询用户创建的所有数据库
select * from master..sysdatabases D where sid not in(select sid from master..syslogins where name='sa')
或者
select dbid, name AS DB_NAME from master..sysdatabases where sid ＜> 0x01
14：查询某一个表的字段和数据类型
select column_name,data_type from information_schema.columns
where table_name = '表名'
[n].[标题]:
Select * From TableName Order By CustomerName
[n].[标题]:
来自http://dev.csdn.net/develop/article/83/83138.shtm
一、 只复制一个表结构，不复制数据
select top 0 * into [t1] from [t2]
二、 获取数据库中某个对象的创建脚本
1、 先用下面的脚本创建一个函数
if exists(select 1 from sysobjects where id=object_id('fgetscript') and objectproperty(id,'IsInlineFunction')=0)
drop function fgetscript
go
create function fgetscript(
@servername varchar(50) --服务器名
,@userid varchar(50)='sa' --用户名,如果为nt验证方式,则为空
,@password varchar(50)='' --密码
,@databasename varchar(50) --数据库名称
,@objectname varchar(250) --对象名
) returns varchar(8000)
as
begin
declare @re varchar(8000) --返回脚本
declare @srvid int,@dbsid int --定义服务器、数据库集id
declare @dbid int,@tbid int --数据库、表id
declare @err int,@src varchar(255), @desc varchar(255) --错误处理变量
--创建sqldmo对象
exec @err=sp_oacreate 'sqldmo.sqlserver',@srvid output
if @err<>0 goto lberr
--连接服务器
if isnull(@userid,'')='' --如果是 Nt验证方式
begin
exec @err=sp_oasetproperty @srvid,'loginsecure',1
if @err<>0 goto lberr
exec @err=sp_oamethod @srvid,'connect',null,@servername
end
else
exec @err=sp_oamethod @srvid,'connect',null,@servername,@userid,@password
if @err<>0 goto lberr
--获取数据库集
exec @err=sp_oagetproperty @srvid,'databases',@dbsid output
if @err<>0 goto lberr
--获取要取得脚本的数据库id
exec @err=sp_oamethod @dbsid,'item',@dbid output,@databasename
if @err<>0 goto lberr
--获取要取得脚本的对象id
exec @err=sp_oamethod @dbid,'getobjectbyname',@tbid output,@objectname
if @err<>0 goto lberr
--取得脚本
exec @err=sp_oamethod @tbid,'script',@re output
if @err<>0 goto lberr
--print @re
return(@re)
lberr:
exec sp_oageterrorinfo NULL, @src out, @desc out
declare @errb varbinary(4)
set @errb=cast(@err as varbinary(4))
exec master..xp_varbintohexstr @errb,@re out
set @re='错误号: '+@re
+char(13)+'错误源: '+@src
+char(13)+'错误描述: '+@desc
return(@re)
end
go
2、 用法如下
用法如下,
print dbo.fgetscript('服务器名','用户名','密码','数据库名','表名或其它对象名')
3、 如果要获取库里所有对象的脚本，如如下方式
declare @name varchar(250)
declare #aa cursor for
select name from sysobjects where xtype not in('S','PK','D','X','L')
open #aa
fetch next from #aa into @name
while @@fetch_status=0
begin
print dbo.fgetscript('onlytiancai','sa','sa','database',@name)
fetch next from #aa into @name
end
close #aa
deallocate #aa
4、 声明，此函数是csdn邹建邹老大提供的
三、 分隔字符串
如果有一个用逗号分割开的字符串，比如说"a,b,c,d,1,2,3,4"，如何用t-sql获取这个字符串有几个元素，获取第几个元素的值是多少呢？因为t-sql里没有split函数，也没有数组的概念，所以只能自己写几个函数了。
1、 获取元素个数的函数
create function getstrarrlength (@str varchar(8000))
returns int
as
begin
declare @int_return int
declare @start int
declare @next int
declare @location int
select @str =','+ @str +','
select @str=replace(@str,',,',',')
select @start =1
select @next =1
select @location = charindex(',',@str,@start)
while (@location <>0)
begin
select @start = @location +1
select @location = charindex(',',@str,@start)
select @next =@next +1
end
select @int_return = @next-2
return @int_return
end
2、 获取指定索引的值的函数
create function getstrofindex (@str varchar(8000),@index int =0)
returns varchar(8000)
as
begin
declare @str_return varchar(8000)
declare @start int
declare @next int
declare @location int
select @start =1
select @next =1 --如果习惯从0开始则select @next =0
select @location = charindex(',',@str,@start)
while (@location <>0 and @index > @next )
begin
select @start = @location +1
select @location = charindex(',',@str,@start)
select @next =@next +1
end
if @location =0 select @location =len(@str)+1 --如果是因为没有逗号退出，则认为逗号在字符串后
select @str_return = substring(@str,@start,@location -@start) --@start肯定是逗号之后的位置或者就是初始值1
if (@index <> @next ) select @str_return = '' --如果二者不相等，则是因为逗号太少，或者@index小于@next的初始值1。
return @str_return
end
3、 测试
SELECT [dbo].[getstrarrlength]('1,2,3,4,a,b,c,d')
SELECT [dbo].[getstrofindex]('1,2,3,4,a,b,c,d',5)
四、 一条语句执行跨越若干个数据库
我要在一条语句里操作不同的服务器上的不同的数据库里的不同的表,怎么办呢?
第一种方法:
select * from OPENDATASOURCE('SQLOLEDB','Data Source=远程ip;User ID=sa;Password=密码').库名.dbo.表名
第二种方法:
先使用联结服务器:
EXEC sp_addlinkedserver '别名','','MSDASQL',NULL,NULL,'DRIVER={SQL Server};SERVER=远程名;UID=用户;PWD=密码;'
exec sp_addlinkedsrvlogin @rmtsrvname='别名',@useself='false',@locallogin='sa',@rmtuser='sa',@rmtpassword='密码'
GO
然后你就可以如下：
select * from 别名.库名.dbo.表名
insert 库名.dbo.表名 select * from 别名.库名.dbo.表名
select * into 库名.dbo.新表名 from 别名.库名.dbo.表名
go
五、 怎样获取一个表中所有的字段信息
蛙蛙推荐：怎样获取一个表中所有字段的信息
先创建一个视图
Create view fielddesc
as
select o.name as table_name,c.name as field_name,t.name as type,c.length as
length,c.isnullable as isnullable,convert(varchar(30),p.value) as desp
from syscolumns c
join systypes t on c.xtype = t.xusertype
join sysobjects o on o.id=c.id
left join sysproperties p on p.smallid=c.colid and p.id=o.id
where o.xtype='U'
查询时:
Select * from fielddesc where table_name = '你的表名'
还有个更强的语句，是邹建写的，也写出来吧
SELECT
(case when a.colorder=1 then d.name else '' end) N'表名',
a.colorder N'字段序号',
a.name N'字段名',
(case when COLUMNPROPERTY( a.id,a.name,'IsIdentity')=1 then '√'else '' end) N'标识',
(case when (SELECT count(*)
FROM sysobjects
WHERE (name in
(SELECT name
FROM sysindexes
WHERE (id = a.id) AND (indid in
(SELECT indid
FROM sysindexkeys
WHERE (id = a.id) AND (colid in
(SELECT colid
FROM syscolumns
WHERE (id = a.id) AND (name = a.name))))))) AND
(xtype = 'PK'))>0 then '√' else '' end) N'主键',
b.name N'类型',
a.length N'占用字节数',
COLUMNPROPERTY(a.id,a.name,'PRECISION') as N'长度',
isnull(COLUMNPROPERTY(a.id,a.name,'Scale'),0) as N'小数位数',
(case when a.isnullable=1 then '√'else '' end) N'允许空',
isnull(e.text,'') N'默认值',
isnull(g.[value],'') AS N'字段说明'
--into ##tx
FROM syscolumns a left join systypes b
on a.xtype=b.xusertype
inner join sysobjects d
on a.id=d.id and d.xtype='U' and d.name<>'dtproperties'
left join syscomments e
on a.cdefault=e.id
left join sysproperties g
on a.id=g.id AND a.colid = g.smallid
order by object_name(a.id),a.colorder
六、 时间格式转换问题
因为新开发的软件需要用一些旧软件生成的一些数据，在时间格式上不统一，只能手工转换，研究了一下午写了三条语句，以前没怎么用过convert函数和case语句，还有"+"操作符在不同上下文环境也会起到不同的作用，把我搞晕了要，不过现在看来是差不多弄好了。
1、把所有"70.07.06"这样的值变成"1970-07-06"
UPDATE lvshi
SET shengri = '19' + REPLACE(shengri, '.', '-')
WHERE (zhiyezheng = '139770070153')
2、在"1970-07-06"里提取"70","07","06"
SELECT SUBSTRING(shengri, 3, 2) AS year, SUBSTRING(shengri, 6, 2) AS month,
SUBSTRING(shengri, 9, 2) AS day
FROM lvshi
WHERE (zhiyezheng = '139770070153')
3、把一个时间类型字段转换成"1970-07-06"
UPDATE lvshi
SET shenling = CONVERT(varchar(4), YEAR(shenling))
+ '-' + CASE WHEN LEN(MONTH(shenling)) = 1 THEN '0' + CONVERT(varchar(2),
month(shenling)) ELSE CONVERT(varchar(2), month(shenling))
END + '-' + CASE WHEN LEN(day(shenling)) = 1 THEN '0' + CONVERT(char(2),
day(shenling)) ELSE CONVERT(varchar(2), day(shenling)) END
WHERE (zhiyezheng = '139770070153')
七、 分区视图
分区视图是提高查询性能的一个很好的办法
--看下面的示例
--示例表
create table tempdb.dbo.t_10(
id int primary key check(id between 1 and 10),name varchar(10))
create table pubs.dbo.t_20(
id int primary key check(id between 11 and 20),name varchar(10))
create table northwind.dbo.t_30(
id int primary key check(id between 21 and 30),name varchar(10))
go
--分区视图
create view v_t
as
select * from tempdb.dbo.t_10
union all
select * from pubs.dbo.t_20
union all
select * from northwind.dbo.t_30
go
--插入数据
insert v_t select 1 ,'aa'
union all select 2 ,'bb'
union all select 11,'cc'
union all select 12,'dd'
union all select 21,'ee'
union all select 22,'ff'
--更新数据
update v_t set name=name+'_更新' where right(id,1)=1
--删除测试
delete from v_t where right(id,1)=2
--显示结果
select * from v_t
go
--删除测试
drop table northwind.dbo.t_30,pubs.dbo.t_20,tempdb.dbo.t_10
drop view v_t
/**//*--测试结果
id name
----------- ----------
1 aa_更新
11 cc_更新
21 ee_更新
（所影响的行数为 3 行）
==*/
八、 树型的实现
--参考
--树形数据查询示例
--作者: 邹建
--示例数据
create table [tb]([id] int identity(1,1),[pid] int,name varchar(20))
insert [tb] select 0,'中国'
union all select 0,'美国'
union all select 0,'加拿大'
union all select 1,'北京'
union all select 1,'上海'
union all select 1,'江苏'
union all select 6,'苏州'
union all select 7,'常熟'
union all select 6,'南京'
union all select 6,'无锡'
union all select 2,'纽约'
union all select 2,'旧金山'
go
--查询指定id的所有子
create function f_cid(
@id int
)returns @re table([id] int,[level] int)
as
begin
declare @l int
set @l=0
insert @re select @id,@l
while @@rowcount>0
begin
set @l=@l+1
insert @re select a.[id],@l
from [tb] a,@re b
where a.[pid]=b.[id] and b.[level]=@l-1
end
/**//**//**//*--如果只显示最明细的子(下面没有子),则加上这个删除
delete a from @re a
where exists(
select 1 from [tb] where [pid]=a.[id])
--*/
return
end
go
--调用(查询所有的子)
select a.*,层次=b.[level] from [tb] a,f_cid(2)b where a.[id]=b.[id]
go
--删除测试
drop table [tb]
drop function f_cid
go
九、 排序问题
CREATE TABLE [t] (
[id] [int] IDENTITY (1, 1) NOT NULL ,
[GUID] [uniqueidentifier] NULL
) ON [PRIMARY]
GO
下面这句执行5次
insert t values (newid())
查看执行结果
select * from t
1、 第一种
select * from t
order by case id when 4 then 1
when 5 then 2
when 1 then 3
when 2 then 4
when 3 then 5 end
2、 第二种
select * from t order by (id+2)%6
3、 第三种
select * from t order by charindex(cast(id as varchar),'45123')
4、 第四种
select * from t
WHERE id between 0 and 5
order by charindex(cast(id as varchar),'45123')
5、 第五种
select * from t order by case when id >3 then id-5 else id end
6、 第六种
select * from t order by id / 4 desc,id asc
十、 一条语句删除一批记录
首先id列是int标识类类型，然后删除ID值为5,6,8,9,10,11的列，这里的cast函数不能用convert函数代替，而且转换的类型必须是varchar，而不能是char，否则就会执行出你不希望的结果，这里的"5,6,8,9,10,11"可以是你在页面上获取的一个chkboxlist构建成的值，然后用下面的一句就全部删
除了，比循环用多条语句高效吧应该。
delete from [fujian] where charindex(','+cast([id] as varchar)+',',','+'5,6,8,9,10,11,'+',')>0
还有一种就是
delete from table1 where id in(1,2,3,4
)
十一、获取子表内的一列数据的组合字符串
下面这个函数获取05年已经注册了的某个所的律师，唯一一个参数就是事务所的名称，然后返回zhuce字段里包含05字样的所有律师。
CREATE FUNCTION fn_Get05LvshiNameBySuo (@p_suo Nvarchar(50))
RETURNS Nvarchar(2000)
AS
BEGIN
DECLARE @LvshiNames varchar(2000), @name varchar(50)
select @LvshiNames=''
DECLARE lvshi_cursor CURSOR FOR
数据库里有1,2,3,4,5 共5条记录,要用一条sql语句让其排序,使它排列成4,5,1,2,3,怎么写?
--
数据操作
SELECT
--
从数据库表中检索数据行和列
INSERT
--
向数据库表添加新数据行
DELETE
--
从数据库表中删除数据行
UPDATE
--
更新数据库表中的数据
--
数据定义
CREATE
TABLE
--
创建一个数据库表
DROP
TABLE
--
从数据库中删除表
ALTER
TABLE
--
修改数据库表结构
CREATE
VIEW
--
创建一个视图
DROP
VIEW
--
从数据库中删除视图
CREATE
INDEX
--
为数据库表创建一个索引
DROP
INDEX
--
从数据库中删除索引
CREATE
PROCEDURE
--
创建一个存储过程
DROP
PROCEDURE
--
从数据库中删除存储过程
CREATE
TRIGGER
--
创建一个触发器
DROP
TRIGGER
--
从数据库中删除触发器
CREATE
SCHEMA
--
向数据库添加一个新模式
DROP
SCHEMA
--
从数据库中删除一个模式
CREATE
DOMAIN
--
创建一个数据值域
ALTER
DOMAIN
--
改变域定义
DROP
DOMAIN
--
从数据库中删除一个域
--
数据控制
GRANT
--
授予用户访问权限
DENY
--
拒绝用户访问
REVOKE
--
解除用户访问权限
--
事务控制
COMMIT
--
结束当前事务
ROLLBACK
--
中止当前事务
SET
TRANSACTION
--
定义当前事务数据访问特征
--
程序化SQL
DECLARE
--
为查询设定游标
EXPLAN
--
为查询描述数据访问计划
OPEN
--
检索查询结果打开一个游标
FETCH
--
检索一行查询结果
CLOSE
--
关闭游标
PREPARE
--
为动态执行准备SQL 语句
EXECUTE
--
动态地执行SQL 语句
DESCRIBE
--
描述准备好的查询
--
-局部变量
declare
@id
char
(
10
)
--
set @id = '10010001'
select
@id
=
'
10010001
'
--
-全局变量
--
-必须以@@开头
--
IF ELSE
declare
@x
int
@y
int
@z
int
select
@x
=
1
@y
=
2
@z
=
3
if
@x
>
@y
print
'
x > y
'
--
打印字符串'x > y'
else
if
@y
>
@z
print
'
y > z
'
else
print
'
z > y
'
--
CASE
use
pangu
update
employee
set
e_wage
=
case
when
job_level
=
’
1
’
then
e_wage
*
1.08
when
job_level
=
’
2
’
then
e_wage
*
1.07
when
job_level
=
’
3
’
then
e_wage
*
1.06
else
e_wage
*
1.05
end
--
WHILE CONTINUE BREAK
declare
@x
int
@y
int
@c
int
select
@x
=
1
@y
=
1
while
@x
<
3
begin
print
@x
--
打印变量x 的值
while
@y
<
3
begin
select
@c
=
100
*
@x
+
@y
print
@c
--
打印变量c 的值
select
@y
=
@y
+
1
end
select
@x
=
@x
+
1
select
@y
=
1
end
--
WAITFOR
--
例 等待1 小时2 分零3 秒后才执行SELECT 语句
waitfor
delay ’
01
:
02
:
03
’
select
*
from
employee
--
例 等到晚上11 点零8 分后才执行SELECT 语句
waitfor
time ’
23
:
08
:
00
’
SELECT
select
*
(列名)
from
table_name(表名)
where
column_name operator value ex宿主)
select
*
from
stock_information
where
stockid
=
str
(nid) stockname
=
'
str_name
'
stockname
like
'
% find this %
'
stockname
like
'
[a-zA-Z]%
'
--
------- ([]指定值的范围)
stockname
like
'
[^F-M]%
'
--
------- (^排除指定范围)
--
------- 只能在使用like关键字的where子句中使用通配符)
or
stockpath
=
'
stock_path
'
or
stocknumber
<
1000
and
stockindex
=
24
not
stocksex
=
'
man
'
stocknumber
between
20
and
100
stocknumber
in
(
10
,
20
,
30
)
order
by
stockid
desc
(
asc
)
--
------- 排序，desc-降序，asc-升序
order
by
1
,
2
--
------- by列号
stockname
=
(
select
stockname
from
stock_information
where
stockid
=
4
)
--
------- 子查询
--
------- 除非能确保内层select只返回一个行的值
--
------- 否则应在外层where子句中用一个in限定符
select
distinct
column_name form table_name
--
------- distinct指定检索独有的列值，不重复
select
stocknumber ,"stocknumber
+
10
"
=
stocknumber
+
10
from
table_name
select
stockname , "stocknumber"
=
count
(
*
)
from
table_name
group
by
stockname
--
------- group by 将表按行分组,指定列中有相同的值
having
count
(
*
)
=
2
--
------- having选定指定的组
select
*
from
table1, table2
where
table1.id
*=
table2.id
--
------ 左外部连接，table1中有的而table2中没有得以null表示
table1.id
=*
table2.id
--
------ 右外部连接
select
stockname
from
table1
union
[
all
]
--
------ union合并查询结果集，all-保留重复行
select
stockname
from
table2
insert
insert
into
table_name (Stock_name,Stock_number) value ("xxx","xxxx" value (
select
Stockname , Stocknumber
from
Stock_table2)
--
-----value为select语句
update
update
table_name
set
Stockname
=
"xxx"
[
where Stockid = 3
]
Stockname
=
default
Stockname
=
null
Stocknumber
=
Stockname
+
4
delete
delete
from
table_name
where
Stockid
=
3
truncate
table_name
--
------- 删除表中所有行，仍保持表的完整性
drop
table
table_name
--
------- 完全删除表
alter
table
--
------ 修改数据库表结构
alter
table
database
.owner.table_name
add
column_name
char
(
2
)
null
.. sp_help table_name
--
------ 显示表已有特征
create
table
table_name (name
char
(
20
), age
smallint
, lname
varchar
(
30
))
insert
into
table_name
select
--
------ 实现删除列的方法（创建新表）
alter
table
table_name
drop
constraint
Stockname_default
--
------- 删除Stockname的default约束
常用函数(
function
) 转换函数
convert
(数据类型,值,格式) 统计函数
AVG
--
求平均值
COUNT
--
统计数目
MAX
--
求最大值
MIN
--
求最小值
SUM
--
求和
AVG
use
pangu
select
avg
(e_wage)
as
dept_avgWage
from
employee
group
by
dept_id
MAX
--
求工资最高的员工姓名
use
pangu
select
e_name
from
employee
where
e_wage
=
(
select
max
(e_wage)
from
employee)
STDEV
()
--
STDEV()函数返回表达式中所有数据的标准差
--
STDEVP()
--
STDEVP()函数返回总体标准差
VAR
()
--
VAR()函数返回表达式中所有值的统计变异数
VARP
()
--
VARP()函数返回总体变异数
算术函数 三角函数
SIN
(float_expression)
--
返回以弧度表示的角的正弦
COS
(float_expression)
--
返回以弧度表示的角的余弦
TAN
(float_expression)
--
返回以弧度表示的角的正切
COT
(float_expression)
--
返回以弧度表示的角的余切
反三角函数
ASIN
(float_expression)
--
返回正弦是FLOAT 值的以弧度表示的角
ACOS
(float_expression)
--
返回余弦是FLOAT 值的以弧度表示的角
ATAN
(float_expression)
--
返回正切是FLOAT 值的以弧度表示的角
ATAN2(float_expression1,float_expression2)
--
----返回正切是float_expression1 /float_expres-sion2的以弧度表示的角
DEGREES
(numeric_expression)
--
----把弧度转换为角度返回与表达式相同的数据类型可为
--
----INTEGER/MONEY/REAL/FLOAT 类型
RADIANS
(numeric_expression)
--
----把角度转换为弧度返回与表达式相同的数据类型可为
--
----INTEGER/MONEY/REAL/FLOAT 类型
EXP
(float_expression)
--
返回表达式的指数值
LOG
(float_expression)
--
返回表达式的自然对数值
LOG10
(float_expression)
--
返回表达式的以10 为底的对数值
SQRT
(float_expression)
--
返回表达式的平方根
取近似值函数
CEILING
(numeric_expression)
--
-----返回>=表达式的最小整数返回的数据类型与表达式相同可为
--
-----INTEGER/MONEY/REAL/FLOAT 类型
FLOOR
(numeric_expression)
--
-----返回<=表达式的最小整数返回的数据类型与表达式相同可为
--
-----INTEGER/MONEY/REAL/FLOAT 类型
ROUND
(numeric_expression)
--
-----返回以integer_expression 为精度的四舍五入值返回的数据
--
-----类型与表达式相同可为INTEGER/MONEY/REAL/FLOAT 类型
ABS
(numeric_expression)
--
-----返回表达式的绝对值返回的数据类型与表达式相同可为
--
-----INTEGER/MONEY/REAL/FLOAT 类型
SIGN
(numeric_expression)
--
-----测试参数的正负号返回0 零值1 正数或-1 负数返回的数据类型
--
-----与表达式相同可为INTEGER/MONEY/REAL/FLOAT 类型
PI
()
--
-----返回值为π 即3.1415926535897936
RAND
(
[
integer_expression
]
)
--
-----用任选的[integer_expression]做种子值得出0-1 间的随机浮点数
字符串函数
ASCII
()
--
----函数返回字符表达式最左端字符的ASCII 码值
CHAR
()
--
----函数用于将ASCII 码转换为字符
--
----如果没有输入0 ~ 255 之间的ASCII 码值CHAR 函数会返回一个NULL 值
LOWER
()
--
----函数把字符串全部转换为小写
UPPER
()
--
----函数把字符串全部转换为大写
STR
()
--
----函数把数值型数据转换为字符型数据
LTRIM
()
--
----函数把字符串头部的空格去掉
RTRIM
()
--
----函数把字符串尾部的空格去掉
LEFT
(),
RIGHT
(),
SUBSTRING
()
--
函数返回部分字符串
CHARINDEX
(),
PATINDEX
()
--
函数返回字符串中某个指定的子串出现的开始位置
SOUNDEX
()
--
----函数返回一个四位字符码
--
----SOUNDEX函数可用来查找声音相似的字符串但SOUNDEX函数对数字和汉字均只返回0 值
DIFFERENCE
()
--
----函数返回由SOUNDEX 函数返回的两个字符表达式的值的差异
--
----0 两个SOUNDEX 函数返回值的第一个字符不同
--
----1 两个SOUNDEX 函数返回值的第一个字符相同
--
----2 两个SOUNDEX 函数返回值的第一二个字符相同
--
----3 两个SOUNDEX 函数返回值的第一二三个字符相同
--
----4 两个SOUNDEX 函数返回值完全相同同
QUOTENAME
()
--
----函数返回被特定字符括起来的字符串
/**/
/*select quotename('abc', '{') quotename('abc') 
运行结果如下 { 
{abc} [abc]*/
REPLICATE
()
--
----函数返回一个重复character_expression 指定次数的字符串
/**/
/*select replicate('abc', 3) replicate( 'abc', -2) 运行结果如下 abcabcabc NULL*/
REVERSE
()
--
----函数将指定的字符串的字符排列顺序颠倒
REPLACE
()
--
----函数返回被替换了指定子串的字符串
/**/
/*select replace('abc123g', '123', 'def') 运行结果如下 abcdefg*/
SPACE
()
--
----函数返回一个有指定长度的空白字符串
STUFF
()
--
----函数用另一子串替换字符串指定位置长度的子串
数据类型转换函数
CAST
() 函数语法如下
CAST
() (
AS
[
length
]
)
CONVERT
() 函数语法如下
CONVERT
() (
[
length
]
,
[
, style
]
)
select
cast
(
100
+
99
as
char
)
convert
(
varchar
(
12
),
getdate
()) 运行结果如下
199
Jan
15
2000
日期函数
DAY
()
--
----函数返回date_expression 中的日期值
MONTH
()
--
----函数返回date_expression 中的月份值
YEAR
()
--
----函数返回date_expression 中的年份值
DATEADD
( , ,)
--
---函数返回指定日期date 加上指定的额外日期间隔number 产生的新日期
DATEDIFF
( , ,)
--
---函数返回两个指定日期在datepart 方面的不同之处
DATENAME
( ,
--
----函数以字符串的形式返回日期的指定部分
DATEPART
( ,
--
----函数以整数值的形式返回日期的指定部分
GETDATE
()
--
----函数以DATETIME 的缺省格式返回系统当前的日期和时间
系统函数
APP_NAME
()
--
----函数返回当前执行的应用程序的名称
COALESCE
()
--
---函数返回众多表达式中第一个非NULL 表达式的值
COL_LENGTH
(
<
'
table_name
'
>
,
<
'
column_name
'
>
--
--函数返回表中指定字段的长度值
COL_NAME
(,
--
--函数返回表中指定字段的名称即列名
DATALENGTH
()
--
---函数返回数据表达式的数据的实际长度
DB_ID
(
[
'database_name'
]
)
--
----函数返回数据库的编号
DB_NAME
(database_id)
--
----函数返回数据库的名称
HOST_ID
()
--
---函数返回服务器端计算机的名称
HOST_NAME
()
--
---函数返回服务器端计算机的名称
IDENTITY
(
[
, seed increment
]
)
[
AS column_name
]
)
--
IDENTITY() 函数只在SELECT INTO 语句中使用用于插入一个identity column列到新表中
/**/
/*select identity(int, 1, 1) as column_name into newtable from oldtable*/
ISDATE
()
--
--函数判断所给定的表达式是否为合理日期
ISNULL
(,
--
函数将表达式中的NULL 值用指定值替换
ISNUMERIC
()
--
--函数判断所给定的表达式是否为合理的数值
NEWID
()
--
--函数返回一个UNIQUEIDENTIFIER 类型的数值
NULLIF
(,
--
--NULLIF 函数在expression1 与expression2 相等时返回NULL 值若不相等时则返回xpression1 的值
*******************
Transact_SQL
********************
--
语 句 功 能
--
数据操作
SELECT
--
从数据库表中检索数据行和列
INSERT
--
向数据库表添加新数据行
DELETE
--
从数据库表中删除数据行
UPDATE
--
更新数据库表中的数据
--
数据定义
CREATE
TABLE
--
创建一个数据库表
DROP
TABLE
--
从数据库中删除表
ALTER
TABLE
--
修改数据库表结构
CREATE
VIEW
--
创建一个视图
DROP
VIEW
--
从数据库中删除视图
CREATE
INDEX
--
为数据库表创建一个索引
DROP
INDEX
--
从数据库中删除索引
CREATE
PROCEDURE
--
创建一个存储过程
DROP
PROCEDURE
--
从数据库中删除存储过程
CREATE
TRIGGER
--
创建一个触发器
DROP
TRIGGER
--
从数据库中删除触发器
CREATE
SCHEMA
--
向数据库添加一个新模式
DROP
SCHEMA
--
从数据库中删除一个模式
CREATE
DOMAIN
--
创建一个数据值域
ALTER
DOMAIN
--
改变域定义
DROP
DOMAIN
--
从数据库中删除一个域
--
数据控制
GRANT
--
授予用户访问权限
DENY
--
拒绝用户访问
REVOKE
--
解除用户访问权限
--
事务控制
COMMIT
--
结束当前事务
ROLLBACK
--
中止当前事务
SET
TRANSACTION
--
定义当前事务数据访问特征
--
程序化SQL
DECLARE
--
为查询设定游标
EXPLAN
--
为查询描述数据访问计划
OPEN
--
检索查询结果打开一个游标
FETCH
--
检索一行查询结果
CLOSE
--
关闭游标
PREPARE
--
为动态执行准备SQL 语句
EXECUTE
--
动态地执行SQL 语句
DESCRIBE
--
描述准备好的查询
--
-局部变量
declare
@id
char
(
10
)
--
set @id = '10010001'
select
@id
=
'
10010001
'
--
-全局变量
--
-必须以@@开头
--
IF ELSE
declare
@x
int
@y
int
@z
int
select
@x
=
1
@y
=
2
@z
=
3
if
@x
>
@y
print
'
x > y
'
--
打印字符串'x > y'
else
if
@y
>
@z
print
'
y > z
'
else
print
'
z > y
'
--
CASE
use
pangu
update
employee
set
e_wage
=
case
when
job_level
=
’
1
’
then
e_wage
*
1.08
when
job_level
=
’
2
’
then
e_wage
*
1.07
when
job_level
=
’
3
’
then
e_wage
*
1.06
else
e_wage
*
1.05
end
--
WHILE CONTINUE BREAK
declare
@x
int
@y
int
@c
int
select
@x
=
1
@y
=
1
while
@x
<
3
begin
print
@x
--
打印变量x 的值
while
@y
<
3
begin
select
@c
=
100
*
@x
+
@y
print
@c
--
打印变量c 的值
select
@y
=
@y
+
1
end
select
@x
=
@x
+
1
select
@y
=
1
end
--
WAITFOR
--
例 等待1 小时2 分零3 秒后才执行SELECT 语句
waitfor
delay ’
01
:
02
:
03
’
select
*
from
employee
--
例 等到晚上11 点零8 分后才执行SELECT 语句
waitfor
time ’
23
:
08
:
00
’
select
*
from
employee
***
SELECT
***
select
*
(列名)
from
table_name(表名)
where
column_name operator value ex:(宿主)
select
*
from
stock_information
where
stockid
=
str
(nid) stockname
=
'
str_name
'
stockname
like
'
% find this %
'
stockname
like
'
[a-zA-Z]%
'
--
------- ([]指定值的范围)
stockname
like
'
[^F-M]%
'
--
------- (^排除指定范围)
--
------- 只能在使用like关键字的where子句中使用通配符)
or
stockpath
=
'
stock_path
'
or
stocknumber
<
1000
and
stockindex
=
24
not
stocksex
=
'
man
'
stocknumber
between
20
and
100
stocknumber
in
(
10
,
20
,
30
)
order
by
stockid
desc
(
asc
)
--
------- 排序，desc-降序，asc-升序
order
by
1
,
2
--
------- by列号
stockname
=
(
select
stockname
from
stock_information
where
stockid
=
4
)
--
------- 子查询
--
------- 除非能确保内层select只返回一个行的值，
--
------- 否则应在外层where子句中用一个in限定符
select
distinct
column_name form table_name
--
------- distinct指定检索独有的列值，不重复
select
stocknumber ,"stocknumber
+
10
"
=
stocknumber
+
10
from
table_name
select
stockname , "stocknumber"
=
count
(
*
)
from
table_name
group
by
stockname
--
------- group by 将表按行分组,指定列中有相同的值
having
count
(
*
)
=
2
--
------- having选定指定的组
select
*
from
table1, table2
where
table1.id
*=
table2.id
--
------ 左外部连接，table1中有的而table2中没有得以null表示
table1.id
=*
table2.id
--
------ 右外部连接
select
stockname
from
table1
union
[
all
]
--
--- union合并查询结果集，all-保留重复行
select
stockname
from
table2
***
insert
***
insert
into
table_name (Stock_name,Stock_number) value ("xxx","xxxx") value (
select
Stockname , Stocknumber
from
Stock_table2)
--
-value为select语句
***
update
***
update
table_name
set
Stockname
=
"xxx"
[
where Stockid = 3
]
Stockname
=
default
Stockname
=
null
Stocknumber
=
Stockname
+
4
***
delete
***
delete
from
table_name
where
Stockid
=
3
truncate
table_name
--
--------- 删除表中所有行，仍保持表的完整性
drop
table
table_name
--
------------- 完全删除表
***
alter
table
***
--
- 修改数据库表结构
alter
table
database
.owner.table_name
add
column_name
char
(
2
)
null
.. sp_help table_name
--
-- 显示表已有特征
create
table
table_name (name
char
(
20
), age
smallint
, lname
varchar
(
30
))
insert
into
table_name
select
--
--- 实现删除列的方法（创建新表）
alter
table
table_name
drop
constraint
Stockname_default
--
-- 删除Stockname的default约束
***
function
(
/*常用函数*/
)
***
--
--统计函数----
AVG
--
求平均值
COUNT
--
统计数目
MAX
--
求最大值
MIN
--
求最小值
SUM
--
求和
--
AVG
use
pangu
select
avg
(e_wage)
as
dept_avgWage
from
employee
group
by
dept_id
--
MAX
--
求工资最高的员工姓名
use
pangu
select
e_name
from
employee
where
e_wage
=
(
select
max
(e_wage)
from
employee)
--
STDEV()
--
STDEV()函数返回表达式中所有数据的标准差
--
STDEVP()
--
STDEVP()函数返回总体标准差
--
VAR()
--
VAR()函数返回表达式中所有值的统计变异数
--
VARP()
--
VARP()函数返回总体变异数
--
--算术函数----
/***三角函数***/
SIN
(float_expression)
--
返回以弧度表示的角的正弦
COS
(float_expression)
--
返回以弧度表示的角的余弦
TAN
(float_expression)
--
返回以弧度表示的角的正切
COT
(float_expression)
--
返回以弧度表示的角的余切
/***反三角函数***/
ASIN
(float_expression)
--
返回正弦是FLOAT 值的以弧度表示的角
ACOS
(float_expression)
--
返回余弦是FLOAT 值的以弧度表示的角
ATAN
(float_expression)
--
返回正切是FLOAT 值的以弧度表示的角
ATAN2(float_expression1,float_expression2)
--
返回正切是float_expression1 /float_expres-sion2的以弧度表示的角
DEGREES
(numeric_expression)
--
把弧度转换为角度返回与表达式相同的数据类型可为
--
INTEGER/MONEY/REAL/FLOAT 类型
RADIANS
(numeric_expression)
--
把角度转换为弧度返回与表达式相同的数据类型可为
--
INTEGER/MONEY/REAL/FLOAT 类型
EXP
(float_expression)
--
返回表达式的指数值
LOG
(float_expression)
--
返回表达式的自然对数值
LOG10
(float_expression)
--
返回表达式的以10 为底的对数值
SQRT
(float_expression)
--
返回表达式的平方根
/***取近似值函数***/
CEILING
(numeric_expression)
--
返回>=表达式的最小整数返回的数据类型与表达式相同可为
--
INTEGER/MONEY/REAL/FLOAT 类型
FLOOR
(numeric_expression)
--
返回<=表达式的最小整数返回的数据类型与表达式相同可为
--
INTEGER/MONEY/REAL/FLOAT 类型
ROUND
(numeric_expression)
--
返回以integer_expression 为精度的四舍五入值返回的数据
--
类型与表达式相同可为INTEGER/MONEY/REAL/FLOAT 类型
ABS
(numeric_expression)
--
返回表达式的绝对值返回的数据类型与表达式相同可为
--
INTEGER/MONEY/REAL/FLOAT 类型
SIGN
(numeric_expression)
--
测试参数的正负号返回0 零值1 正数或-1 负数返回的数据类型
--
与表达式相同可为INTEGER/MONEY/REAL/FLOAT 类型
PI
()
--
返回值为π 即3.1415926535897936
RAND
(
[
integer_expression
]
)
--
用任选的[integer_expression]做种子值得出0-1 间的随机浮点数
--
--字符串函数----
ASCII
()
--
函数返回字符表达式最左端字符的ASCII 码值
CHAR
()
--
函数用于将ASCII 码转换为字符
--
如果没有输入0 ~ 255 之间的ASCII 码值CHAR 函数会返回一个NULL 值
LOWER
()
--
函数把字符串全部转换为小写
UPPER
()
--
函数把字符串全部转换为大写
STR
()
--
函数把数值型数据转换为字符型数据
LTRIM
()
--
函数把字符串头部的空格去掉
RTRIM
()
--
函数把字符串尾部的空格去掉
LEFT
(),
RIGHT
(),
SUBSTRING
()
--
函数返回部分字符串
CHARINDEX
(),
PATINDEX
()
--
函数返回字符串中某个指定的子串出现的开始位置
SOUNDEX
()
--
函数返回一个四位字符码
--
SOUNDEX函数可用来查找声音相似的字符串但SOUNDEX函数对数字和汉字均只返回0 值
DIFFERENCE
()
--
函数返回由SOUNDEX 函数返回的两个字符表达式的值的差异
--
0 两个SOUNDEX 函数返回值的第一个字符不同
--
1 两个SOUNDEX 函数返回值的第一个字符相同
--
2 两个SOUNDEX 函数返回值的第一二个字符相同
--
3 两个SOUNDEX 函数返回值的第一二三个字符相同
--
4 两个SOUNDEX 函数返回值完全相同
QUOTENAME
()
--
函数返回被特定字符括起来的字符串
/*select quotename('abc', '{') quotename('abc')运行结果如下----------------------------------{{abc} [abc]*/
REPLICATE
()
--
函数返回一个重复character_expression 指定次数的字符串
/*select replicate('abc', 3) replicate( 'abc', -2)运行结果如下----------- -----------abcabcabc NULL*/
REVERSE
()
--
函数将指定的字符串的字符排列顺序颠倒
REPLACE
()
--
函数返回被替换了指定子串的字符串
/*select replace('abc123g', '123', 'def')运行结果如下----------- -----------abcdefg*/
SPACE
()
--
函数返回一个有指定长度的空白字符串
STUFF
()
--
函数用另一子串替换字符串指定位置长度的子串
--
--数据类型转换函数----
CAST
() 函数语法如下
CAST
() (
<
expression
>
AS
<
data_ type
>
[
length
]
)
CONVERT
() 函数语法如下
CONVERT
() (
<
data_ type
>
[
length
]
,
<
expression
>
[
, style
]
)
select
cast
(
100
+
99
as
char
)
convert
(
varchar
(
12
),
getdate
())运行结果如下
--
---------------------------- ------------
199
Jan
15
2000
--
--日期函数----
DAY
()
--
函数返回date_expression 中的日期值
MONTH
()
--
函数返回date_expression 中的月份值
YEAR
()
--
函数返回date_expression 中的年份值
DATEADD
(
<
datepart
>
,
<
number
>
,
<
date
>
)
--
函数返回指定日期date 加上指定的额外日期间隔number 产生的新日期
DATEDIFF
(
<
datepart
>
,
<
number
>
,
<
date
>
)
--
函数返回两个指定日期在datepart 方面的不同之处
DATENAME
(
<
datepart
>
,
<
date
>
)
--
函数以字符串的形式返回日期的指定部分
DATEPART
(
<
datepart
>
,
<
date
>
)
--
函数以整数值的形式返回日期的指定部分
GETDATE
()
--
函数以DATETIME 的缺省格式返回系统当前的日期和时间
--
--系统函数----
APP_NAME
()
--
函数返回当前执行的应用程序的名称
COALESCE
()
--
函数返回众多表达式中第一个非NULL 表达式的值
COL_LENGTH
(
<
'
table_name
'
>
,
<
'
column_name
'
>
)
--
函数返回表中指定字段的长度值
COL_NAME
(
<
table_id
>
,
<
column_id
>
)
--
函数返回表中指定字段的名称即列名
DATALENGTH
()
--
函数返回数据表达式的数据的实际长度
DB_ID
(
[
'database_name'
]
)
--
函数返回数据库的编号
DB_NAME
(database_id)
--
函数返回数据库的名称
HOST_ID
()
--
函数返回服务器端计算机的名称
HOST_NAME
()
--
函数返回服务器端计算机的名称
IDENTITY
(
<
data_type
>
[
, seed increment
]
)
[
AS column_name
]
)
--
IDENTITY() 函数只在SELECT INTO 语句中使用用于插入一个identity column列到新表中
/*select identity(int, 1, 1) as column_name into newtable from oldtable*/
ISDATE
()
--
函数判断所给定的表达式是否为合理日期
ISNULL
(
<
check_expression
>
,
<
replacement_value
>
)
--
函数将表达式中的NULL 值用指定值替换
ISNUMERIC
()
--
函数判断所给定的表达式是否为合理的数值
NEWID
()
--
函数返回一个UNIQUEIDENTIFIER 类型的数值
NULLIF
(
<
expression1
>
,
<
expression2
>
)
--
NULLIF 函数在expression1 与expression2 相等时返回NULL 值若不相等时则返回expression1 的值
'定义数据库连接的一些常量
Const adOpenForwardOnly = 0 '游标只向前浏览记录，不支持分页、Recordset、BookMark
Const adOpenKeyset = 1 '键集游标，其他用户对记录说做的修改将反映到记录集中，但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark
Const adOpenDynamic = 2 '动态游标功能最强，但耗资源也最多。用户对记录说做的修改，增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。
Const adOpenStatic = 3 '静态游标，只是数据的一个快照，用户对记录说做的修改，增加或删除记录都不会反映到记录集中。支持向前或向后移动
Const adLockReadOnly = 1 '锁定类型，默认的，只读，不能作任何修改
Const adLockPessimistic = 2 '当编辑时立即锁定记录，最安全的方式
Const adLockOptimistic = 3 '只有在调用Update方法时才锁定记录集，而在此前的其他操作仍可对当前记录进行更改、插入和删除等
Const adLockBatchOptimistic = 4 '当编辑时记录不会被锁定，而更改、插入和删除是在批处理方式下完成的
Const adCmdText = &H0001
Const adCmdTable = &H0002
%>
11.ACCESS数据库连接:
<%
option explicit
dim startime,endtime,conn,connstr,db
startime=timer()
'更改数据库名字
db={DATABASE_NAME}
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'如果你的服务器采用较老版本Access驱动，请用下面连接方法
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr
function CloseDatabase
Conn.close
Set conn = Nothing
End Function
%>
12.SQL数据库连接:
<%
option explicit
dim startime,endtime,conn,connstr,db
startime=timer()
connstr="driver={SQL Server};server=服务器名称;uid=数据库用户名称;pwd=数据库用户密码;database=数据库名称"
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr
function CloseDatabase
Conn.close
Set conn = Nothing
End Function
%>
1.rs.open后的参数意义
RS.OPEN SQL,CONN,A,B
A: ADOPENFORWARDONLY(=0) 只读,且当前数据记录只能向下移动
ADOPENSTATIC(=3) 只读,当前数据记录可自由移动
ADOPENKEYSET(=1) 可读写,当前数据记录可自由移动
ADOPENDYNAMIC(=2) 可读写,当前数据记录可自由移动,可看到新增记录
B: ADLOCKREADONLY(=1) 默认值,用来打开只读记录
ADLOCKPESSIMISTIC(=2) 悲观锁定
ADLOCKOPTIMISTIC(=3) 乐观锁定
ADLOCKBATCHOPTIMISTIC(=4) 批次乐观锁定
4.判断SQL语句是否执行成功？
利用err对象就可以了。
sql="insert into table(f1,f2) values('v1','v2')"
conn.execute sql
if err.number0 then
response.write "出错了："& err.description err.clear
else
response.write "OK"
end if
建表格：
语法：
Create TABLE table_name(
column1 DATATYPE [NOT NULL] [NOT NULL PRIMARY KEY],
column2 DATATYPE [NOT NULL],
...）
说明
DATATYPE --是资料的格式，详见表。
NUT NULL --可不可以允许资料有空的（尚未有资料填入）。
PRIMARY KEY --是本表的主键。
更改表格
Alter TABLE table_name
ADD COLUMN column_name DATATYPE
说明 增加一个栏位（没有删除某个栏位的语法）
Alter TABLE table_name
ADD PRIMARY KEY (column_name)
说明 更改表得的定义把某个栏位设为主键
Alter TABLE table_name
Drop PRIMARY KEY (column_name)
说明 把主键的定义删除。
建立索引
Create INDEX index_name ON table_name (column_name)
说明 对某个表格的栏位建立索引以增加查询时的速度
删除
Drop table_name
Drop index_name
资料形态 DATATYPE
ＳＱＬ 的资料形态 DATATYPEs
smallint
16 位元的整数
interger
32 位元的整数
decimal(p,s)
p 精确值和 s 大小的十进位整数，精确值 p 是指全部有几个数(digits)
大小值 s 是指小数点後有几位数。
如果没有特别指定，则系 统会设为 p=5; s=0 。
float
32位元的实数
double
64位元的实数
char(n)
n 长度的字串，n不能超过 254
varchar(n)
长度不固定且其最大长度为 n 的字串，n不能超过 4000
graphic(n)
和 char(n) 一样，不过其单位是两个字元 double-bytes， n不能超过 127。这个形态是为了支援两个字元长度的字体，例如中文字
vargraphic(n)
可变长度且其最大长度为 n 的双字元字串，n不能超过 2000
date
包含了 年份、月份、日期.
time
包含了 小时、分钟、秒.
timestamp
包含了 年、月、日、时、分、秒、千分之一秒.
资料操作 ＤＭＬ （Data Manipulation Language)
资料定义好之後接下来的就是资料的操作。资料的操作不外乎增加资料（insert)、 查询资料（query）、更改资料（update) 、删除资料（delete）四种模式，以下分别介绍他们的语法：
增加资料：
Insert INTO table_name (column1,column2,...) valueS ( value1,value2, ...)
说明：
1.若没有指定column 系统则会按表格内的栏位顺序填入资料
2.栏位的资料形态和所填入的资料必须吻合
3.table_name 也可以是景观 view_name
Insert INTO table_name (column1,column2,...) Select columnx,columny,... FROM another_table
说明：也可以经过一个子查询（subquery）把别的表格的资料填入
查询资料：
基本查询
Select column1,columns2,... FROM table_name
说明：把table_name 的特定栏位资料全部列出来
Select *
FROM table_name
Where column1 = ***
[AND column2 > yyy] [OR column3 <> zzz]
说明：
1.'*'表示全部的栏位都列出来
2.Where 之後是接条件式，把符合条件的资料列出来
Select column1,column2
FROM table_name
orDER BY column2 [DESC]
说明：
orDER BY 是指定以某个栏位做排序，[DESC]是指从大到小排列，若
没有指明，则是从小到大排列
组合查询
组合查询是指所查询得资料来源并不只有单一的表格，而是联合一个以上的表格才能够得到结果的。
Select *
FROM table1,table2
Where table1.colum1=table2.column1
说明：
1.查询两个表格中其中 column1 值相同的资料
2.当然两个表格相互比较的栏位，其资料形态必须相同
3.一个复杂的查询其动用到的表格可能会很多个
整合性的查询：
Select COUNT (*)
FROM table_name
Where column_name = ***
说明：
查询符合条件的资料共有几笔
Select SUM(column1)
FROM table_name
说明：
1.计算出总和，所选的栏位必须是可数的数字形态
2.除此以外还有 AVG() 是计算平均、MAX()、MIN()
计算最大最小值的整合性查询
Select column1,AVG(column2)
FROM table_name
GROUP BY column1
HAVING AVG(column2) > ***
说明：
1.GROUP BY: 以column1 为一组计算 column2 的平均值
必须和 AVG、SUM 等整合性查询的关键字一起使用
2.HAVING : 必须和 GROUP BY 一起使用作为整合性的限制
复合性的查询
Select *
FROM table_name1
Where EXISTS (
Select *
FROM table_name2
Where conditions )
说明：
1.Where 的 conditions 可以是另外一个的 query
2.EXISTS 在此是指存在与否
Select *
FROM table_name1
Where column1 IN (
Select column1
FROM table_name2
Where conditions )
说明
1. IN 後面接的是一个集合，表示column1 存在集合里面
2. Select 出来的资料形态必须符合 column1
其他查询
Select *
FROM table_name1
Where column1 LIKE 'x%'
说明：
1.LIKE 必须和後面的'x%' 相呼应表示以 x为开头的字串
Select *
FROM table_name1
Where column1 IN ('***','yyy',..)
说明
1. IN 後面接的是一个集合，表示column1 存在集合里面
Select *
FROM table_name1
Where column1 BETWEEN xx AND yy
说明
1. BETWEEN 表示 column1 的值介於 xx 和 yy 之间
更改资料：
Update table_name
SET column1='***'
Where conditoins
说明：
1.更改某个栏位设定其值为'***'
2.conditions 是所要符合的条件、若没有 Where 则
整个 table 的那个栏位都会全部被更改
删除资料：
Delete FROM table_name
Where conditions
说明：删除符合条件的资料
建表格：
语法：
Create TABLE table_name(
column1 DATATYPE [NOT NULL] [NOT NULL PRIMARY KEY],
column2 DATATYPE [NOT NULL],
...）
说明
DATATYPE --是资料的格式，详见表。
NUT NULL --可不可以允许资料有空的（尚未有资料填入）。
PRIMARY KEY --是本表的主键。
更改表格
Alter TABLE table_name
ADD COLUMN column_name DATATYPE
说明 增加一个栏位（没有删除某个栏位的语法）
Alter TABLE table_name
ADD PRIMARY KEY (column_name)
说明 更改表得的定义把某个栏位设为主键
Alter TABLE table_name
Drop PRIMARY KEY (column_name)
说明 把主键的定义删除。
建立索引
Create INDEX index_name ON table_name (column_name)
说明 对某个表格的栏位建立索引以增加查询时的速度
删除
Drop table_name
Drop index_name
资料形态 DATATYPE
ＳＱＬ 的资料形态 DATATYPEs
smallint
16 位元的整数
interger
32 位元的整数
decimal(p,s)
p 精确值和 s 大小的十进位整数，精确值 p 是指全部有几个数(digits)
大小值 s 是指小数点後有几位数。
如果没有特别指定，则系 统会设为 p=5; s=0 。
float
32位元的实数
double
64位元的实数
char(n)
n 长度的字串，n不能超过 254
varchar(n)
长度不固定且其最大长度为 n 的字串，n不能超过 4000
graphic(n)
和 char(n) 一样，不过其单位是两个字元 double-bytes， n不能超过 127。这个形态是为了支援两个字元长度的字体，例如中文字
vargraphic(n)
可变长度且其最大长度为 n 的双字元字串，n不能超过 2000
date
包含了 年份、月份、日期.
time
包含了 小时、分钟、秒.
timestamp
包含了 年、月、日、时、分、秒、千分之一秒.
资料操作 ＤＭＬ （Data Manipulation Language)
资料定义好之後接下来的就是资料的操作。资料的操作不外乎增加资料（insert)、 查询资料（query）、更改资料（update) 、删除资料（delete）四种模式，以下分别介绍他们的语法：
增加资料：
Insert INTO table_name (column1,column2,...) valueS ( value1,value2, ...)
说明：
1.若没有指定column 系统则会按表格内的栏位顺序填入资料
2.栏位的资料形态和所填入的资料必须吻合
3.table_name 也可以是景观 view_name
Insert INTO table_name (column1,column2,...) Select columnx,columny,... FROM another_table
说明：也可以经过一个子查询（subquery）把别的表格的资料填入
查询资料：
基本查询
Select column1,columns2,... FROM table_name
说明：把table_name 的特定栏位资料全部列出来
Select *
FROM table_name
Where column1 = ***
[AND column2 > yyy] [OR column3 <> zzz]
说明：
1.'*'表示全部的栏位都列出来
2.Where 之後是接条件式，把符合条件的资料列出来
Select column1,column2
FROM table_name
orDER BY column2 [DESC]
说明：
orDER BY 是指定以某个栏位做排序，[DESC]是指从大到小排列，若
没有指明，则是从小到大排列
组合查询
组合查询是指所查询得资料来源并不只有单一的表格，而是联合一个以上的表格才能够得到结果的。
Select *
FROM table1,table2
Where table1.colum1=table2.column1
说明：
1.查询两个表格中其中 column1 值相同的资料
2.当然两个表格相互比较的栏位，其资料形态必须相同
3.一个复杂的查询其动用到的表格可能会很多个
整合性的查询：
Select COUNT (*)
FROM table_name
Where column_name = ***
说明：
查询符合条件的资料共有几笔
Select SUM(column1)
FROM table_name
说明：
1.计算出总和，所选的栏位必须是可数的数字形态
2.除此以外还有 AVG() 是计算平均、MAX()、MIN()
计算最大最小值的整合性查询
Select column1,AVG(column2)
FROM table_name
GROUP BY column1
HAVING AVG(column2) > ***
说明：
1.GROUP BY: 以column1 为一组计算 column2 的平均值
必须和 AVG、SUM 等整合性查询的关键字一起使用
2.HAVING : 必须和 GROUP BY 一起使用作为整合性的限制
复合性的查询
Select *
FROM table_name1
Where EXISTS (
Select *
FROM table_name2
Where conditions )
说明：
1.Where 的 conditions 可以是另外一个的 query
2.EXISTS 在此是指存在与否
Select *
FROM table_name1
Where column1 IN (
Select column1
FROM table_name2
Where conditions )
说明
1. IN 後面接的是一个集合，表示column1 存在集合里面
2. Select 出来的资料形态必须符合 column1
其他查询
Select *
FROM table_name1
Where column1 LIKE 'x%'
说明：
1.LIKE 必须和後面的'x%' 相呼应表示以 x为开头的字串
Select *
FROM table_name1
Where column1 IN ('***','yyy',..)
说明
1. IN 後面接的是一个集合，表示column1 存在集合里面
Select *
FROM table_name1
Where column1 BETWEEN xx AND yy
说明
1. BETWEEN 表示 column1 的值介於 xx 和 yy 之间
更改资料：
Update table_name
SET column1='***'
Where conditoins
说明：
1.更改某个栏位设定其值为'***'
2.conditions 是所要符合的条件、若没有 Where 则
整个 table 的那个栏位都会全部被更改
删除资料：
Delete FROM table_name
Where conditions
说明：删除符合条件的资料
ACCESS中增加和修改字段属性语句
增加表中字段:
alter table tablename add id int IDENTITY (1, 1) NOT NULL 'ID自动编者编号
alter table tablename add 字段名 bit '是与否
alter table tablename add 字段名 varchar(250) '文本长度250
alter table tablename add 字段名 int default 0 '长整默认0
alter table tablename add 字段名text '备注
alter table tablename add 字段名 datetime default Now() '时间默认now()
alter table tablename add 字段名 image '图象
alter table tablename add 字段名 money '货币
修改表中字段
alter table tablename alter column id int IDENTITY (1, 1) NOT NULL '修改为ID自动编者编号
alter table tablename alter column columnname bit '修改为是与否
alter table tablename alter column columnname varchar(250) '修改为文本长度250
alter table tablename alter column columnname int default 0 '修改为长整默认0
alter table tablename alter column columnname text '修改为备注
alter table tablename alter column columnname datetime default Now() '修改为时间默认now()
alter table tablename alter column columnname image '修改为图象
alter table tablename alter column columnname money '修改为货币
topmargin=0
如何实现网页的向前向后，如history.go(0)等的有关内容
向前history.back(-1)或history.go(-1)
<%
If ......then
%>
<script language="vbscript">
history.back(-1)
</script>
<%
end if
%>
Alter TABLE 表名 Drop COLUMN 字段名
数据库查询中的特殊字符的问题 -- 思路[转帖]
在进行数据库的查询时，会经常遇到这样的情况：
例如想在一个用户数据库中查询他的用户名和他的密码，但恰好该用户使用的名字和密码中有特殊的字符，例如单引号，“|”号，双引号或者连字符“&”。
例如他的名字是1"test，密码是A|&900
这时当你执行以下的查询语句时，肯定会报错：
SQL = "Select * FROM SecurityLevel Where UID="" & UserID & """
SQL = SQL & " AND PWD="" & Password & """
因为你的SQL将会是这样：
Select * FROM SecurityLevel Where UID="1"test" AND PWD="A|&900"
在SQL中，"|"为分割字段用的，显然会出错了。现在提供下面的几个函数 专门用来处理这些头疼的东西：
Function ReplaceStr (TextIn, ByVal SearchStr As String, _
ByVal Replacement As String, _
ByVal CompMode As Integer)
Dim WorkText As String, Pointer As Integer
If IsNull(TextIn) Then
ReplaceStr = Null
Else
WorkText = TextIn
Pointer = InStr(1, WorkText, SearchStr, CompMode)
Do While Pointer > 0
WorkText = Left(WorkText, Pointer - 1) & Replacement & _
Mid(WorkText, Pointer + Len(SearchStr))
Pointer = InStr(Pointer + Len(Replacement), WorkText, SearchStr, CompMode)
Loop
ReplaceStr = WorkText
End If
End Function
Function SQLFixup(TextIn)
SQLFixup = ReplaceStr(TextIn, """, """", 0)
End Function
Function JetSQLFixup(TextIn)
Dim Temp
Temp = ReplaceStr(TextIn, """, """", 0)
JetSQLFixup = ReplaceStr(Temp, "|", "" & chr(124) & "", 0)
End Function
Function FindFirstFixup(TextIn)
Dim Temp
Temp = ReplaceStr(TextIn, """, "" & chr(39) & "", 0)
FindFirstFixup = ReplaceStr(Temp, "|", "" & chr(124) & "", 0)
End Function
有了上面几个函数后，当你在执行一个sql前，请先使用
SQL = "Select * FROM SecurityLevel Where UID="" & SQLFixup(UserID) & """
SQL = SQL & " AND PWD="" & SQLFixup(Password) & """
列出数据库中的所有表------吐血推荐
<%
strConn="DBQ="+server.mappath("kendylan.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set objConn=server.createobject("Adodb.connection")
objConn.open strConn
set rsSchema=objConn.openSchema(20)
rsSchema.movefirst
Do Until rsSchema.EOF
if rsSchema("TABLE_TYPE")="TABLE" then
response.write rsSchema("TABLE_NAME") & "<br>"
end if
rsSchema.movenext
Loop
set objConn=nothing
%>
以前这里就有说过啊
[转帖]万能数据库连接程序！
万能数据库连接程序！
作者: 阿泰 点击链接查看作者详细信息
简介: 连接各种类型数据库 及 对数据库操作的函数
下面这部分程序可说是万能的数据库连接程序几乎可以连接所有的MS数据库，自己拿去研究吧（这个程序是“ASP网页制作教程”这本书里面的——一本好书）：
<%
'---------------------------------------------------
Function GetMdbConnection( FileName )
Dim Provider, DBPath
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
DBPath = "Data Source=" & Server.MapPath(FileName)
Set GetMdbConnection = GetConnection( Provider & DBPath )
End Function
'---------------------------------------------------
Function GetSecuredMdbConnection( FileName, Password )
Dim Provider, DBPath
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
DBPath = "Data Source=" & Server.MapPath(FileName)
Set GetSecuredMdbConnection = GetConnection( Provider & DBPath & ";Jet OLEDB:Database Password=" & Password ) End Function
'---------------------------------------------------
Function GetDbcConnection( FileName )
Dim Driver, SourceType, DBPath
Driver = "Driver={Microsoft Visual FoxPro Driver};"
SourceType = "SourceType=DBC;"
DBPath = "SourceDB=" & Server.MapPath( FileName )
Set GetDbcConnection = GetConnection( Driver & SourceType & DBPath )
End Function
'---------------------------------------------------
Function GetDbfConnection( Directory )
Dim Driver, SourceType, DBPath
Driver = "Driver={Microsoft Visual FoxPro Driver};"
SourceType = "SourceType=DBF;"
DBPath = "SourceDB=" & Server.MapPath( Directory )
Set GetDbfConnection = GetConnection( Driver & SourceType & DBPath )
End Function
'---------------------------------------------------
Function GetExcelConnection( FileName )
Dim Driver, DBPath
Driver = "Driver={Microsoft Excel Driver (*.xls)};"
DBPath = "DBQ=" & Server.MapPath( FileName )
Set GetExcelConnection = GetConnection( Driver & "ReadOnly=0;" & DBPath ) End Function
'---------------------------------------------------
Function GetTextConnection( Directory )
Dim Driver, DBPath
Driver = "Driver={Microsoft Text Driver (*.txt; *.csv)};"
DBPath = "DBQ=" & Server.MapPath( Directory )
Set GetTextConnection = GetConnection( Driver & DBPath )
End Function
'---------------------------------------------------
Function GetSQLServerConnection( Computer, UserID, Password, Db )
Dim Params, conn
Set GetSQLServerConnection = Nothing
Params = "Provider=SQLOLEDB.1"
Params = Params & ";Data Source=" & Computer
Params = Params & ";User ID=" & UserID
Params = Params & ";Password=" & Password
Params = Params & ";Initial Catalog=" & Db
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open Params
Set GetSQLServerConnection = conn
End Function
'---------------------------------------------------
Function GetMdbRecordset( FileName, Source )
Set GetMdbRecordset = GetMdbRs( FileName, Source, 2, "" )
End Function
'---------------------------------------------------
Function GetMdbStaticRecordset( FileName, Source )
Set GetMdbStaticRecordset = GetMdbRs( FileName, Source, 3, "" )
End Function
'---------------------------------------------------
Function GetSecuredMdbRecordset( FileName, Source, Password )
Set GetSecuredMdbRecordset = GetMdbRs( FileName, Source, 2, Password ) End Function
'---------------------------------------------------
Function GetSecuredMdbStaticRecordset( FileName, Source, Password )
Set GetSecuredMdbStaticRecordset = GetMdbRs( FileName, Source, 3, Password ) End Function
'---------------------------------------------------
Function GetDbfRecordset( Directory, SQL )
Set GetDbfRecordset = GetOtherRs( "Dbf", Directory, SQL, 2 )
End Function
'---------------------------------------------------
Function GetDbfStaticRecordset( Directory, SQL )
Set GetDbfStaticRecordset = GetOtherRs( "Dbf", Directory, SQL, 3 )
End Function
'---------------------------------------------------
Function GetDbcRecordset( FileName, SQL )
Set GetDbcRecordset = GetOtherRs( "Dbc", FileName, SQL, 2 )
End Function
'---------------------------------------------------
Function GetDbcStaticRecordset( FileName, SQL )
Set GetDbcStaticRecordset = GetOtherRs( "Dbc", FileName, SQL, 3 )
End Function
'---------------------------------------------------
Function GetExcelRecordset( FileName, SQL )
Set GetExcelRecordset = GetOtherRs( "Excel", FileName, SQL, 2 )
End Function
'---------------------------------------------------
Function GetExcelStaticRecordset( FileName, SQL )
Set GetExcelStaticRecordset = GetOtherRs( "Excel", FileName, SQL, 3 )
End Function
'---------------------------------------------------
Function GetTextRecordset( Directory, SQL )
Set GetTextRecordset = GetOtherRs( "Text", Directory, SQL, 2 )
End Function
'---------------------------------------------------
Function GetTextStaticRecordset( Directory, SQL )
Set GetTextStaticRecordset = GetOtherRs( "Text", Directory, SQL, 3 )
End Function
'---------------------------------------------------
Function GetSQLServerRecordset( conn, source )
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open source, conn, 2, 2
Set GetSQLServerRecordset = rs
End Function
'---------------------------------------------------
Function GetSQLServerStaticRecordset( conn, source )
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open source, conn, 3, 2
Set GetSQLServerStaticRecordset = rs
End Function
'---------------------------------------------------
Function GetConnection( Param )
Dim conn
On Error Resume Next
Set GetConnection = Nothing
Set conn = Server.CreateObject("ADODB.Connection")
If Err.Number <> 0 Then Exit Function
conn.Open Param
If Err.Number <> 0 Then Exit Function
Set GetConnection = conn
End Function
'---------------------------------------------------
Function GetMdbRs( FileName, Source, Cursor, Password )
Dim conn, rs
On Error Resume Next
Set GetMdbRs = Nothing
If Len(Password) = 0 Then
Set conn = GetMdbConnection( FileName )
Else
Set conn = GetSecuredMdbConnection( FileName, Password )
End If
If conn Is Nothing Then Exit Function
Set rs = Server.CreateObject("ADODB.Recordset")
If Err.Number <> 0 Then Exit Function
rs.Open source, conn, Cursor, 2
If Err.Number <> 0 Then Exit Function
Set GetMdbRs = rs
End Function
'---------------------------------------------------
Function GetOtherRs( DataType, Path, SQL, Cursor )
Dim conn, rs
On Error Resume Next
Set GetOtherRs = Nothing
Select Case DataType
Case "Dbf"
Set conn = GetDbfConnection( Path )
Case "Dbc"
Set conn = GetDbcConnection( Path )
Case "Excel"
Set conn = GetExcelConnection( Path )
Case "Text"
Set conn = GetTextConnection( Path )
End Select
If conn Is Nothing Then Exit Function
Set rs = Server.CreateObject("ADODB.Recordset")
If Err.Number <> 0 Then Exit Function
rs.Open SQL, conn, Cursor, 2
If Err.Number <> 0 Then Exit Function
Set GetOtherRs = rs
End Function
'---------------------------------------------------
Function GetSQLServerRs( Computer, UserID, Password, Db, source, Cursor )
Dim conn, rs
On Error Resume Next
Set GetSQLServerRs = Nothing
Set conn = GetSQLServerConnection( Computer, UserID, Password, Db )
If conn Is Nothing Then Exit Function
Set rs = Server.CreateObject("ADODB.Recordset")
If Err.Number <> 0 Then Exit Function
rs.Open source, conn, Cursor, 2
If Err.Number <> 0 Then Exit Function
Set GetSQLServerRs = rs
End Function
%>
使用方法是——复制下来存成一个文件，然后用#Include “文件名”就可以调用里面的子程序了。
有什么问题可以一起探讨！！！
随机记录的取得，适用于sql数据库中
Select * FROM table orDER BY NEWID()
[推荐]删除全部数据的最快捷的方法
TRUNCATE TABLE
删除表中的所有行，而不记录单个行删除操作。
语法
TRUNCATE TABLE name
参数
name
是要截断的表的名称或要删除其全部行的表的名称。
注释
TRUNCATE TABLE 在功能上与不带 Where 子句的 Delete 语句相同：二者均删除表中的全部行。但 TRUNCATE TABLE 比 Delete 速度快，且使用的系统和事务日志资源少。
Delete 语句每次删除一行，并在事务日志中为所删除的每行记录一项。TRUNCATE TABLE 通过释放存储表数据所用的数据页来删除数据，并且只在事务日志中记录页的释放。
TRUNCATE TABLE 删除表中的所有行，但表结构及其列、约束、索引等保持不变。新行标识所用的计数值重置为该列的种子。如果想保留标识计数值，请改用 Delete。如果要删除表定义及其数据，请使用 Drop TABLE 语句。
对于由 FOREIGN KEY 约束引用的表，不能使用 TRUNCATE TABLE，而应使用不带 Where 子句的 Delete 语句。由于 TRUNCATE TABLE 不记录在日志中，所以它不能激活触发器。
TRUNCATE TABLE 不能用于参与了索引视图的表。
示例
下例删除 authors 表中的所有数据。
TRUNCATE TABLE authors
袖珍数据库连接查询手册
下面将简单介绍一下几种ADO连接方式：ODBC DSN,ODBC DSN-Less,
OLE DB Provider,和"MS Remote" Provider.
1。ODBC DSN连接
I.DSN
oConn.Open "DSN=AdvWorks;" & _
"UID=Admin;" & _
"PWD=;"
注意：从MDAC2.1开始就不能够在使用这样的方式了，就是只把DSN文件名放在ConnectString中
你必须同时使用DSN，UID，PWD标志。例如下面的方式在MDAC 2.1中将会出错：
oConn.Open "AdvWorks"
II.File DSN
oConn.Open "FILEDSN=\somepath\mydb.dsn;" & _
"UID=Admin;" & _
"PWD=;"
III.ODBC DSN-Less Connections
a)ODBC Text Driver
oConn.Open _
"Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
"Dbq=\somepath\;" & _
"Extensions=asc,csv,tab,txt;" & _
"Persist Security Info=False"
注意：需要在SQL语句中指定使用到的文件名。例如：
ors.Open "Select * From customer.csv", _
oConn, adOpenStatic, adLockReadOnly, adCmdText
b)ODBC Driver for Access
i)普通安全模式：
oConn.Open _
"Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=\somepath\mydb.mdb;" & _
"Uid=Admin;" & _
"Pwd=;"
ii)如果使用了System database:
oConn.Open _
"Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=\somepath\mydb.mdb;" & _
"SystemDB=\somepath\mydb.mdw;", _
"admin", ""
c)ODBC Driver for SQL Server
i)普通安全模式
oConn.Open "Driver={SQL Server};" & _
"Server=carl2;" & _
"Database=pubs;" & _
"Uid=sa;" & _
"Pwd=;"
ii)使用信任安全模式：
oConn.Open "Driver={SQL Server};" & _
"Server=carl2;" & _
"Database=pubs;" & _
"Uid=;" & _
"Pwd=;"
注意：要使用空白的Uid和Pwd
d)ODBC Driver for oracle
i)使用现有的Oracle ODBC Driver from Microsoft:
oConn.Open _
"Driver={Microsoft ODBC for oracle};" & _
"Server=OracleServer.world;" & _
"Uid=demo;" & _
"Pwd=demo;"
ii)使用老版本的Oracle ODBC Driver from Microsoft:
oConn.Open _
"Driver={Microsoft ODBC Driver for oracle};" & _
"ConnectString=OracleServer.world;" & _
"Uid=demo;" & _
"Pwd=demo;"
IIII)使用微软的OLE DB Data Link Connections方式Data Link File (UDL)
a)使用绝对路径
oConn.Open "File Name=\somepath\pubs.udl;"
b)使用相对路径
oConn.Open "File Name=pubs.udl;"
V)OLE DB Provider Connections方式
a)OLE DB Provider for ODBC Databases
i)Access (Jet):
oConn.Open _
"Provider=MSDASQL;" & _
"Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=\somepath\mydb.mdb;" & _
"Uid=Admin;" & _
"Pwd=;"
ii)SQL Server:
oConn.Open _
"Provider=MSDASQL;" & _
"Driver={SQL Server};" & _
"Server=carl2;" & _
"Database=pubs;" & _
"Uid=sa;" & _
"Pwd=;"
b)OLE DB Provider for Microsoft Jet (Access)
i)普通安全模式：
oConn.Open _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=\somepath\mydb.mdb;" & _
"User Id=admin;" & _
"Password=;"
ii)如果使用了System database:
oConn.Open _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=\somepath\mydb.mdb;" & _
"Jet OLEDB:System Database=system.mdw;", _
"admin", ""
注意：当使用OLE DB Provider4.0版本是，需要把MDB和MDW文件转换成4.0的数据库格式
iii)如果MDB需要一个数据库密码的话：
oConn.Open _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=\somepath\mydb.mdb;" & _
"Jet OLEDB:Database Password=MyDbPassword;", _
"admin", ""
c)OLE DB Provider for Excel Spreadsheet:
oConn.Open _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=\somepath\expenses.xls;" & _
"Extended Properties=""Excel 8.0;HDR=Yes;"";"
注意： "HDR=Yes"表示在第一行中是行标题，在provider中将不把第一行包括入recordset中
d)OLE DB Provider for SQL Server
i)普通安全模式：
oConn.Open "Provider=sqloledb;" & _
"Network Library=DBMSSOCN;" & _
"Data Source=carl2;" & _
"Initial Catalog=pubs;" & _
"User Id=sa;" & _
"Password=;"
ii)使用信任安全模式：
oConn.Open "Provider=sqloledb;" & _
Network Library=DBMSSOCN;" & _
"Data Source=carl2;" & _
"Initial Catalog=pubs;" & _
"Trusted_Connection=yes;"
注意："Network Library=DBMSSOCN"声明OLE DB使用TCP/IP替代Named Pipes.
e)OLE DB Provider for oracle
oConn.Open "Provider=msdaora;" & _
"Data Source=OracleServer.world;" & _
"User Id=sa;" & _
"Password=;"
(VI)Remote OLE DB Provider Connections方式（就是我一直在研究的RDS方式哦，呵呵。）：
a)MS Remote - Access (Jet)
i)ODBC DSN:
oConn.Open "Remote Server=http://carl2;" & _
"Remote Provider=MSDASQL;" & _
"DSN=AdvWorks;" & _
"Uid=admin" & _
"Pwd=;"
ii)OLE DB Provider:
oConn.Open "Provider=MS Remote;" & _
"Remote Server=http://carl2;" & _
"Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=\somepath\mydb.mdb;", _
"admin", ""
iii)OLE DB Provider自定义事务对象
oConn.Open "Provider=MS Remote;" & _
"Remote Server=http://carl2;" & _
"Handler=MSDFMAP.Handler;" & _
"Data Source=MyAdvworksOLEDBConnectTag;"
b)MS Remote - SQL Server
i)ODBC DSN:
oConn.Open "Remote Server=http://carl2;" & _
"Remote Provider=MSDASQL;" & _
"Network Library=DBMSSOCN;" & _
"DSN=Pubs;" & _
"Uid=sa" & _
"Pwd=;"
ii)OLE DB Provider
oConn.Open "Provider=MS Remote;" & _
"Remote Server=http://carl2;" & _
"Remote Provider=SQLOLEDB;" & _
"Network Library=DBMSSOCN;" & _
"Data Source=carl2;" & _
"Initial Catalog=pubs;" & _
"User ID=sa;" & _
"Password=;"
TrackBack：http://www.cnblogs.com/wayne-ivan/archive/2008/05/29/1209903.html