www.gusucode.com > CC校友录贴吧 CCBar源码程序asp编程 > sms/sms_inc.asp
<% '=================================================================== '= ASP FILENAME : /sms/sms_inc.asp '= CREATED TIME : MAY,4,2003 '= LAST MODIFIED: AUG,10,2003 '= VERSION INFO : CCASP Framework Ver 2.0.1 ALL RIGHTS RESERVED BY www.cclinux.com '= DESCRIPTION : 站内短信业务控制器包含文件 '= Change Log : '=================================================================== '== 发新短信数据校验设置 Dim arrSmsAddDataChk(2) arrSmsAddDataChk(0) = Array("DT_ID" ,"selIncepterId" ,"收件人") arrSmsAddDataChk(1) = Array("DT_FIX_LENGTH" ,"iptTitle" ,"短信主题" ,2 ,20) arrSmsAddDataChk(2) = Array("DT_FIX_LENGTH" ,"txtContent" ,"短信内容" ,1 ,1000) '== 发新短信表单名 Dim strSmsAddFormName : strSmsAddFormName = "selIncepterId|iptTitle|txtContent" '== 删除短信数据校验设置 Dim arrDelSmsDataChk(0) arrDelSmsDataChk(0) = Array("DT_FIX_LENGTH" ,"SmsId" ,"所选短信" ,1 ,120) '== 删除短信表单名 Dim strSmsDelFormName : strSmsDelFormName = "subSmsDel|SmsId|subSmsDelAll|hidBoxName" %>