久久精品看片,亚洲久久久久久中文字幕,欧美成人69

類型：服務器區大小：3.4M語言：中文評分：2.5
標簽：

立即下載

下面最新整理一些站長建站常用的SQL和ASP技巧大全，免費提供給大家一起分享。

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 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" size=8 value="<%=rs("pm_p")%>"></td>
<td align=center><input type='submit' class='button' value='修改'></td>
<td align=center><input type="button" name="Submit" value="刪除" class="button" onclick="location='biglist.asp?act=del&id=<%=rs("id")%>'"></td>
</tr>
</form>

<%I=I+1
RS.MoveNext
Loop%>



<tr> <td colspan="6" align=right height=30>
  共有<font color=red><%=rs.recordcount%></font>個關鍵詞，<font color=red><%=page%></font>/<%=TotalPages%>頁
【<a href="<%=request.ServerVariables("URL")%>?page=1">首頁</a>】
<% if page>1 then %>
【<a href="<%=request.ServerVariables("URL")%>?page=<%=StartPageNum-1%>">上一頁</a>】
<%else%>
<%end if%>
<% For I=StartPageNum to EndPageNum
      if I<>page then %><A href="?page=<%=I%>"><u><%=I%></u> </A><% else %><font color=red><%=I%></font> <% end if %><% Next %><% if EndPageNum<RS.Pagecount then %>
【<a href="<%=request.ServerVariables("URL")%>?page=<%=EndcPageNum+i%>">下一頁</a>】
<%end if%>
【<a href="<%=request.ServerVariables("URL")%>?page=<%=TotalPages%>">尾頁</a>】

</td></tr>

<%
end if
rs.close
%>

</table>

常用JAVA

response.write"<SCRIPT language=java script>alert('該關鍵詞已經存在。');"
response.write"java script:history.go(-1)</SCRIPT>"
'response.redirect "biglist.asp"
'response.write"this.location.href='index.asp';</SCRIPT>"
'response.redirect request.servervariables("http_referer")
response.end

常用命令
兩個表循環

<%
dim crs1
dim csql1
Set crs1= Server.CreateObject("ADODB.Recordset")
csql1="select * from commercetype"
crs1.open csql1,conn,1,1
%>
<%do while not crs1.eof%>
<%
Set all= Server.CreateObject("ADODB.Recordset")
csql1="select * from Commerce where Typeid="&crs1("Typeid")
all.open csql1,conn,1,1

%>
<td width="20%" height=17 bgcolor="#E4F4FC" valign=middle>
<font color=red>
<%if not all.eof then%>
<%=all.recordcount%>
<%else%>
0
<%end if%>
</font>
</td>
<%
crs1.movenext
loop
%>

去掉太長的錄入文字:

去掉左空格
instr(request.form("t"),",")>0
查驗是否有，號
arr=split(request.form("t"),",")
去掉，并付值給arr
ubound(arr)
個數

ASP函數介紹

