asp常用函数(备忘)

 1.数组长度：

1. <% 
2.         Dim grade,i 
3.         grade=split("1,2,5,10,20,50,100,200,500,1000",",") 
4. for i=0 to ubound(grade) 
5.     response.write grade(i)&"\n" 
6. next  
7. %> 

2.获得插入的id

1. set rs = server.createobject("adodb.recordset") 
2.         sql="select * from node" 
3.         rs.Open sql,conn,1,3 
4.         rs.addnew 
5.         rs("name") = node_name 
6.         rs.update 
7.         rs.movelast 
8.         node_id = rs("id") 
9.         rs.close 

3.函数返回值，每月最后一天

1. <% 
2. function getlastday() 
3.         Dim ThisDate,NextDate 
4.         ThisDate = Date()  
5.         NextDate = DateAdd("m", 1, ThisDate)  
6.         getlastday=Day(DateAdd("d", -1, Year(NextDate) & "-" & Month(NextDate) & "-1")) 
7. end function 
8.         response.write getlastday() 
9. %>
10.  
11.  
12.  
13.  

4.时间函数

1. <% 
2. function getnow() 
3.  
4.         Dim ThisDate 
5.         ThisDate = now()  
6.         getnow=Year(ThisDate)& "-" & Month(ThisDate) & "-" & Day(ThisDate)& " " & Hour(ThisDate) & ":" & Minute(ThisDate)& ":" & Second(ThisDate) 
7. end function 
8.         response.write getnow() 
9. %> 

本文转自yifangyou 51CTO博客，原文链接：http://blog.51cto.com/yifangyou/611397，如需转载请自行联系原作者