判断生肖的ASP时间函数
<%
Function Zodiac(birth)
If IsDate(birth) Then
birthyear = Year(birthday)
ZodiacList = Array("猴", "鸡", "狗", "猪", "鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊")
Zodiac = ZodiacList(birthyear Mod 12)
End If
End Function
%>
相关文档：
asp衔接Mssql的办法及常见的差错
//第一种写法：
MM_conn_STRING = "Driver={SQL Server};server=(local);uid=sa;pwd=;database=infs;"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING
SET RS=SERVER.CreateObject("ADOBD.recordset")
SQL="SELECT * from TABLE ORDER BY ID DESC"
R ......
CREATE PROCEDURE sp_newpage
@tb varchar(50), --表名
@col varchar(50), --按该列来进行分页
@coltype int, --@col列的类型,0-数字类型,1-字符类型,2-日期时间类型
@orderby bit, --排序,0-顺序,1-倒序
@collist varchar(800),--要查询出的字段列表,*表示全部字 ......
方法一 : 禁用HTML
最简单的方法是直接禁用html标签而不用移除它们. 可以使用Replace()函数. 例如:
strText = Replace(strText, "<script", "<script", 1, -1, 1)
或者直接禁用所有的html:
strText = Replace(strText, "<", "<")
这样做虽然很安全,但显得不够友好.(用户提交的文本会变� ......
单位有一台闲置的旧 IBM Netfinity 7000 的服务器，双 Pentium Pro 200 MHz CPU，512 MB 内存，一个 9.1 GB 和五个 4.5 GB 的 SCSI 硬盘。我想将其废物利用一下，于是：
1. 到 http://tw.releases.ubuntu.com/edgy/ 下载 PC (Intel x86) server install CD ，将下载得到的 ubuntu-6.10-server-i386.iso 文件刻录一张 ......
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = false '不显示警告
'xlApp.Application = false ......
