session与cookies的区别

ggp asp 2013-07-01 474 次浏览
session变量保存在客户端主机的内存上,关闭浏览器或者session脚本过期后,即自动清除。 ??? cookies保存在客户端主机的硬盘上,可以自行设置cookies的存在周期,除非设置了临时cookies,否则关闭浏览器后cookies信息仍旧保存在主机的硬盘上。 ??? Cookies的安全性能一直是倍受争议的。虽然Cookies是保存在本机上的,但是其信息的完全可见性且易于本地编辑性,往往可以引起很多的安全问题。所以Cookies到底该不该用,到底该怎样用,就有了一个需要给定的底线。 ??? 先来看看,网站的敏感数据有哪些。 ??? 登陆验证信息。一般 阅读全文...

一个漂亮的点击计数器

ggp asp 2013-06-29 525 次浏览
<%@ Language=VBScript %> <html> <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Provider = "Microsoft.Jet.OLEDB.4.0" Conn.ConnectionString = "Data Source=" & Server.MapPath ("db1.mdb") Conn.Open Set Rs = Server.CreateObject("ADODB.Recordset") Rs.Open "SELECT * from table1", Conn, 1,3 Rs.addnew rs.movelast Rs("hits") =hits Rs.update %> <body bgcolor="#FFFFFF"> <center> ???<table width=97 height="44"> ????<tr> ??????<td background="coun 阅读全文...

产生随机密码的ASP函数

ggp asp 2013-06-29 445 次浏览
<% response.write makePassword(16) function makePassword(byVal maxLen) Dim strNewPass Dim whatsNext, upper, lower, intCounter Randomize For intCounter = 1 To maxLen ????whatsNext = Int((1 - 0 + 1) * Rnd + 0) If whatsNext = 0 Then character ????????upper = 90 ????????lower = 65 Else ????????upper = 57 ????????lower = 48 End If ????????strNewPass = strNewPass & Chr(Int((upper - lower + 1) * Rnd + lower)) Next ????????makePassword = strNewPass end function %>尿道口尖锐湿疣,浙江尖锐湿 阅读全文...

asp在线用表单建立文件夹

ggp asp 2013-06-29 427 次浏览
HTML格式的Form表单文件FOLDER.htm的内容: <form name="form1" method="post" action="folder-action.asp"> Create a folder <input type="text" name="name"> <input type="submit" name="Submit" value="Submit"> </form> ASP文件FOLDER-ACTION.ASP <%@ LANGUAGE = "VBScript" %> <% Dim Name Name = Request("Name") set fs=createobject("scripting.filesystemobject") MyFolder=server.mappath(""&name&"") If NOT fs.folderexists(MyFolder) then fs.createfolder(MyFolder) End If If 阅读全文...

用ASPMail组件实现E_mail自动反馈

ggp asp 2013-06-29 358 次浏览
网页上E_mail自动反馈的asp程序示例如下: <% Set mailer = Server.CreateObject("ASPMAIL.ASPMailCtrl.1")?? recipient="接收者email" sender="发送者email" subject="email的主题" message="email的内容" mailserver = "mail.drcnet.com.cn"; result = mailer.SendMail(mailserver, recipient, sender, subject, message) %>尖锐湿疣医院,北京性病医院,女性尖锐湿疣初期图, 阅读全文...

WEB页面简单进度记时器

ggp asp 2013-06-29 467 次浏览
<html> <head> <title> TimeBar Version 1.0 </title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta http-equiv="Refresh" content="20;url="> <style> td {font-size: 10.5pt; color: 147e19; font-family: Courier New;} </style> </head> <body bgcolor="#FFFFFF"> <br><br><br><br> <center> <table width=500 border=0> <tr><td> <br> <p align=center>TimeBar V1.0 by 阅读全文...

利用CDONTS发送邮件的ASP函数

ggp asp 2013-06-29 508 次浏览
<% Last Updated By Recon On 05/14/2001 On Error Resume Next 利用CDONTS组件在Win2k上发送邮件 发送普通邮件 SendMail "admin@ny.com", "iamchn@263.net", "Normal Mail!", "Please check the attatchment!", 2, 0, "C:Love.txt" 发送HTML邮件 Dim m_fso, m_tf Dim m_strHTML Set m_fso = Server.CreateObject("SCRIPTING.FILESYSTEMOBJECT") Set m_tf = m_fso.OpenTextFile("C:Mail.htm", 1) m_strHTML = m_tf.ReadAll Write m_strHTML Set m_tf = Nothing Set m_fso = Nothing SendMail "admin@ny.com", "iamchn@263.net", 阅读全文...

跟我学做最强功能的asp网站统计

ggp asp 2013-06-29 515 次浏览
一个能对访问者进行编号、记录访问次数、IP、时间的统计制作实例 我做了一个网站,www.zydn.net??当然啦,跟大家一样,也摆了个计数器在上面,每天看计数器都在不断的翻,心里很高兴,不过后来我又想,到底是谁看了我的网站啊?是新朋友还是老朋友啊?也不知他们来了多少次,我还想给他们都编上号,于是我申请了 免费统计,不过一连换了N个都不满意,唉,看来,只有自己动手才能丰衣足食了,说干就干,水平臭臭,还望高手笑话之于,不访指教。 我以access(小型网站之最爱)库为例子,其实用sql server(WINDOWS平台上强大的数据库平台)库 阅读全文...

用ASP技术编制隐藏用户密码程序

ggp asp 2013-06-29 461 次浏览
Internet(或Intranet)上带权限的查询,只有“合法用户”才能进入。这种机制是通过Web程序实现的。在访问过程中,如果程序设计得不好,就会将用户口令暴露在地址栏里(举一个例子:http://www.mmm.nnn/default.asp ?superusername=john&passwd=john123,用户名john和密码john123全露出来了),这样系统就无保密和安全性可言了。怎样避免这种现象的发生呢?本文将用一段ASP(Active Server pages)程序,来说明隐藏用户名和口令的方法。 ????ASP是Microsoft公司处理动态网络数据库的最新技术之一,它可由Windows NT 平台上的Web Server I 阅读全文...

ASP实现播放Flash的例子

ggp asp 2013-06-29 384 次浏览
<!-- #include file = "DB.fun" --> <% mingcheng=request("mingcheng") sec=Request("score") session("mingcheng")=mingcheng session("sec")=sec If session("ID")="" then ???response.redirect "qzhuce.asp" ???response.end End If dim time1 sec=Request("score") Set conn = GetMdbConnection("score.mdb") time1=Cstr(date) SQL2="select * from mmd where nickname="&session("id")&"" Set zy2 = Conn.Execute( SQL2 ) old = zy2("mgdf") response.write old zy2.close if cint(old) <= cint(sec) and cint 阅读全文...
回顶部