??
??1. 函數array() 功能:創建一個數組變量格式:array(list) 參數:list 為數組變量中的每個數值列,中間用逗號間隔例子: 結果: i 被賦予為數組
??
??2. 函數Cint() 功能:將一表達式/其它類型的變量轉換成整數類型(int) 格式:Cint(expression) 參數:expression 是任何有效的表達式/其它類型的變量例子: 結果: 236 函數Cint()將字符"234"轉換成整數234.如果表達式為空, 或者無效時,返回值為0;
??
??
??3. 函數:Creatobject() 功能:創建及返回一個ActiveX對象. 格式:Creatobject(obname) 參數:obname 是對象的名稱例子: 結果:
??
??4. 函數Cstr() 功能:將一表達式/其它類型的變量轉換成字符類型(string) 格式:Cstr(expression) 參數:expression是任何有效的表達式/其它類型的變量例子: 結果:函數Cstr()將整數 5 轉換成字符"5".
??
??5. 函數Date() 功能:返回當前系統(server端)的日期格式:Date() 參數:無例子<% date () %> 結果:05/10/00
??
??
??6. #.函數Dateadd() 功能:計算某個指定的時間和格式:dateadd(timeinterval,number,date) 參數:timeinterval是時間單位(月,日..); number是時間間隔值,date是時間始點. 例子: 結果: 11/4/99 3:34:45 PM 其中 "m" = "month"; "d" = "day"; 如果是currentDate 格式,則, "h" = "hour"; "s" = "second";
??
??7. #.函數Datediff() 功能:計算某量個指定的時間差格式:datediff(timeinterval,date1,date2[,firstdayofweek[,firstdayofyear>) 參數:timeinterval 是時間單位; date1,date2是有效的日期表達式,firstdayofweek,firstdayofyear 是任意選項. 例子: 結果:There are 150 days to millenium from 8/4/99.
??
??8. #.函數day() 功能:返回一個整數值,對應于某月的某日格式:day(date) 參數:date是一個有效的日期表達式; 例子lt;% =date(#8/4/99#) %> 結果:4
??
??
??9. #.函數formatcurrency() 功能:轉換成貨幣格式格式:formatcurrency(expression [,digit[,leadingdigit[,paren[,groupdigit>>) 參數:expression 是有效的數字表達式;digit表示小數點后的位數;leadingdigit,paren,groupdigit是任意選項. 例子lt;%=FormatCurrency(34.3456)%> 結果34.35
??10. #.函數Formatdatetime() 功能:格式化日期表達式/變量格式:formatdatetime(date[,nameformat]) 參數:date為有效的日期表達式/變量;nameformat是指定的日期格式常量名稱. 例子lt;% =formatdatetime("08/04/99",vblongdate) %> 結果:Wednesday,August 04,1999
??
??11. #.函數Isnumeric() 功能:返回一個布爾值,判斷變量是否為數字變量,或者是可以轉換成數字的其它變量. 格式:isnumeric(expression) 參數:expression 是任意的變量. 例子: 結果: true.
??
??12. #.函數Isobject() 功能:返回一個布爾值,判斷變量是否為對象的變量, 格式:isobject(expression) 參數:expression 是任意的變量. 例子: 結果: true
??
??
??13. #.函數:Lbound() 功能:返回一個數組的下界. 格式:Lbound(arrayname[,dimension]) 參數:arrayname 是數組變量,dimension 是任意項例子: 結果:0
??
??14. #.函數Lcase() 功能:將一字符類型變量的字符全部變換小寫字符. 格式:Lcase(string) 參數:string是字符串變量例子: 結果:this is lcase!
??
??
??15. #.函數left() 功能:截取一個字符串的前部分; 格式:left(string,length) 參數:string字符串,length截取的長度. 例子: 結果:this i
??
??16. #.函數len() 功能:返回字符串長度或者變量的字節長度格式:len(string |varname) 參數:string字符串;varname任意的變量名稱例子: 結果:15
??
??
??17. #.函數ltrim() 功能:去掉字符串前的空格. 格式:ltrim(string) 參數:string 字符串. 例子: 結果:Today
??
??
??19. #.函數minute() 功能:返回一數值, 表示分鐘格式:minute(time) 參數: time是時間變量例子lt;% =minute(#12:23:34#) %> 結果:23
??
??20. #.函數month() 功能:返回一數值, 表示月份格式:month(time) 參數:time是日期變量例子lt;% =month(#08/09/99) %> 結果:9
??
??
??21. #.函數monthname() 功能:返回月份的字符串(名稱). 格式:Monthname(date [,abb]) 參數:date是日期變量,abb=true時則月份的縮寫, 例子: 結果:April
??
??22. #.函數Now() 功能:返回系統的當前時間和日期. 格式:now() 參數:無例子: 結果: 05/10/00 8:45:32 pm
??
??
??23. #.函數:replace() 功能:在字符串中查找,替代指定的字符串. 格式:replace(strtobesearched,strsearchfor,strreplacewith [,start[,count[,compare>]) 參數:strtobesearched是字符串; strsearchfor是被查找的子字符串;strreplacewith 是用來替代的子字符串.start,count,compare 是任意選項. 例子: 結果:this is an orange.
??
??24. #.函數right() 功能:截取一個字符串的后部分格式:right(string,length) 參數:string字符串,length截取的長度. 例子: 結果:st!
??
??
??25. #.函數rnd() 功能:返回一個隨機數值格式:rnd[(number)] 參數:number是任意數值. 例子: 結果:0/1數值之一,無randomize(), 則不能產生隨機數.
??
??26. #.函數round() 功能:完整數值格式:round(expression[,numright]) 參數:expression數字表達式;numright任意選項. 例子: 結果: 12
??
??
??27. #.函數rtrim() 功能:去掉字符串后的空格. 格式:rtrim(string) 參數:string 是字符串例子: 結果:this is a test!
??
??28. #.函數second() 功能:返回一個整數值. 格式:second(time) 參數:time是一個有效的時間表達式; 例子lt;% =second(# 12:28:30#) %> 結果:30
??
??
??29. #.函數strReverse() 功能:返回與原字符串排列逆向的字符串. 格式:strreverse(string) 參數:string是字符串例子lt;% =strreverse("this is a test!") 結果:!tset a si siht
??
??30. #.函數time() 功能:返回當前系統的時間值. 格式:time() 參數:無結果:9:58:28 Am 關鍵詞：ASP
??
??
??31. #.函數trim() 功能:刪去字符串前,后的空格. 格式:trim(string) 參數:string 字符串. 例子: 結果:this is a test!
??
??32. #.函數UBound() 功能:返回一個數組的上界. 格式:Ubound(expression [,dimension]) 參數:expression 是數組表達式/數組變量,dimension 是任意項例子: 結果: 2
??
??
??33. #.函數:UCase() 功能:將一字符類型變量的字符全部變換成大寫字符. 格式:Ucase(string) 參數:string是字符串變量例子: 結果:THIS IS LCASE!
??
??34. #.函數Vartype() 功能:返回變量的常量代碼(整數) 格式:Vartype(varname) 參數:varname是任何類型的變量名稱. 例子: 結果:2 (2表示整數,須要參考ASP常量代碼.)
??
??
??35. #.函數Weekday() 功能:返回一個整數,對應一周中的第幾天. 格式:Weekday(date [,firstofweek]) 參數:date為日期變量,firstofweek為任選項. 例子: 結果:3(3 表示是星期二)
??
??36. #.函數weekdayname() 功能:返回字符串,對應星期幾. 格式:weekdayname(weekday[,abb[,firstdayofweek>) 參數:weekday為日期變量,abb,firstdayofweek為任選項. 例子: 結果: Wednesday
??
??
??37. #.函數year() 功能:返回日期表達式所在的年份. 格式:year(date) 參數:date是有效的日期表達式例子: 結果:1999