锘??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 鍒楀嚭涓嶅悓騫翠喚鐨勫勾浠? 騫朵笖涓嶈鐩稿悓
select distinct year(dateandtime) from ctarticle
緇撴灉濡?
Expr1000
2000
2003
2004
2005
2006
13.3.1 鍒楀嚭鏌愪竴澶? 涓婁竴騫寸殑絎竴鏉¤褰?
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 鍒楀嚭鏌愪竴騫寸殑鏁版嵁
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"
鍓嶄袱涓柟娉曟嵁璇存湁鏃朵細澶辨晥錛岃岀涓夌鍒欐槸鍦ㄨ煩杞椂浼犱竴涓殢鏈虹殑鍙傛暟錛?鍥犱負aspx鐨勭紦瀛樻槸涓庡弬鏁扮浉鍏崇殑錛屽鏋滃弬鏁頒笉鍚屽氨涓嶄細浣跨敤緙撳瓨錛岃屼細閲嶆柊鐢熸垚欏甸潰錛屾瘡嬈¢兘浼犱竴涓殢鏈虹殑鍙傛暟灝卞彲浠ラ伩鍏嶄嬌鐢ㄧ紦瀛樸?font color=#800080>榪欎釜浠呴傜敤浜巃sp&asp.net
asp鐨勯殢鏈烘暟鍑芥暟錛?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欏甸潰涓彲浣跨敤濡備笅浠g爜瀹炵幇鏃犵紦瀛橈細
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
榪欎簺浠g爜鍔犲湪<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銆倃indow.location.replace("WebForm1.aspx");
鍙傛暟灝辨槸浣犺瑕嗙洊鐨勯〉闈紝replace鐨勫師鐞嗗氨鏄敤褰撳墠欏甸潰鏇挎崲鎺塺eplace鍙傛暟鎸囧畾鐨勯〉闈€?
榪欐牱鍙互闃叉鐢ㄦ埛鐐瑰嚮back閿備嬌鐢ㄧ殑鏄痡avascript鑴氭湰錛?/strong>涓句緥濡備笅錛?/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>
鍓?縐嶅彧鏄竻絀轟簡cache錛屽嵆瀛樺偍鍦═emporary Internet Files鏂囦歡澶逛腑鐨勪復鏃舵枃浠訛紝鑰岀浜旂鍒欐槸浣跨敤璺寵漿欏甸潰鏂囦歡鏇挎崲褰撳墠欏甸潰鏂囦歡錛屽茍娌℃湁娓呯┖cache錛屼篃灝辨槸璇碩emporary Internet Files浜х敓浜嗙浉鍏崇殑涓存椂鏂囦歡錛屼袱鑰呮惌閰嶄嬌鐢ㄧ湡鏄竻絀虹紦瀛橈紝蹇呭鑹嵂銆傛濂芥垜榪欓噷鏈変簡璁板綍錛屾墍浠ュ父鏉ョ湅鐪嬪摝銆?/p>
灞炪鎬? | 鎻忋銆 榪般/銆娉ㄣ瑙? | |||
ActiveConnection | 鎸囧畾涓庢暟鎹彁渚涜呯殑榪炴帴淇℃伅錛岀敤鏉ユ寚瀹氬綋鍓嶇殑 Recordset 瀵硅薄灞炰簬鍝釜 Connection 瀵硅薄銆? | |||
Source | 鎸囧畾 Recordset 瀵硅薄鐨勬暟鎹簮錛屽彲浠ユ槸涓涓?Command 瀵硅薄鍚嶃丼QL 璇彞銆佹暟鎹簱琛ㄦ垨瀛樺偍榪囩▼ 銆? | |||
CoursorType | 鎸囧畾 Recordset 瀵硅薄鎵浣跨敤鐨勫厜鏍囩被鍨嬨? | |||
鍏辨湁 4 縐嶅厜鏍囩被鍨嬶細 銆銆0 涓 鍓嶆粴鍏夋爣錛屽厜鏍囧彧鑳藉悜鍓嶇Щ鍔紝鎵ц鏁堢巼楂樸傛槸 Cursor 鐨勯粯璁ゅ鹼紱 銆銆1 涓 閿洏鍏夋爣錛屽厜鏍囧彲鍚戝墠鎴栧悜鍚庣Щ鍔紝Recordset 璁板綍闆嗗悓姝ュ弽鏄犺嚜瀹冨垱寤哄悗鍏朵粬鐢ㄦ埛鎵浣滅殑淇敼鍜屽垹闄わ紝浣嗗嵈涓嶈兘鍚屾鍙嶆槧鑷畠鍒涘緩鍚庡叾浠栫敤鎴鋒柊澧炲姞鐨勮褰曪紱 銆銆2 涓 鍔ㄦ佸厜鏍囷紝鍏夋爣鍙悜鍓嶆垨鍚戝悗婊氬姩錛屼換浣曟椂鍊?Recordset 璁板綍闆嗛兘鍚屾鍙嶆槧鍏朵粬鐢ㄦ埛鐨勪換浣曟搷浣滐紱 銆銆3 涓 闈欐佸厜鏍囷紝鍏夋爣鍙悜鍓嶆垨鍚戝悗縐誨姩錛岃嚜鍒涘緩鍚庢棤娉曞悓姝ュ弽鏄犲叾浠栫敤鎴鋒墍鍋氱殑浠諱綍鎿嶄綔錛屽畠鐨勫姛鑳界畝鍗曚絾娑堣楄祫婧愬皯銆?br> |
||||
LockType | 琛ㄧず緙栬緫鏃惰褰曠殑閿佸畾綾誨瀷銆傚畠鍐沖畾浜嗗綋涓嶆涓涓敤鎴瘋瘯鍥懼悓鏃舵敼鍙樹竴涓褰曟椂錛孯ecordset 濡備綍澶勭悊鏁版嵁璁板綍銆?/td> | |||
0 涓 鍙閿佸畾錛岃褰曞彧璇伙紝涓嶈兘鏇存柊 Recordset ,涓?LockType 鐨勯粯璁ゅ鹼紱 銆銆1 涓 鎮茶閿佸畾錛岀紪杈戣褰曞紑濮嬬珛鍒婚攣瀹氾紝鐩村埌鎻愪氦緇欐暟鎹彁渚涜咃紱 銆銆2 涓 涔愯閿佸畾錛屼竴嬈¢攣瀹氫竴鏉¤褰曪紝鍙湁璋冪敤 Update 鏂規硶鎻愪氦鏁版嵁鏃舵墠閿佸畾璁板綍錛?br>銆銆3 涓 涔愯鐨勬壒閲忔洿鏂幫紝鍏佽鍚屾椂鏇存柊澶氭潯璁板綍銆?br> |
||||
Filter | 鐢ㄦ潵璁懼畾涓涓繃婊ゆ潯浠訛紝浠ヤ究瀵?Recordset 璁板綍榪涜榪囨護銆? | |||
CacheSize | 琛ㄧず涓涓?Recordset 瀵硅薄鍦ㄩ珮閫熺紦瀛樹腑鐨勮褰曟暟銆?/td> | |||
Maxrecords | 鎵ц涓涓?SQL 鏌ヨ鏃訛紝榪斿洖 Recordset 瀵硅薄鐨勬渶澶ц褰曟暟銆?/td> | |||
Bof | 鍒ゆ柇璁板綍鎸囬拡鏄惁鍒頒簡絎竴鏉¤褰曚箣鍓嶃?/td> | |||
Eof | 鍒ゆ柇璁板綍鎸囬拡鏄惁鍒頒簡鏈鍚庝竴鏉¤褰曚箣鍚庛?/td> | |||
RecordCount | 榪斿洖 Recordset 瀵硅薄鐨勮褰曟暟錛岋紙鍦ㄤ嬌鐢ㄩ敭鐩樺厜鏍囨椂錛岃灞炴榪斿洖 鐨勫彲鑳芥槸涓嶅お鍑嗙‘鐨勬暟鍊鹼紱涓鑸儏鍐典笅錛屽茍涓嶇敤榪欑鏂規硶鏉ョ粺璁?Recordset 涓殑璁板綍鏁幫紝鍥犱負瀹冪殑鎬ц兘騫朵笉紼沖畾錛?/td> | |||
Bookmark | 涔︾鏍囪錛岀敤鏉ヤ繚瀛樺綋鍓嶈褰曠殑浣嶇疆銆?/td> | |||
AbsolutePosition | 鐢ㄦ潵璁懼畾 Recordset 瀵硅薄涓綋鍓嶈褰曠殑欏哄簭浣嶇疆鏄鍑犺璁板綍銆?/td> | |||
PageSize | 琛ㄧず Reccordset 瀵硅薄鐨勯〉闈㈠ぇ灝忥紙姣忛〉澶氬皯鏉¤褰曪級錛岄粯璁ゅ間負10銆?/td> | |||
PageCount | 琛ㄧず Recordset 瀵硅薄鐨勯〉闈釜鏁般? | |||
AbsolutePage | 琛ㄧず褰撳墠璁板綍鐨勯〉鍙楓?/td> | |||
EditMode | 鎸囩ず褰撳墠璁板綍鐨勭紪杈戠姸鎬侊紝0 涓 宸茶緙栬緫錛? 涓 宸茶淇敼鑰屾湭鎻愪氦錛? 涓 瀛樺叆鏁版嵁搴撶殑鏂拌褰?銆? | |||
Status | 瀵?Recordset 瀵硅薄榪涜鎵歸噺鏇存柊鍚庯紝鏌ヨ褰撳墠璁板綍鐨勭姸鎬併? | |||
鍊?/td> | 鎰忎箟鎻忚堪 | 鍊?/td> | 鎰忎箟鎻忚堪 | |
0 | 璁板綍鏇存柊鎴愬姛銆?/td> | 1024 | 瀛樺湪璁板綍閿佸畾錛屾柊璁板綍鏈繚瀛樸?/td> | |
1 | 鏂拌褰曘?/td> | 2048 | 浣跨敤涔愯騫跺彂浜嬩歡錛屾湭淇濆瓨銆?/td> | |
2 | 璁板綍琚垹闄ゃ?/td> | 4096 | 鐢ㄦ埛榪濆弽瀹屾暣鎬ц鍒欙紝璁板綍鏈繚瀛樸?/td> | |
4 | 璁板綍鏈鍒犻櫎銆?/td> | 8192 | 銆銆寰堝緟瀹氫慨鏀癸紝璁板綍鏈繚瀛樸?br> | |
8 | 璁板綍鏈淇敼銆?/td> | 16384 | 涓庝竴瀛樺偍瀵硅薄鐩稿啿紿侊紝璁板綍鏈繚瀛樸?/td> | |
16 | 涔︾涓嶅悎娉曪紝璁板綍鏈繚瀛樸?/td> | 32768 | 鍐呭瓨涓嶅錛岃褰曟湭淇濆瓨銆?/td> | |
64 | 褰卞搷澶氫釜璁板綍錛屾湭淇濆瓨銆?/td> | 65536 | 鐢ㄦ埛娌℃湁涓佽凍澶熺殑鏉冮檺錛屾湭淇濆瓨銆?/td> | |
128 | 鎸囧悜涓寰呭畾鎻掑叆錛岃褰曟湭淇濆瓨銆?/td> | 131072 | 榪濆弽鍩烘湰鏁版嵁搴撳師鍒欙紝璁板綍鏈繚瀛樸?/td> | |
256 | 鎿嶄綔琚彇娑堬紝璁板綍鏈繚瀛樸?/td> | 262144 | 璁板綍宸蹭粠鏁版嵁婧愬垹闄ゃ?/td> |
3)銆佷繚瀛樻坊鍔犳暟鎹〉闈細add.asp銆傝欏甸潰鐨勫姛鑳芥湁錛歛)銆佷嬌鐢≧equest瀵硅薄鑾峰彇浠巃dd.htm欏甸潰鎻愪氦鐨勫鹼紱b)銆佸垱寤轟笁涓璞★紙涓涓繛鎺ュ璞°佷簩涓褰曢泦瀵硅薄錛夛紝閫氳繃rs.addnew,rs.update涓や釜鍑芥暟灝嗘暟鎹繚瀛樺埌鏁版嵁搴擄紱c)銆佹樉紺轟俊鎭彁紺烘銆?br>
<% @ Language="VBScript" %>
銆銆銆銆<html>
<head>
<title>娣誨姞璁板綍</title>
</head>
<body>
<!-- #include virtual ="/adovbs.inc" -->
<%
'**************浣跨敤Request瀵硅薄鑾峰彇浠巃dd.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("鍛樺伐濮撳悕銆佹墍鍦ㄩ儴闂ㄥ拰瀹跺涵浣忓潃涓彧灝戞湁涓欏逛負絀?璇峰~鍐欏畬鏁淬?)
history.back
</script>
<%
else
'****************鍒涘緩涓変釜瀵硅薄錛堜竴涓繛鎺ュ璞°佷簩涓褰曢泦瀵硅薄錛?********************
dim cnn,rst
set cnn=Server.CreateObject("ADODB.Connection")
'鎸囧畾榪炴帴瀛楃涓詫紝
cnn.ConnectionString="PROVIDER=Microsoft.jet.OLEDB.4.0;Data Source=" & server.MapPath("../rsgl.mdb")
cnn.Open
'寤虹珛Recordset瀵硅薄騫朵互榪藉姞璁板綍鏂瑰紡鎵撳紑鏁版嵁搴撱?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 '濡傛灉鏁版嵁琛ㄤ腑鏃犳鏁版嵁錛屽垯娣誨姞璁板綍銆?br>rst1.Open "鍛樺伐鍩烘湰鎯呭喌琛?,cnn ,1,2
rst1.addnew array("鍛樺伐濮撳悕","鎵鍦ㄩ儴闂?,"瀹跺涵浣忓潃","瀹跺涵鐢佃瘽","Email"),array(name1,Department,Addr,Tel,Email)
rst1.update
%>
<!--**********鏄劇ず淇℃伅鎻愮ず妗?*************-->
<script language="vbscript">
alert("璁板綍娣誨姞鎴愬姛錛?)
window.location.href="index.asp"
</script>
<%
rst1.close
set rst1=nothing
else
%>
<script language="vbscript">
alert("鍛樺伐濮撳悕涓猴細“<%=name1 %>” 鐨勮褰曞凡緇忓瓨鍦ㄣ?)
history.back
</script>
<%
end if
rst.close
set rst=nothing
end if
%>
<h3>璁板綍娣誨姞鎴愬姛錛?lt;/h3>
<p><a href="add.htm">榪斿洖璁板綍娣誨姞琛ㄥ崟</a> || <a href="index.asp">榪斿洖棣栭〉</a>
</center>
</body>
</html>
銆銆4)銆佹洿鏀規暟鎹〉闈細Update.asp銆傝欏甸潰鐨勫姛鑳芥湁錛歛銆佸垱寤轟袱涓璞★紝Connectiion瀵硅薄鍜孯ecordset瀵硅薄錛屽叾鐩殑鏄繛鎺ユ暟鎹簱鍜岃繑鍥炰竴涓褰曢泦錛沚銆佸垱寤轟竴涓〃鍗曪紝鍏剁洰鐨勬槸鎻愪氦鏇存敼榪囩殑鏁版嵁銆?br>
<%
a=request("id")
response.write a
'response.end
'****************鍒涘緩涓や釜瀵硅薄錛堣繛鎺ュ璞°佽褰曢泦瀵硅薄)*********************
dim cnn,rst,cmd
set cnn=Server.CreateObject("ADODB.Connection")
set rst=Server.CreateObject("ADODB.Recordset")
'鎸囧畾榪炴帴瀛楃涓詫紝
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">鍛樺伐濮撳悕錛?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">瀹跺涵浣忓潃錛?lt;/td>
<td><input type="text" name="txtAddr" value=<%=rst("瀹跺涵浣忓潃")%>></td></tr>
<tr><td align="right">瀹跺涵鐢佃瘽錛?lt;/td>
<td><input type="text" name="txtTel" value=<%=rst("瀹跺涵鐢佃瘽")%>></td></tr>
<tr><td align="right">Email錛?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>