??xml version="1.0" encoding="utf-8" standalone="yes"?>
SELECT distinct dateandtime
FROM ctdate_by_query_date
WHERE dateandtime between ((#2006-5-15#+(Weekday(2006-5-15)-7))-6) and (#2006-5-15#-7)+Weekday(2006-5-15)
sql="SELECT distinct dateandtime FROM ctarticle WHERE dateandtime between ((#"&date&"#+(Weekday("&date&")"&norp&"7))-6) and (#"&date&"#"&norp&"7)+Weekday("&date&")"
13.5 查询一? 所隶属星期所有天数的数据
SELECT *
FROM ctdate_by_query_date
WHERE dateandtime between ((#2006-5-15#+Weekday(2006-5-15))-6) and #2006-5-15#+Weekday(2006-5-15)
13.4 查询一个时间段
SELECT *
FROM ctdate_by_query_date
WHERE dateandtime between #2006-5-1# and #2006-5-30#
13.3.2 列出不同q䆾的年? q且不要相同
select distinct year(dateandtime) from ctarticle
l果?
Expr1000
2000
2003
2004
2005
2006
13.3.1 列出某一? 上一q的W一条记?
SELECT top 1 dateandtime FROM ctarticle where year(dateandtime)=(2006)-1
sql="SELECT top 1 dateandtime FROM ctarticle where year(dateandtime)=(year(#"&date&"#))"&norp
13.3 列出某一q的数据
sql="select * from ctdate_by_query_date where year(dateandtime)="&year(rqqdt_)&" order by dateandtime desc"
13.2.1 查找上一月中的第一条记?
SELECT top 1 dateandtime FROM ctarticle where year(dateandtime)=year(#2006-5-28#) and month(dateandtime)=month(#2006-5-28#)-1
13.2 列出某一月的数据
sql="select * from ctdate_by_query_date where year(dateandtime)="&year(rqqdt_)&" and month(dateandtime)="&month(rqqdt_)&" order by dateandtime desc"
13.1 列出某一日的数据
sql="select * from ctdate_by_query_date where dateandtime=#"&rqqdt_&"# order by a.articleid desc"
13. 旉日期
例一: 列出当天的数?
sql="select * from ctdate_by_query_date where dateandtime=date() order by a.articleid desc"
前两个方法据说有时会失效Q而第三种则是在蟩转时传一个随机的参数Q?因ؓaspx的缓存是与参数相关的Q如果参C同就不会使用~存Q而会重新生成面Q每ơ都传一个随机的参数可以避免用缓存?font color=#800080>q个仅适用于asp&asp.net
asp的随机数函数Q?br>Function rndNum (strLong)
Dim temNum
Randomize
Do While Len(RndNum) < strLong
temNum=CStr(Chr((57-48)*rnd+48))
RndNum=RndNum&temNum
loop
End Function
参数为需要的随机数长?2
4。在jsp面中可使用如下代码实现无缓存:
response.setHeader("Cache-Control","no-cache"); //HTTP 1.1
response.setHeader("Pragma","no-cache"); //HTTP 1.0
response.setDateHeader ("Expires", 0); //prevents caching at the proxy server
q些代码加在<head> </head>中间具体如下
<head>
<%
response.setHeader("Cache-Control","no-cache"); //HTTP 1.1
response.setHeader("Pragma","no-cache"); //HTTP 1.0
response.setDateHeader ("Expires", 0); //prevents caching at the proxy server
%>
</head>
5。window.location.replace("WebForm1.aspx");
参数是你要覆盖的页面,replace的原理就是用当前面替换掉replace参数指定的页面?
q样可以防止用户点击back键。用的是javascript脚本Q?/strong>举例如下Q?/font>
a.html
<html>
<head>
<title>a</title>
<script language="javascript">
function jump(){
window.location.replace("b.html");
}
</script>
</head>
<body>
<a href="javascript:jump()">b</a>
</body>
</html>
b.html
<html>
<head>
<title>b</title>
<script language="javascript">
function jump(){
window.location.replace("a.html");
}
</script>
</head>
<body>
<a href="javascript:jump()">a</a>
</body>
</html>
?U只是清IZcacheQ即存储在Temporary Internet Files文g夹中的时文Ӟ而第五种则是使用跌{面文g替换当前面文gQƈ没有清空cacheQ也是说Temporary Internet Files产生了相关的临时文gQ两者搭配用真是清I缓存,必备良药。正好我q里有了记录Q所以常来看看哦?/p>
属 ? | 描 q / 注 ? | |||
ActiveConnection | 指定与数据提供者的q接信息Q用来指定当前的 Recordset 对象属于哪个 Connection 对象? | |||
Source | 指定 Recordset 对象的数据源Q可以是一?Command 对象名、SQL 语句、数据库表或存储q程 ? | |||
CoursorType | 指定 Recordset 对象所使用的光标类型? | |||
共有 4 U光标类型: 0 一 前滚光标Q光标只能向前移动,执行效率高。是 Cursor 的默认| 1 一 键盘光标Q光标可向前或向后移动,Recordset 记录集同步反映自它创建后其他用户所作的修改和删除,但却不能同步反映自它创徏后其他用h增加的记录; 2 一 动态光标,光标可向前或向后滚动QQ何时?Recordset 记录集都同步反映其他用户的Q何操作; 3 一 静态光标,光标可向前或向后UdQ自创徏后无法同步反映其他用h做的M操作Q它的功能简单但消耗资源少?br> |
||||
LockType | 表示~辑时记录的锁定cd。它军_了当不止一个用戯囑时改变一个记录时QRecordset 如何处理数据记录?/td> | |||
0 一 只读锁定Q记录只读,不能更新 Recordset ,?LockType 的默认| 1 一 悲观锁定Q编辑记录开始立刻锁定,直到提交l数据提供者; 2 一 乐观锁定Q一ơ锁定一条记录,只有调用 Update Ҏ提交数据时才锁定记录Q?br> 3 一 乐观的批量更斎ͼ允许同时更新多条记录?br> |
||||
Filter | 用来讑֮一个过滤条Ӟ以便?Recordset 记录q行qo? | |||
CacheSize | 表示一?Recordset 对象在高速缓存中的记录数?/td> | |||
Maxrecords | 执行一?SQL 查询Ӟq回 Recordset 对象的最大记录数?/td> | |||
Bof | 判断记录指针是否CW一条记录之前?/td> | |||
Eof | 判断记录指针是否C最后一条记录之后?/td> | |||
RecordCount | q回 Recordset 对象的记录数Q(在用键盘光标时Q该属怀q回 的可能是不太准确的数|一般情况下Qƈ不用q种Ҏ来统?Recordset 中的记录敎ͼ因ؓ它的性能q不E_Q?/td> | |||
Bookmark | 书签标记Q用来保存当前记录的位置?/td> | |||
AbsolutePosition | 用来讑֮ Recordset 对象中当前记录的序位置是第几行记录?/td> | |||
PageSize | 表示 Reccordset 对象的页面大(每页多少条记录)Q默认gؓ10?/td> | |||
PageCount | 表示 Recordset 对象的页面个数? | |||
AbsolutePage | 表示当前记录的页受?/td> | |||
EditMode | 指示当前记录的编辑状态,0 一 已被~辑Q? 一 已被修改而未提交Q? 一 存入数据库的新记?? | |||
Status | ?Recordset 对象q行扚w更新后,查询当前记录的状态? | |||
?/td> | 意义描述 | ?/td> | 意义描述 | |
0 | 记录更新成功?/td> | 1024 | 存在记录锁定Q新记录未保存?/td> | |
1 | 新记录?/td> | 2048 | 使用乐观q发事gQ未保存?/td> | |
2 | 记录被删除?/td> | 4096 | 用户q反完整性规则,记录未保存?/td> | |
4 | 记录未被删除?/td> | 8192 | 很待定修改,记录未保存?br> | |
8 | 记录未被修改?/td> | 16384 | 与一存储对象相冲H,记录未保存?/td> | |
16 | 书签不合法,记录未保存?/td> | 32768 | 内存不够Q记录未保存?/td> | |
64 | 影响多个记录Q未保存?/td> | 65536 | 用户没有中、够的权限Q未保存?/td> | |
128 | 指向一待定插入Q记录未保存?/td> | 131072 | q反基本数据库原则,记录未保存?/td> | |
256 | 操作被取消,记录未保存?/td> | 262144 | 记录已从数据源删除?/td> |
3)、保存添加数据页面:add.asp。该面的功能有Qa)、用Request对象获取从add.htm面提交的|b)、创Z个对象(一个连接对象、二个记录集对象Q,通过rs.addnew,rs.update两个函数数据保存到数据库;c)、显CZ息提C框?br>
<% @ Language="VBScript" %>
<html>
<head>
<title>d记录</title>
</head>
<body>
<!-- #include virtual ="/adovbs.inc" -->
<%
'**************使用Request对象获取从add.htm面中提交的?***********************************
Name1=Request.Form("txtName")
Department=Request.Form("txtDepartment")
Addr=Request.Form("txtAddr")
Tel=Request.Form("txtTel")
Email=Request.Form("txtEmail")
if Tel="" then
Tel="不祥"
end if
if Email="" then
Email="不祥"
end if
if name1="" or department="" or Addr="" then
%>
<script language="vbscript">
alert("员工姓名、所在部门和家庭住址中只有一ؓI?请填写完整?)
history.back
</script>
<%
else
'****************创徏三个对象Q一个连接对象、二个记录集对象Q?********************
dim cnn,rst
set cnn=Server.CreateObject("ADODB.Connection")
'指定q接字符Ԍ
cnn.ConnectionString="PROVIDER=Microsoft.jet.OLEDB.4.0;Data Source=" & server.MapPath("../rsgl.mdb")
cnn.Open
'建立Recordset对象q以q加记录方式打开数据库?br>set rst=Server.CreateObject("ADODB.Recordset")
set rst1=Server.CreateObject("ADODB.Recordset")
sSQL="select * from 员工基本情况?where 员工姓名='" & name1 & "'"
rst.Open sSQL,cnn,1,1
if rst.EOF or rst.BOF then '如果数据表中无此数据Q则d记录?br>rst1.Open "员工基本情况?,cnn ,1,2
rst1.addnew array("员工姓名","所在部?,"家庭住址","家庭电话","Email"),array(name1,Department,Addr,Tel,Email)
rst1.update
%>
<!--**********昄信息提示?*************-->
<script language="vbscript">
alert("记录d成功Q?)
window.location.href="index.asp"
</script>
<%
rst1.close
set rst1=nothing
else
%>
<script language="vbscript">
alert("员工姓名为:“<%=name1 %>” 的记录已l存在?)
history.back
</script>
<%
end if
rst.close
set rst=nothing
end if
%>
<h3>记录d成功Q?lt;/h3>
<p><a href="add.htm">q回记录d表单</a> || <a href="index.asp">q回首页</a>
</center>
</body>
</html>
4)、更Ҏ据页面:Update.asp。该面的功能有Qa、创Z个对象,Connectiion对象和Recordset对象Q其目的是连接数据库和返回一个记录集Qb、创Z个表单,其目的是提交更改q的数据?br>
<%
a=request("id")
response.write a
'response.end
'****************创徏两个对象Q连接对象、记录集对象)*********************
dim cnn,rst,cmd
set cnn=Server.CreateObject("ADODB.Connection")
set rst=Server.CreateObject("ADODB.Recordset")
'指定q接字符Ԍ
cnn.ConnectionString="PROVIDER=Microsoft.jet.OLEDB.4.0;Data Source=" & server.MapPath("../rsgl.mdb")
cnn.Open
sSQL="select * from 员工基本情况?where 员工姓名='" & a & "'"
'rst.Open sSQL,cnn,1,1
set rst=cnn.Execute(sSQL,,adCmdText)
%>
<html>
<head><title>更改记录</title></head>
<body>
<div align="center">
<!--****************创徏一个表?****************************-->
<form name="form1" method="post" action="Update2.asp">
<table align="center" border="1">
<tr><td colspan="2" align="center">员工基本情况?lt;/td></tr>
<tr><td align="right">员工姓名Q?lt;/td>
<td><input type="text" name="txtName" value=<%=rst("员工姓名")%> readonly></td></tr>
<tr><td align="right">所在部门:</td>
<td><input type="text" name="txtDepartment" value=<%=rst("所在部?)%>></td></tr>
<tr><td align="right">家庭住址Q?lt;/td>
<td><input type="text" name="txtAddr" value=<%=rst("家庭住址")%>></td></tr>
<tr><td align="right">家庭电话Q?lt;/td>
<td><input type="text" name="txtTel" value=<%=rst("家庭电话")%>></td></tr>
<tr><td align="right">EmailQ?lt;/td>
<td><input type="text" name="txtemail" value=<%=rst("Email")%>></td></tr>
<tr><td align="center"><input type="submit" value="提交"></td>
<td align="center"><input type="reset" value="全部重写"></td></tr>
</table>
</form>
</div>
</body>
</html>