ASP网页设计WEB编程开辟经常使用的代码
写软件都是想的时间比写的时间要长的.如果反过来了就得看看是什么原因了.另外大家可以回去问问公司里的小MM.(一般企业里,跟你们交付软件接触得最多的是她们)web|编程1.ASP与Access数据库毗连：
dimconn,mdbfile
mdbfile=server.mappath("数据库称号.mdb")
setconn=server.createobject("adodb.connection")
conn.open"driver={microsoftaccessdriver(*.mdb)};uid=admin;pwd=数据库暗码;dbq="&mdbfile
conn.open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&mdbfile
2.ASP与SQL数据库毗连：dimconn
setconn=server.createobject("ADODB.connection")
con.open"PROVIDER=SQLOLEDB;DATASOURCE=SQL服务器称号或IP地点;UID=sa;PWD=数据库暗码;DATABASE=数据库称号;"
创建纪录集工具：setrs=server.createobject("adodb.recordset")
rs.openSQL语句,conn,3,2
SQL经常使用命令利用办法：
数据纪录选择：sql="select*from数据表where字段名=字段值orderby字段名"
sql="select*from数据表where字段名like‘%字段值%‘orderby字段名"
sql="selecttop10*from数据表where字段名orderby字段名"
sql="select*from数据表where字段名in(‘值1‘,‘值2‘,‘值3‘)"
sql="select*from数据表where字段名between值1and值2"更新数据纪录：sql="update数据表set字段名=字段值where前提表达式"
sql="update数据表set字段1=值1,字段2=值2……字段n=值nwhere前提表达式"
删除数据纪录：sql="deletefrom数据表where前提表达式"
sql="deletefrom数据表"(将数据表一切纪录删除)
增加数据纪录：sql="insertinto数据表(字段1,字段2,字段3…)valuess(值1,值2,值3…)"
sql="insertinto方针数据表select*from源数据表"(把源数据表的纪录增加到方针数据表)数据纪录统计函数：
AVG(字段名)得出一个表格栏均匀值
COUNT(*|字段名)对数据行数的统计或对某一栏有值的数据行数统计
MAX(字段名)获得一个表格栏最年夜的值
MIN(字段名)获得一个表格栏最小的值
SUM(字段名)把数据栏的值相加
援用以上函数的办法：sql="selectsum(字段名)as别号from数据表where前提表达式"
setrs=conn.excute(sql)
用rs("别号")猎取统的计值，别的函数使用同上。
数据表的创建和删除：CREATETABLE数据表称号(字段1范例1(长度),字段2范例2(长度)……)
例：CREATETABLEtab01(namevarchar(50),datetimedefaultnow())
DROPTABLE数据表称号(永世性删除一个数据表)
纪录集工具的办法：
rs.movenext将纪录指针从以后的地位向下移一行
rs.moveprevious将纪录指针从以后的地位向上移一行
rs.movefirst将纪录指针移到数据表第一行
rs.movelast将纪录指针移到数据表最初一行
rs.absoluteposition=N将纪录指针移到数据表第N行
rs.absolutepage=N将纪录指针移到第N页的第一行
rs.pagesize=N设置每页为N笔记录
rs.pagecount依据pagesize的设置前往总页数
rs.recordcount前往纪录总数
rs.bof前往纪录指针是不是超越数据表首端，true暗示是，false为否
rs.eof前往纪录指针是不是超越数据表末了，true暗示是，false为否
rs.delete删除以后纪录，但纪录指针不会向下挪动
rs.addnew增加纪录到数据表末了
rs.update更新数据表纪录
判别所填数据是数字型
ifnotisNumeric(request("字段称号"))then
response.write"不是数字"
else
response.write"数字"
endif页面实行工夫：
<%startime=Timer()%>
........
内容
......
开头
<%
DimEndtime
Endtime=Timer()
response.write"页面实行工夫：<fontcolor=red>"&FormatNumber((Endtime-Startime)*1000,5)&"</font>毫秒"
%>界说翻开网页时肇端窗口的巨细
<scriptfor="window"event="onload">
window.resizeTo(500,300)
</script>
随机数:
<%randomize%>
<%=(int(rnd()*n)+1)%>
查询数据时失掉的纪录关头字用白色显现：
replace(RS("字段X"),searchname,"<fontcolor=#FF0000>"&searchname&"</font>")
经由过程asp的手腕来反省来访者是不是用了代办署理
<%ifRequest.ServerVariables("HTTP_X_FORWARDED_FOR")""then
response.write"<fontcolor=#FF0000>您经由过程了代办署理服务器，"&_
"实在的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
endif
%>
判别上一页的来历
request.servervariables("HTTP_REFERER")
javascript:document.referrer
扫除缓存，从头加载页面
<%response.expires=0
response.expiresabsolute=now()-1
response.addHeader"pragma","no-cache"
response.addHeader"cache-control","private"
Response.cachecontrol="no-cache"
%>
检索并删除数据库里的反复纪录
conn.execute("deletefromtablewhereidnotin(selectdistinctfromtable)")
文件删除函数<%
文件删除函数
functiondeletefile(filename)
</p>专业性的服务。有的ASP商提供垂直型的应用服务，针对某一特定行业提供应用服务。 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。 Server:这个表示的服务器，操作服务器的一些东西使用这个，如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件 用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。 学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点: 先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习 运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。 ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。
页:
[1]