ASP网页设计几组有用的ASP程序和JS剧本代码
缺点：正版成本价格贵（盗版就不说了）、不够安全，大多数服务器用windows系统，没有linux安全js|程序|剧本ASP与Access数据库毗连：<%@language=VBscript%>
<%
dimconn,mdbfile
mdbfile=server.mappath("数据库称号.mdb")
setconn=server.createobject("adodb.connection")
conn.open"driver={microsoftaccessdriver(*.mdb)};uid=admin;pwd=数据库暗码;dbq="&mdbfile
%>
基础的分页代码：
<%
Response.write"<b>>>全体-"
Response.write"共</font>"&"<fontcolor=#FF0000>"&Cstr(Rs.RecordCount)&"</font>"&"条信息</b>"
Response.write"<b>第"&"<fontcolor=#FF0000>"&Cstr(CurrentPage)&"</font>"&"/"&Cstr(rs.pagecount)&"</b>"
Ifcurrentpage>1Then
response.write"<b><ahref=?&page="+cstr(1)+">首页</a></b>"
Response.write"<b><ahref="/?page="+Cstr(currentpage-1)+">上一页</a></b>"
Else
Response.write"<b>上一页</b>"
Endif
Ifcurrentpage<Rs.PageCountThen
Response.write"<b><ahref="/?page="+Cstr(currentPage+1)+">下一页</a>"
Response.write"<ahref="/?page="+Cstr(Rs.PageCount)+">尾页</a></b>"
Else
Response.write""
Response.write"<b>下一页</b>"
Endif
%>
复杂的ASP程序暗码锁，即扫瞄需身份考证的页面：
利用ASP程序来给网页举行加密，一样平常来讲使用程序来举行暗码考证的办法对照通用，如今年夜多半网站都利用ASP程序，它对Web服务器没有详细请求，而其加密就是借助数据库及ASP程序举行计划，来完成一种通用网页加密。
1.翻开MicrosoftAccess，创建一个"用户名及暗码"的数据表，假定将这个表取名为User，数据库名为db.mdb
数据表的布局以下：
字段申明字段称号数据范例数据长度
用户称号 ID 文本 15
用户暗码 PWD 文本 15
2.编纂一个Pass.asp的考证文件，源代码以下：
<%
FunctionCheck(ID,Pwd)
Dimconn,par,rs
Setconn=Server.createObject("ADODB.Connection")
par="driver={MicrosoftAccessDriver(*.mdb)}"
conn.Openpar&&";dbq="&&Server.MapPath("db.mdb")
sql="select?FromuserswhereID="&&ID&&"AndPwd="&&Pwd&&""
Setrs=conn.Execute(sql)
Ifrs.EOFThen
Check=False
Else
Check=True
EndIf
EndFunction
%>
<%
IfIsEmpty(Session("Passed"))ThenSession("Passed")=False
Head="请输出用户名和暗码"
ID=Request("ID")
Pwd=Request("Pwd")
IfID=""OrPwd=""Then
Head="请输出用户名和暗码"
ElseIfNotCheck(ID,Pwd)Then
Head="用户称号或暗码有错"
Else
Session("Passed")=True
EndIf
IfNotSession("Passed")Then
%>
<html>
<head>
<title></title>
</head>
<bodyBGCOLOR="#FFFFFF">
<h2ALIGN="CENTER"><%=Head%></h2>
<hrWIDTH="100%">
<formAction="<%=Request.ServerVariables("PATH_INFO")%>"Method="POST">
<tableBORDER="1"CELLSPACING="0">
<tr>
<tdALIGN="RIGHT">用户称号:</td>
<td><inputType="Text"Name="ID"Size="12"Value="<%=ID%>"></td>
</tr>
<tr><tdALIGN="RIGHT">暗码：</td>
<td><inputType="Password"Name="Pwd"Size="12"Value="<%=Pwd%>"></td></tr>
</table>
<p><inputType="Submit"Value="断定"></p></form>
<hrWIDTH="100%"align="center">
</body>
</html>
<%Response.End
EndIf%>
3.在必要加密网页的HTML代码最后面加上<!--＃includefile="pass.asp"-->就能够了。因为这个考证正当性的页面具有通用性，以是十分便利利用。
克制复制和右键菜单的剧本及代码：
1、<bodyoncontextmenu=returnfalseondragstart=returnfalseonselectstart=returnfalseonselect=document.selection.empty()oncopy=document.selection.empty()onbeforecopy=returnfalse>
2、<bodyoncontextmenu="returnfalse"ondragstart="returnfalse"onselectstart="returnfalse"onselect="document.selection.empty()"oncopy="document.selection.empty()"onbeforecopy="returnfalse">
3、<scripttype="text/javascript">
document.body.oncut=function(){returnfalse;};
document.body.onselectstart=function(){returnfalse;};
varprintBody=document.getElementById("printBody");
if(printBody!=undefined){
printBody.oncopy=function(){returnfalse;};
}
</script>
4、<bodyoncontextmenu="returnfalse"ondragstart="returnfalse"onselectstart="returnfalse">
5、<bodyoncontextmenu="returnfalse"onselectstart="returnfalse">
最复杂的是第五种，最原始的代码就是：oncontextmenu="returnfalse"禁右键，onselectstart="returnfalse"禁选中，用在<body>属性里，之前一向很管用，包含如今放IE里扫瞄也很灵，但跟着第三方功效壮大的扫瞄器的呈现，及各类有用插件的创造，象EnableRightClick这个插件就把禁选中和鼠标的锁右键轻松破解了，归根结柢是防菜鸟和懒人的，真的要废除限定，即便没有插件协助，一样能弄定。别的的几个增添了一些分外的参数，如第4个到场了形态栏信息。第3个分歧于别的四个(算是嵌进HTML代码)，是到场的剧本，另有之前那些击右键就弹出保藏夹或是"克制复制"的提醒，如今来看都是弱智型的了。
浮动的图片层，地位流动的：
<SCRIPT>
varsgImg="图片URL"
varsgWidth=63
varsgHeight=300
varsgLink="链接URL"
varsgNS=(document.layers)?true:false
if(sgNS){document.write(<LAYERID="Corner"WIDTH=+sgWidth+HEIGHT=+sgHeight+><Ahref="+sgLink+"target=_blank></A></DIV>);}
functionStayCorner(){varsgTop;varsgLeft
if(sgNS){sgTop=pageYOffset+window.innerHeight-document.Corner.document.height-10;sgLeft=pageXOffset+window.innerWidth-document.Corner.document.width-10;document.Corner.top=sgTop;document.Corner.left=sgLeft;}else{
sgTop=document.body.scrollTop+document.body.clientHeight-document.all.Corner.offsetHeight-30;sgLeft=document.body.scrollLeft+document.body.clientWidth-document.all.Corner.offsetWidth-5;Corner.style.top=sgTop;Corner.style.left=sgLeft;}
setTimeout(StayCorner(),50)}
sgDump=StayCorner()
</SCRIPT>
前往上一步
以下两种都能够：
<ahref="/javascript:history.back"()>前往</a>
<ahref="/javascript:history.go"(-1)>前往</a>
分外参数(ASP)：前往上一步时强迫扫瞄重视新会见服务器下载页面，非从缓存读取页面，实践上即是前往到上一步再革新一次，以确保页面信息的时效性：
<%
Response.Buffer=True
Response.Expires=1000
Response.ExpiresAbsolute=Now()-1
Response.Expires=0
Response.CacheControl="no-cache"
%>
往失落点击图片链接后图片四周的虚线：
1、挪用体例：
<public:attachevent="onfocus"onevent="example()"/>
<scriptlanguage="javascript">
functionexample(){
this.blur();
}
</script>
//将以上代码存为以.htc为扩大名的文件，然后再编写一个一般的HTML页。
<html>
<head>
<style>
A{behavior:url(HTC文件地点的路径地点，完全URL)}
</style>
<body>网页内容……
</body>
</html>
2、独自的图片文件：
图片属性里的语法为：，好比：
<ahref="#"><imgsrc="图片URL"border=0></a>
克制提醒剧本的毛病信息的小剧本：
<SCRIPTLANGUAGE="javascript">
<!--Hide
functionkillErrors(){
returntrue;
}
window.onerror=killErrors;
//-->
</SCRIPT>
页面上剧本语法弄错，有毛病提醒，却又弄不定，而页面功效无碍的情形下，能够如许偷个懒，把毛病提醒埋没失落
结论：和PHP一样，ASP简单而易于维护，很适合小型网站应用，通过DCOM和MTS技术，ASP甚至还可以完成小规模的企业应用，但ASP的致命缺点就是不支持跨平台的系统，在大型项目开发和维护上非常困难。 兴趣爱好，那么你无须学编程，申请一个域名和空间，在网上下载一些免费开源的CMS系统，你不用改代码，只须熟悉它们的后台操作，像office一样简单方便，很快就能建一个站点，很多站长都是这样做的 我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标. 他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。 下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。 ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点，理论上可以使用任何编程语言包括C++,VB,JS等等，当然，最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp)，它可以看作是VC和Java的混合体吧。 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。 多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。 我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。
页:
[1]