注册 登录
编程论坛 ASP技术论坛

增,删,改,查,分页教程,适合新手!

心碎无痕 发布于 2005-12-27 18:38, 24098 次点击

增,删,改,查,分页源代码,全是由本人编辑,相对来说是比较简单的,

不过用的是文本文件,里面的代码都注解的比较清楚,

我现在在准备一套ASP教程,不过没太多时间,

大家请耐心等吧!!


这几个代码,只是我教程中的一小小部份~_~!


只有本站会员才能查看附件,请 登录

86 回复
#2
心碎无痕2005-12-27 18:39

SQL数据!

--创建数据库
create database test2
--使用数据库
use test2
use master
--创建表
create table yg1(
id int identity(1,1) primary key,
name varchar(50),
pass varchar(50)
)
--删除表
drop table yg
--删除数据库
drop database test2
--数据库四个操作:增 删 改 查
--创建一个员工工资表,里面包含了各个员工的号码
--(从1自动递增)姓名,性别,出生年月,基本工资,奖金,总工资。
create table yg(
id int identity(1,1) primary key clustered,
name char(10),
sex char(2),
birth datetime,
gz float,
jj float,
zgz as gz+jj
)
--增加数据操作
insert into yg values('张三','男','1965-9-18',1000,200)
insert into yg(name,sex) values('张三','男')
insert into yg values('陈小东','男','1970-9-18',1100,230)
insert into yg values('陈红','女','1971-10-18',1300,190)

--查询数据库
select * from yg
--查询男职工的工资
select * from yg where sex='男'
--查询奖金为200元的职工姓名
select name from yg where jj=200
--查询奖金在200到500之间的职工姓名
select name from yg where jj between 200 and 500
--查询张三的工资
select gz from yg where name='张三'
select gz as '工资' from yg where name='张三'
--按工资排序
select * from yg order by gz --升序(从小到大)
select * from yg order by gz desc --降序(从大到小)
--奖金前三名
select top 3 name,jj from yg order by jj desc
--奖金前20%
select top 20 percent name,jj from yg order by jj desc
--查询职工人数
select count(id) from yg
--查询平均工资
select avg(gz) from yg
--查询最高工资的人
select top 1 name,gz,jj from yg order by gz desc
--查询最低工资的人
select top 1 name,gz,jj from yg order by gz


--删除记录
--删除张三的记录
delete from yg where name='张三'
delete from yg where id=5


--修改记录
--给张三的工资加500
update yg set gz=gz+500 from yg where name='张三'

#3
心碎无痕2005-12-27 18:41

三种对象:
1、connection 建立与数据库的连接(也可以执行增、删、改、查命令,而且还是常用方法)

2、command 对数据库执行增、删、改、查命令

3、recordset 得到从数据库返回的记录集(也可以执行增、删、改、查命令,但分页显示一定要用它)

在database目录中建立www.mdb数据库
id 自动
name 文本
url 文本
intro 备注
submit_date 日期/时间


connection 连接数据库代码:

dim db '定义数据库连接名
'建立connection对象
set db=server.createobject("adodb.connection") '连接数据库
'连接access数据库
db.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("/database/www.mdb")
'连接sql server 数据库
db.open "driver={SQL Server};SERVER=fzu80;UID=user1;PWD=123;DATABASE=test3"
'以上代码为常用代码
'访问数据库
dim strsql,rs
strsql="select * from link"
set rs=db.execute(strsql)
'关闭连接
db.close
set db=nothing

command 连接代码:

dim db
set db=server.createobject("adodb.connection")
db.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("/database/www.mdb")
'上面代码为固定写法
'建立command 对象
dim cmd
set cmd=server.createobject("adodb.command")
'建立连接
cmd.activeconnection=db
'访问数据库
dim strsql,rs
strsql="select * from link"
cmd.commandtext=strsql
set rs=cmd.execute


recordset 连接代码:

dim db
set db=server.createobject("adodb.connection")
db.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("/database/www.mdb")
'以上为固定写法
'建立recordset 对象
dim strsql,rs
set rs=server.createobject("adodb.recordset")
'连接数据库
strsql="select * from link"
rs.open strsql,db
'rs.open strsql,db,1,2
'rs.open 查询,数据库连接,指针类型,锁定方式,查询类型
'
指针类型:
0 前移 默认值
1 前或后移 建议用这个
2 动态指针
3 静态指针

锁定方式:
1 只读 默认值
2 只能被一个客户修改 建议用这个
3 同时被多个客户修改
4 可修改,但不锁定其它客户

