必杀：站长建站常用的东东大集合

发布时间：2006-06-19 17:13:55　来源：天极网网友评论 0 条

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=JavaScript>alert('该关键词已经存在。');"
response.write"javascript: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
%>

去掉太长的录入文字:

以下是引用片段：
<td style="word-wrap:break-word;word-break:break-all;">
<%=ltrim(arr(j))%>

去掉左空格
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