明輝手游網(wǎng)中心：是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺！

一些Asp技巧與實用處理方法

發(fā)表時間：2024-02-03 來源：明輝站整理相關(guān)軟件相關(guān)文章人氣：

[摘要]一些Asp技巧和實用解決方法 隨機數(shù): <%randomize%> <%=(int(rnd()*n)+1)%> 查詢數(shù)據(jù)時得到的記錄關(guān)鍵字用紅色顯示： <% =replace(RS("字段X"),searchname,"<font ...
一些Asp技巧和實用解決方法
隨機數(shù):
<%randomize%>
<%=(int(rnd()*n)+1)%>
查詢數(shù)據(jù)時得到的記錄關(guān)鍵字用紅色顯示：
<% =replace(RS("字段X"),searchname,"<font color=#FF0000>" & searchname & "</font>") %>
通過asp的手段來檢查來訪者是否用了代理
<% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then
response.write "<font color=#FF0000>您通過了代理服務(wù)器，"& _
"真實的IP為"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if
%> 
判斷上一頁的來源
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"
%>
在下拉菜單中顯示年和月
<select name="select">
<%
Dim M_Year 
Dim M_Month
Dim M_MonthJ
Dim M_TheMonth
Dim M_YM
For M_Year = 2000 To Year(Date) 
M_Month = 12 
If M_Year = Year(Date) Then 
M_Month = Month(Date) 
End If
For M_MonthJ=1 To M_Month
If M_MonthJ < 10 Then
M_TheMonth = "0" & M_MonthJ
Else
M_TheMonth = M_MonthJ
End If
M_YM = M_Year& "-" & M_TheMonth %>
<option value="<%= M_YM %>"><%= M_YM %></option>
<%
Next
Next %>
</select>
檢索并刪除數(shù)據(jù)庫里的重復記錄
conn.execute("delete from table where id not in (select distinct from table)")