海南(nán)世紀雲圖網絡科技有限公司
咨詢熱線:400-822-8458 客戶服務:0898-32183600

程序員(yuán)常用的建站SQL和ASP技巧

發表于:2011-06-07 00:00:00來源:人氣:3040

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(字段名) 得出一(yī)個表格欄平均值
COUNT(*|字段名) 對數據行數的統計或對某一(yī)欄有值的數據行數統計
MAX(字段名) 取得一(yī)個表格欄最大(dà)的值
MIN(字段名) 取得一(yī)個表格欄最小(xiǎo)的值
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 數據表名稱 (永久性删除一(yī)個數據表)

 

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

 

包含頁

 

<!--#include file=文件名 -->

 


調用表

打開(kāi)數據庫之後固定修改某個字段

 

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


分(fēn)頁

<table width="98%" border="0" cellspacing="1" cellpadding="3" bgcolor="cccccc">
<tr bgcolor="f5f5f5">
<td width=10% align=center>
<font color="">id&nbsp;
</td>
<td width=40% align=center>關 鍵 詞;</td>
<td width=10% align=center>價&nbsp;&nbsp;格</td>
<td width=20% align=center>修&nbsp;&nbsp;改</td>
<td width=20% align=center>删&nbsp;&nbsp;除</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'設置最大(dà)記錄數  
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 while (Not RS.Eof) and (I<RS.PageSize)              
p=p+1%>

<form action="?act=move&id=<%=rs("id")%>" method=post name=form1>
<tr bgcolor="#FFFFFF">
<td align=center><%=rs("id")%></td>
<td><input type=text name="pm_name" size=12 value="<%=rs("pm_name")%>"></td>
<td align=center><input type=text name="pm_p" siz

文章整理: 世紀雲圖  https://www.yuntop.cc/

以上信息與文章正文是不可分(fēn)割的一(yī)部分(fēn),如果您要轉載本文章,請保留以上信息,謝謝!

版權申明:本站文章部份來自網絡,如有侵權,請聯系我(wǒ)們,我(wǒ)們收到後立即删除,謝謝!

特别注意:本站部份轉載文章言論不代表本站觀點,本站所提供的攝影照片,插畫,設計作品,如需使用,請與原作者聯系,版權歸原作者所有。

微信
網站建設
軟件業務
網絡營銷
400電話(huà)