asp 取得反日期
<%
function dt(v)
dim dy
dy=31
Marr=array(4,6,9,11)
yyyy=Year(Date())
mm=Month(Date())
dd=Day(Date())
if mm=2 then
if yyyy mod 400 or (yyyy mod 4=0 and yyyy mod v0=0) then
dy=29
else
dy=28
end if
else
for i=0 to 3
if Marr(i)=mm then
dy=30
exit for
end if
next
end if
if dd-v<=0 then
if Month(Date())-1<=0 then
dt=(Year(Date())-1)&"-"&(12-(Month(Date())-1))&"-"&(dy-abs(dd-v))&" 00:00:00"
else
dt=(Year(Date()))&"-"&(12-(Month(Date())-1))&"-"&(dy-abs(dd-v))&" 00:00:00"
end if
else
dt=(Year(Date()))&"-"&(Month(Date()))&"-"&(dd-v)&" 00:00:00"
end if
end function
%>
<body>
<%
response.Write(dt(4))调用
%>
相关文档：
这段代码的功能是：将一个数组打乱顺序，显示出来，让每一次显示的顺序都不一样。
<%
Dim tt
tt=Split("1,2,3,4,5,6",",")
'随机排序
leng=UBound(tt)
randomize
for ii=0 to leng-1
b=int(rnd()*leng)
temp=tt(b)
tt(b ......
在编程过程中，经常需要页面之间的传值；特别是中文传递的时候，经常出现乱码现象，很是郁闷。下面是我在网上找到的一些方法，供大家参考。
1.设置web.config文件。（没有用过）
<system.web>
......
<globalization requestEncoding="gb2312" responseEncoding="gb2312" culture="zh-CN" fileEncoding="gb2 ......
摘自：http://zxlh168.blog.163.com/blog/static/7778614020098168638654/
<%
’FSO组件名称
dim FSObject
FSObject="Scripting.FileSystemObject"
’=========================================================
’◆是否支持组件
’=============================================== ......
引自：http://blog.csdn.net/yizia/archive/2006/09/19/1248669.aspx
访问远程数据库的情况有以下几种：
1）访问远程数据库的access数据库
2）访问远程mssql数据库或oracle等其他关系数据库，但是数据库通信端口被防火墙阻挡或其他网络原因造成无法使用该端口
本文仅在windows2000 advance server,mdac2.8下测试通过� ......
asp中的rs.open于conn.execute的区别
rs.open sql,conn：如果sql是delete,update,insert则会返回一个关闭的记录集，在使用过程中不要来个rs.close在文件最后再写rs.close
中间可以来多个记录集rs1.open sql1,conn，最后一块关闭记录集:rs.close rs1.close
con ......
