展会信息港展会大全

站长建站常用的SQL和ASP技巧
来源:互联网   发布日期:2016-01-26 11:05:55   浏览:1689次  

导读:sql常用命令方法!!! (1) 数据记录筛选: sql=select * from 数据表 where 字段名=字段值 order by 字段名 [desc] sql=select * from 数据表 where 字段名 like 39; 39;%字段值% ...

sql常用命令方法!!!

(1) 数据记录筛选:

sql="select * from 数据表 where 字段名=字段值 order by 字段名 [desc]"

sql="select * from 数据表 where 字段名 like ''%字段值%'' order by 字段名 [desc]"

sql="select top 10 * from 数据表 where 字段名 order by 字段名 [desc]"

sql="select * from 数据表 where 字段名 in (''值1'',''值2'',''值3'')"

sql="select * from 数据表 where 字段名 between 值1 and 值2"

(2) 更新数据记录:

sql="update 数据表 set 字段名=字段值 where 条件表达式"

sql="update 数据表 set 字段1=值1,字段2=值2字段n=值n where 条件表达式"

(3) 删除数据记录:

sql="delete from 数据表 where 条件表达式"

sql="delete from 数据表" (将数据表所有记录删除)

(4) 添加数据记录:

sql="insert into 数据表 (字段1,字段2,字段3) valuess (值1,值2,值3)"

sql="insert into 目标数据表 select * from 源数据表" (把源数据表的记录添加到目标数据表)

(5) 数据记录统计函数:

AVG(字段名) 得出一个表格栏平均值

COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计

MAX(字段名) 取得一个表格栏最大的值

MIN(字段名) 取得一个表格栏最小的值

SUM(字段名) 把数据栏的值相加

引用以上函数的方法:

sql="select sum(字段名) as 别名 from 数据表 where 条件表达式"

set rs=conn.excute(sql)

用 rs("别名") 获取统的计值,其它函数运用同上。

(5) 数据表的建立和删除:

CREATE TABLE 数据表名称(字段1 类型1(长度),字段2 类型2(长度))

例:CREATE TABLE tab01(name varchar(50),datetime default now())

DROP TABLE 数据表名称 (永久性删除一个数据表)

select distinct * into yjkc2 from yjkc

drop table yjkc

select * into yjkc from yjkc2

drop table yjkc2

SQL连接方式

dim conn

set conn=server.createobject("ADODB.connection")

conn.open "PROVIDER=SQLOLEDB;DATA SOURCE=服务器;UID=用户名;PWD=密码;DATABASE=表名;"

access连接方式

dim conn

dim connstr

on error resume next

connstr="DBQ="+server.mappath("数据库路径")+";DefaultDir=;DRIVER= {Microsoft Access Driver (*.mdb)};"

set conn=server.createobject("ADODB.CONNECTION")

conn.open connstr

包含页

调用表

打开数据库之后固定修改某个字段

conn.execute("Update 表名 Set 字段=字段+1 Where 字段=变量"

删除内容

set rs=server.createobject("adodb.recordset")

sql="select * from 表名 where 字段=变量"

rs.open sql,conn,1,3

有图片就删除图片

Picture=rs("newspic")

set fs=server.CreateObject("scripting.filesystemobject")

Picture=server.MapPath(Picture)

if fs.FileExists(Picture) then

fs.DeleteFile Picture,true

end if

rs.delete

rs.update

response.redirect request.servervariables("http_referer")

end if

分页

<table width="98%" border="0" cellspacing="1" cellpadding="3" bgcolor="cccccc">

<tr bgcolor="f5f5f5">

<td width=10% align=center>

<font color="">id

</td>

<td width=40% align=center>关 键 词;</td>

<td width=10% align=center>价格< /td>

<td width=20% align=center>修改< /td>

<td width=20% align=center>删除< /td>

</tr>

<%

If Request.QueryString("page") = "" or Request.QueryString("page") = 0 then

page = 1

Else

page = CINT(Request.QueryString("page"))

End If

if request("pm")="" then

set rs=server.CreateObject("adodb.recordset")

sql="select * from p_words order by id desc"

rs.open sql,conn,1,1

else

set rs=server.CreateObject("adodb.recordset")

sql="select * from p_words where pm_name like '%"&request("pm")&"%'"

rs.open sql,conn,1,1

end if

if rs.eof and rs.bof then%>

<tr >

<td width=10% align=center colspan="6" >

暂时没有记录!!<br>

</td>

</tr>

<%

else

%>

<%

RS.PageSize=10'设置每页记录数

Dim TotalPages

TotalPages = RS.PageCount

If page>RS.Pagecount Then

page=RS.Pagecount

end if

RS.AbsolutePage=page

rs.CacheSize = RS.PageSize'设置最大记录数

Dim Totalcount

Totalcount =INT(RS.recordcount)

StartPageNum=1

do while StartPageNum+10<=page

StartPageNum=StartPageNum+10

Loop

EndPageNum=StartPageNum+9

If EndPageNum>RS.Pagecount then EndPageNum=RS.Pagecount %>

<%I=0

p=RS.PageSize*(page-1)

do whil

赞助本站

人工智能实验室

相关热词: SQL ASP

AiLab云推荐
展开

热门栏目HotCates

Copyright © 2010-2024 AiLab Team. 人工智能实验室 版权所有    关于我们 | 联系我们 | 广告服务 | 公司动态 | 免责声明 | 隐私条款 | 工作机会 | 展会港