03 2012 档案

摘要：1 '返回某年总共有多少天2 Function DayOfYear(ByVal y)3 DayOfYear = DatePart("y",y&"-12-31")4 End Function5 '例子：Response.Write DayOfYear(2012) 阅读全文

摘要：Dim aa="w,d,s,r,q,g,123,ggg,123,asd,1235,asd,wqe13"a=split(a,",")Response.Write join(a,"|") 阅读全文

摘要：#include $a=FileOpenDialog("选择目标数据库",@DesktopDir,"Access数据库(*.mdb)|ASP(*.asp)")$table="Admin"$ziduan="id Counter Primary Key|uname text(255) default A... 阅读全文