查询参数,可以写,也可不写,自动确定
rs.close
set rs=nothing
db.close
set db=nothing

[此贴子已经被作者于2005-12-27 18:42:41编辑过]

#4
心碎无痕2005-12-27 18:58

看来我的教程是拉圾了点, 哎! 没人顶了!!

真不好意思!!!!!

#5
dreame2005-12-27 20:01

楼主辛苦了

#6
dpxdpx2005-12-28 10:43

顶一下

#7
wxhwxh2005-12-28 10:46
代码很好啊,顶一顶!希望你的教程早日展现给大家
#8
zmyzzz2005-12-28 10:56
绝对支持!!!!
顶...........
#9
griefforyou2005-12-28 11:14
应该进入FAQ库
#10
心碎无痕2005-12-28 15:30
只要对大家有一点帮助,我就很开心咯!!!!!!! 我会尽快把教程弄出来的, 不会让大家失望的!
#11
codes2006-04-07 11:29
#12
tanlin2006-04-07 11:59
谢谢你对菜鸟的帮助!
#13
lusenmao2006-04-07 16:23
#14
小鼓锤2006-04-07 17:58
#15
魔风2006-04-07 23:01
不错
针对菜鸟 不错
#16
wlq2001652006-04-15 13:55
不错,楼主辛苦了!本人正在寻找呢!
终于找到了合适的 东东了!
#17
哑巴网虫2006-04-15 14:40
谢谢楼主了,初学者还是大多数的,你的贡献有更高的意义
#18
zhaoyun2006-04-16 20:37
谢谢!!!等你的教程
#19
shensi882007-12-31 16:50
太谢谢你了
#20
孤独冷雨2007-12-31 17:00
顶一下!
#21
zhongx2007-12-31 21:23
谢谢你,顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶
#22
笨笨林2008-01-01 19:03
顶一下
#23
guaishi2008-01-02 09:31
支持
太好了
以前我刚开始学时就是找不到这样的资料
出的太晚了
#24
sky26482008-01-03 16:29
顶以下。。。。
#25
slfyeye2008-01-03 17:52
好东西要支持!
#26
中国男孩2008-01-06 12:06
值得学习
#27
MikeFT2008-01-06 12:25
支持一下!!!
#28
wsx872008-01-06 14:08
顶哦,对我们初学者很有用!!谢谢!
#29
lele20072008-01-06 23:38
感谢!真是好人哟!教程什么时候可以出来呢?初学者的我还在期待着呢?
#30
gld2352008-01-26 12:02
很好,很强大,正在学习中,多放点教程吧
#31
cc2582008-01-26 12:52
好东东,顶一个,
#32
huade2008-01-30 11:03
顶一下,谢谢楼主分享!
#33
fuhuijun2008-01-30 13:04
顶一下
#34
ncnongmin2008-04-10 21:10
偶入门。前面没看懂,只看懂了后面一点点。先赞一下。
#35
cqpgx2008-04-10 21:20
谢谢,
#36
jxyga1112008-06-14 11:52
好像有点像SQL语句啊 不过有些不太懂刚接触ASP望大家指教
#37
jxzhu2008-06-14 15:31
很好啊,下载来看
#38
andyliao12342008-06-30 13:44
好贴就应该顶!
#39
kmliyong2008-07-01 13:53
楼主辛苦!你的东西正是我想要学习的,谢谢了!!
#40
临兵斗者2008-07-05 11:37
顶你下·
#41
ruanjian21102008-07-19 19:51
好东西,收藏了。非常感谢楼主提供资料。。。。。。。。。。。
#42
天佑中华2008-07-24 11:15
顶上
#43
hqy9452008-07-24 15:41
对于我这种小鸟来说,够高深了
#44
hahatuzi20002008-08-02 22:31
我也想看教程,在哪里能看到啊
#45
hikor2008-08-03 13:11
顶顶 对我菜鸟来说还是满有用的
#46
XIEHJ2008-08-26 22:18
适合一定层次的人
楼主辛苦
我顶你
#47
wq1221341792008-08-29 15:19
#48
小树不修不直溜2008-08-29 18:14
好复杂啊,先收藏了,等我学会了ASP再回来看.
#49
xiangchun32008-08-29 21:19
顶一下
#50
djj2008-11-07 09:03
新手番旧贴,正好适合
#51
zhu20082008-11-08 13:19
增,删,改,查,分页教程,适合新手!
12