当前位置: 首页 > 图文教程 > 网络编程 > ASP > 一些Asp技巧和实用解决方法

ASP
一个BBS的源代码(五)
一个BBS的源代码(六)
通过asp入侵web server,窃取文件毁坏系统
微软dvwssr.dll后门
ASP3.0给我们带来的新技术之一---Data Shaping技术
ASP环境下邮件列表功能的实现 (一)(推荐)
ASP环境下邮件列表功能的实现 (二)(推荐)
ASP环境下邮件列表功能的实现 (三)(推荐)
用ASP实现网页保密的两种方法
聊天室实现私聊(一)
聊天室实现私聊(二)
聊天室实现私聊(三)
聊天室实现私聊(四)
ADO存取数据时如何实现留言记录的分页显示
在ASP中常见的错误80004005信息和解决办法
用ASP实现一个真正的注册页面
一个简单聊天室的建立.(供学习参考)
ASP的Internet/Intranet编程常见问题
构建你的网站新闻自动发布系统之一
构建你的网站新闻自动发布系统之二

ASP 中的 一些Asp技巧和实用解决方法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 129 ::
收藏到网摘: n/a

一些Asp技巧和实用解决方法
随机数:
<%randomize%>
<%=(int(rnd()*n)+1)%>
查询数据时得到的记录关键字用红色显示:
<% =replace(RS("字段X"),searchname,"<font color=#FF0000>" & searchname & "</font>") %>
通过asp的手段来检查来访者是否用了代理
<% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then
response.write "<font color=#FF0000>您通过了代理服务器,"& _
"真实的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>
检索并删除数据库里的重复记录
conn.execute("delete from table where id not in (select distinct from table)")