vbscript函数集[supfrie] [复制链接]

1.函数array()　
功能:创建一个数组变量　
格式:array(list)　
参数:list　为数组变量中的每个数值列,中间用逗号间隔　
例子:　
<%　i　=　array　(“1”,”2”,”3”)　%>　
结果:　i　被赋予为数组　
2.函数Cint()　
功能:将一表达式/其它类型的变量转换成整数类型(int)　
格式:Cint(expression)　
参数:expression　是任何有效的表达式/其它类型的变量　
例子:　
<%　
f　=　”234”　
response.write　cINT(f)　+　2　
%>　
结果:　236　
函数Cint()将字符”234”转换　成整数234.如果表达式为空,　或者无效时,返回值为0;　
3.函数:Creatobject()　
功能:创建及返回一个ActiveX对象.　
格式:Creatobject(obname)　
参数bname　是对象的名称　
例子:　
<%　
Set　con　=　Server.CreateObject(“ADODB.Connection”)　
%>　
结果:　
4.函数Cstr()　
功能:将一表达式/其它类型的变量转换成字符类型(string)　
格式:Cstr(expression)　
参数:expression是任何有效的表达式/其它类型的变量　
例子:　
<%　
s　=　3　+　2　
response.write　”The　result　is:　”　&　cStr(s)　
%>　
结果:函数Cstr()将整数　5　转换　成字符”5”.　
5.函数Date()　
功能:返回当前系统(server端)的日期　
格式:　Date()　
参数:无　
例子<%　date　()　%>　
结果:05/10/00　
6.函数Dateadd()　
功能:计算某个指定的时间和　
格式:　dateadd(timeinterval,number,date)　
参数:timeinterval是时间单位(月,日..);　number是时间间隔值,date是时间始点.　
例子:　
<%　
currentDate　=　#8/4/99#　
newDate　=　DateAdd(“m”,3,currentDate)　
response.write　newDate　
%>　<%　
currentDate　=　#12:34:45　PM#　
newDate　=　DateAdd(“h”,3,currentDate)　
response.write　newDate　
%>　
结果:　
11/4/99　
3:34:45　PM　
其中　
“m”　=　”month”;　
“d”　=　”day”;　
如果是currentDate　格式,则,　
“h”　=　”hour”;　
“s”　=　”second”;　
7.函数Datediff()　
功能:计算某量个指定的时间差　
格式:　datediff(timeinterval,date1,date2[,firstdayofweek[,firstdayofyear]])　
参数:　timeinterval　是时间单位;　date1,date2是有效的日期表达式,firstdayofweek,firstdayofyear　是任意选项.　
例子:　
<%　
fromDate　=　#8/4/99#　
toDate　=　#1/1/2000#　
response.write　”There　are　”　&　_　
DateDiff(“d”,fromDate,toDate)　&　_　
“　days　to　millenium　from　8/4/99.”　
%>　
结果:There　are　150　days　to　millenium　from　8/4/99.　
8.函数day()　
功能:返回一个整数值,对应于某月的某日　
格式:　day(date)　
参数:　date是一个有效的日期表达式;　
例子<%　=date(#8/4/99#)　%>　
结果:4　
9.函数formatcurrency()　
功能:转换成货币格式　
格式:　formatcurrency(expression　[,digit[,leadingdigit[,paren[,groupdigit]]]])　
参数:　expression　是有效的数字表达式;digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项.　
例子<%=FormatCurrency(34.3456)%>　
结果34.35　
10.函数Formatdatetime()　
功能:格式化日期表达式/变量　
格式:　formatdatetime(date[,nameformat])　
参数:　date为有效的日期表达式/变量;nameformat是指定的日期格式常量名称.　
例子<%　=formatdatetime(“08/04/99”,vblongdate)　%>　
结果:Wednesday,August　04,1999　
说明:　
--------------------------------------------------------------------------------
描述
返回表达式，此表达式已被格式化为日期或时间。　
语法
FormatDateTime(Date[,　NamedFormat])
FormatDateTime　函数的语法有以下参数：
参数　描述　
Date　必选项。要被格式化的日期表达式。　
NamedFormat　可选项。指示所使用的日期/时间格式的数值，如果省略，则使用　vbGeneralDate。　

设置
NamedFormat　参数可以有以下值：
常数　值　描述　
vbGeneralDate　0　显示日期和/或时间。如果有日期部分，则将该部分显示为短日期格式。如果有时间部分，则将该部分显示为长时间格式。如果都存在，则显示所有部分。　
vbLongDate　1　使用计算机区域设置中指定的长日期格式显示日期。　
vbShortDate　2　使用计算机区域设置中指定的短日期格式显示日期。　
vbLongTime　3　使用计算机区域设置中指定的时间格式显示时间。　
vbShortTime　4　使用　24　小时格式　(hh:mm)　显示时间。　
说明
下面例子利用　FormatDateTime　函数把表达式格式化为长日期型并且把它赋给　MyDateTime:　
Function　GetCurrentDate　
“FormatDateTime　把日期型格式化为长日期型。
GetCurrentDate　=　FormatDateTime(Date,　1)　
End　Function
--------------------------------------------------------------------------------
　
11.函数Isnumeric()　
功能:返回一个布尔值,判断变量是否为数字变量,或者是可以转换成数字的其它变量.　
格式:isnumeric(expression)　
参数:expression　是任意的变量.　
例子:　
<%　
i=“234”　
response.write　isnumeric(i)　
%>　
结果:　true.　
12.函数Isobject()　
功能:返回一个布尔值,判断变量是否为对象的变量,　
格式:　isobject(expression)　
参数:　expression　是任意的变量.　
例子:　
<%　
set　con　=server.creatobject(“adodb.connection”)　
response.write　isobject(con)　
%>　
结果:　true　
13.函数:Lbound()　
功能:返回一个数组的下界.　
格式:Lbound(arrayname[,dimension])　
参数:arrayname　是数组变量,dimension　是任意项　
例子:　
<%　
i　=　array(“1”,”2”,”3”)　
response.write　lbound(i)　
%>　
结果:0
14.函数Lcase()　
功能:将一字符类型变量的字符全部变换小写字符.　
格式:Lcase(string)　
参数:string是字符串变量　
例子:　
<%　
str=“THIS　is　Lcase!”　
response.write　Lcase(str)　
%>　
结果:this　is　lcase!　
15.函数left()　
功能:截取一个字符串的前部分;　
格式:left(string,length)　
参数:string字符串,length截取的长度.　
例子:　<%　=left(“this　is　a　test!”,6)　%>　
结果:this　i　
16.函数len()　
功能:返回字符串长度或者变量的字节长度　
格式:len(string　*varname)　
参数:string字符串;varname任意的变量名称　
例子:　
<%　
strtest=“this　is　a　test!”　
response.write　left(strtest)　
%>　
结果:15　
17.函数ltrim()　
功能:去掉字符串前的空格.　
格式:ltrim(string)　
参数:string　字符串.　
例子:　<%　=ltrim　(“　this　is　a　test!”)　
结果:this　is　a　test!　
18.函数Mid()　
功能:从字符串中截取字符串.　
格式:mid(string,start　[,length])　
参数:string字符串,start截取的起点,length要截取的长度.　
例子:　
<%　
strtest=“this　is　a　test,　Today　is　Monday!”　
response.write　mid(strtest,17,5)　
%>　
结果:Today　
19.函数minute()　
功能:返回一数值,　表示分钟　
格式:minute(time)　
参数:　time是时间变量　
例子lt;%　=minute(#12:23:34#)　%>　
结果:23　
20.函数month()　
功能:返回一数值,　表示月份　
格式:month(time)　
参数:time是日期变量　
例子<%　=month(#08/09/99)　%>　
结果:9　
21.函数monthname()　
功能:返回月份的字符串(名称).　
格式:Monthname(date　[,abb])　
参数:　date是日期变量,abb=true时　则月份的缩写,　
例子:　
<%　=monthname(#4/5/99#)　%>　
结果:April　
22.函数Now()　
功能:返回系统的当前时间和日期.　
格式:now()　
参数:无　
例子:　
<%　=now()　%>　
结果:　05/10/00　8:45:32　pm　
23.函数:replace()　
功能:在字符串中查找,替代指定的字符串.　
格式:replace(strtobesearched,strsearchfor,strreplacewith　[,start[,count[,compare]]])　
参数:strtobesearched是字符串;　strsearchfor是被查找的子字符串;strreplacewith　是用来替代的子字符串.start,count,compare　是任意选项.　
例子:　
<%　
strtest=“this　is　an　apple.”　
response.write　replace(strtest,”apple”,”orange”)　
%>　
结果:this　is　an　orange.　
24.函数right()　
功能:截取一个字符串的后部分　
格式:right(string,length)　
参数:string字符串,length截取的长度.　
例子:　
<%　
strtest=“this　is　a　test!”　
response.write　right(strtest,3)　
%>　
结果:st!　
25.函数rnd()　
功能:返回一个随机数值　
格式:rnd[(number)]　
参数:number是任意数值.　
例子:　
<%　
randomize()　
response.write　rnd()　
%>　
结果:0/1数值之一,无randomize(),　则不能产生随机数.　
26.函数round()　
功能:完整数值　
格式:round(expression[,numright])　
参数:expression数字表达式;numright任意选项.　
例子:　
<%　
i=12.33654　
response.write　round(i)　
%>　
结果:　12　
27.函数rtrim()　
功能:去掉字符串后的空格.　
格式:rtrim(string)　
参数:string　是字符串　
例子:　
<%　
response.write　rtrim(“this　is　a　test!　”)　
%>　
结果:this　is　a　test!　
28.函数second()　
功能:返回一个整数值.　
格式:second(time)　
参数:time是一个有效的时间表达式;　
例子lt;%　=second(#　12:28:30#)　%>　
结果:30　
29.函数strReverse()　
功能:返回与原字符串排列逆向的字符串.　
格式:strreverse(string)　
参数:string是字符串　
例子<%　=strreverse(“this　is　a　test!”)　
结果:!tset　a　si　siht　
30.函数time()　
功能:返回当前系统的时间值.　
格式:time()　
参数:无　
结果:9:58:28　Am　
31.函数trim()　
功能:删去字符串前,后的空格.　
格式:trim(string)　
参数:string　字符串.　
例子:　
<%　
strtest=“　this　is　a　test!　”　
response.write　trim(strtest)　
%>　
结果:this　is　a　test!　
32.函数UBound()　
功能:返回一个数组的上界.　
格式:Ubound(expression　[,dimension])　
参数:expression　是数组表达式/数组变量,dimension　是任意项　
例子:　
<%　
i　=　array(“1”,”2”,”3”)　
response.write　ubound(i)　
%>　
结果:　2　
33.函数:UCase()　
功能:将一字符类型变量的字符全部变换成大写字符.　
格式:Ucase(string)　
参数:string是字符串变量　
例子:　
<%　
str=“THIS　is　Lcase!”　
response.write　Lcase(str)　
%>　
结果:THIS　IS　LCASE!　
34.函数Vartype()　
功能:返回变量的常量代码(整数)　
格式:Vartype(varname)　
参数:varname是任何类型的变量名称.　
例子:　
<%　
i=5　
response.write　vartype(i)　
%>　
结果:2　(2表示整数,须要参考ASP常量代码.)　
35.函数Weekday()　
功能:返回一个整数,对应一周中的第几天.　
格式:Weekday(date　[,firstofweek])　
参数:　date为日期变量,firstofweek为任选项.　
例子:　
<%　
d=　#　5/9/00　#　
response.write　weekday(d)　%>　
结果:3(3　表示是星期二)　
36.函数weekdayname()　
功能:返回字符串,对应星期几.　
格式:weekdayname(weekday[,abb[,firstdayofweek]])　
参数:weekday为日期变量,abb,firstdayofweek为任选项.　
例子:　
<%　
d　=　#8/4/99#　
response.write　weekdayname(d)　
%>　
结果:　Wednesday　
37.函数year()　
功能:返回日期表达式所在的年份.　
格式:year(date)　
参数:　date是有效的日期表达式　
例子:　
<%　=year(#8/9/99#)　%>　
结果:1999　
38.函数Mod()功能:取余数.
例子:3　Mod　2　
结果:1

<!--ASP将人民币的数字转化成大写表示-->
<%
'维护-_-MSN：supfire@hotmial.com-_-QQ:49924212-_-UC:1200199-_-supfire-_-2004年12月'
call Fire(04.13)   '测验 那天我生日04月13号
function Fire(supNum)
dim i,Supfire1,Supfire2,length,checkp '定义变量
dim fireOne(),fireOnestr() '定义数组

Supfire1 = "零壹贰叁肆伍陆柒捌玖"
Supfire2 = "万仟佰拾亿仟佰拾万仟佰拾元角分厘毫"

checkp=instr(supNum,".") '判断是否含有小数位
if checkp<>0 then
supNum=replace(supNum,".","") '去除小数位
end if

length=len(supNum) '取得数据长度
redim fireOne(length-1) '重新定义数组大小
redim fireOnestr(length-1) '重新定义数组大小

for i=0 to length-1

fireOne(i)=mid(supNum,i+1,1) '循环取得每一位的数字
fireOne(i)=mid(Supfire1,fireOne(i)+1,1) '循环取得数字对应的大写

    if checkp=0 then
                    '不含有小数的数据其数字对应的单位
 
    fireOnestr(i)=mid(Supfire2,13-length+i+len(supNum)-checkp,1)
      else
                    '含有小数的数据其数字对应的单位
      fireOnestr(i)=mid(Supfire2,15-length+i+len(supNum)-checkp,1)
    end if

fireOne(i)=fireOne(i)&fireOnestr(i)'将数字与单位组合
next

Fire=replace(join(fireOne)," ","") '取得数组中所有的元素，并连接起来
Fire=replace(Fire,"零元","元")
Fire=replace(Fire,"零万","万")
Fire=replace(Fire,"零亿","亿")
Fire=replace(Fire,"零仟","零")
Fire=replace(Fire,"零佰","零")
Fire=replace(Fire,"零拾","零")

do while not instr(Fire,"零零")=0
Fire=replace(Fire,"零零","零")
loop

response.write Fire '显示结果
end function
'维护-_-MSN：supfire@hotmial.com-_-QQ:49924212-_-UC:1200199-_-supfire-_-2004年12月'
%>

简单SQL语句小结


　　为了大家更容易理解我举出的SQL语句，本文假定已经建立了一个学生成绩管理数据库，全文均以学生成绩的管理为例来描述。

　　1.在查询结果中显示列名：

　　a.用as关键字：select name as '姓名' from students order by age

　　b.直接表示：select name '姓名' from students order by age

　　2.精确查找:

　　a.用in限定范围：select * from students where native in ('湖南', '四川')

　　b.between...and：select * from students where age between 20 and 30

　　c.“=”：select * from students where name = '李山'

　　d.like:select * from students where name like '李%' (注意查询条件中有“%”，则说明是部分匹配，而且还有先后信息在里面，即查找以“李”开头的匹配项。所以若查询有“李”的所有对象，应该命令：'%李% ';若是第二个字为李，则应为'_李%'或'_李'或'_李_'。)

　　e.[]匹配检查符：select * from courses where cno like '[AC]%' (表示或的关系，与"in(...)"类似，而且"[]"可以表示范围，如：select * from courses where cno like '[A-C]%')

　　3.对于时间类型变量的处理

　　a.smalldatetime：直接按照字符串处理的方式进行处理，例如：
select * from students where birth > = '1980-1-1' and birth <= '1980-12-31'

　　4.集函数

　　a.count()求和，如：select count(*) from students (求学生总人数)

　　b.avg(列)求平均，如：select avg(mark) from grades where cno=’B2’

　　c.max(列)和min(列)，求最大与最小

　　5.分组group

　　常用于统计时，如分组查总数：
select gender,count(sno)
from students
group by gender
(查看男女学生各有多少)

　　注意：从哪种角度分组就从哪列"group by"

　　对于多重分组，只需将分组规则罗列。比如查询各届各专业的男女同学人数 ，那么分组规则有：届别(grade)、专业(mno)和性别(gender)，所以有"group by grade, mno, gender"

select grade, mno, gender, count(*)
from students
group by grade, mno, gender

　　通常group还和having联用，比如查询1门课以上不及格的学生，则按学号(sno)分类有：

select sno,count(*) from grades
where mark<60
group by sno
having count(*)>1

6.UNION联合

　　合并查询结果，如：

SELECT * FROM students
WHERE name like ‘张%’
UNION [ALL]
SELECT * FROM students
WHERE name like ‘李%’

　　7.多表查询

　　a.内连接

select g.sno,s.name,c.coursename
from grades g JOIN students s ON g.sno=s.sno
JOIN courses c ON g.cno=c.cno
(注意可以引用别名)
b.外连接
b1.左连接
select courses.cno,max(coursename),count(sno)
from courses LEFT JOIN grades ON courses.cno=grades.cno
group by courses.cno

　　左连接特点：显示全部左边表中的所有项目，即使其中有些项中的数据未填写完全。

　　左外连接返回那些存在于左表而右表中却没有的行，再加上内连接的行。

　　b2.右连接

　　与左连接类似

　　b3.全连接

select sno,name,major
from students FULL JOIN majors ON students.mno=majors.mno

　　两边表中的内容全部显示

　　c.自身连接

select c1.cno,c1.coursename,c1.pno,c2.coursename
from courses c1,courses c2 where c1.pno=c2.cno

　　采用别名解决问题。

　　d.交叉连接

select lastname+firstname from lastname CROSS JOIN firstanme

　　相当于做笛卡儿积

　　8.嵌套查询

　　a.用关键字IN,如查询李山的同乡：

select * from students
where native in (select native from students where name=’ 李山’)

　　b.使用关键字EXIST,比如，下面两句是等价的：

select * from students
where sno in (select sno from grades where cno=’B2’)

select * from students where exists
(select * from grades where
grades.sno=students.sno AND cno=’B2’)

　　9.关于排序order

　　a.对于排序order，有两种方法：asc升序和desc降序

　　b.对于排序order,可以按照查询条件中的某项排列，而且这项可用数字表示，如：

select sno,count(*) ,avg(mark) from grades
group by sno
having avg(mark)>85
order by 3

　　10.其他

　　a.对于有空格的识别名称，应该用"[]"括住。

　　b.对于某列中没有数据的特定查询可以用null判断，如select sno,courseno from grades where mark IS NULL

　　c.注意区分在嵌套查询中使用的any与all的区别，any相当于逻辑运算“||”而all则相当于逻辑运算“&&”

　　d.注意在做否定意义的查询是小心进入陷阱：

　　如，没有选修‘B2’课程的学生 ：

select students.*
from students, grades
where students.sno=grades.sno
AND grades.cno <> ’B2’

　　上面的查询方式是错误的，正确方式见下方：

select * from students
where not exists (select * from grades
where grades.sno=students.sno AND cno='B2')

　　11.关于有难度多重嵌套查询的解决思想：

　　如，选修了全部课程的学生：

select *
from students
where not exists ( select *
from courses
where NOT EXISTS
(select *
from grades
where sno=students.sno
AND cno=courses.cno))

　　最外一重：从学生表中选，排除那些有课没选的。用not exist。由于讨论对象是课程，所以第二重查询从course表中找，排除那些选了课的即可。

js 几种常用的表单输入判断


//函数名：chksafe
//功能介绍：检查是否含有"'",'\\',"/"
//参数说明：要检查的字符串
//返回值：0：是 1：不是

function chksafe(a)
{
return 1;
/* fibdn = new Array ("'" ,"\\", "、", ",", ";", "/");
i=fibdn.length;
j=a.length;
for (ii=0;ii<i;ii++)
{ for (jj=0;jj<j;jj++)
{ temp1=a.charAt(jj);
temp2=fibdn[ii];
if (tem';p1==temp2)
{ return 0; }
}
}
return 1;
*/
}


//函数名：chkspc
//功能介绍：检查是否含有空格
//参数说明：要检查的字符串
//返回值：0：是 1：不是

function chkspc(a)
{
var i=a.length;
var j = 0;
var k = 0;
while (k<i)
{
if (a.charAt(k) != " ")
j = j+1;
k = k+1;
}
if (j==0)
{
return 0;
}

if (i!=j)
{ return 2; }
else
{
return 1;
}
}

//函数名：chkemail
//功能介绍：检查是否为Email Address
//参数说明：要检查的字符串
//返回值：0：不是 1：是

function chkemail(a)
{ var i=a.length;
var temp = a.indexOf('@');
var tempd = a.indexOf('.');
if (temp > 1) {
if ((i-temp) > 3){

if ((i-tempd)>0){
return 1;
}

}
}
return 0;
}//opt1 小数   opt2   负数
//当opt2为1时检查num是否是负数
//当opt1为1时检查num是否是小数
//返回1是正确的，0是错误的
function chknbr(num,opt1,opt2)
{
var i=num.length;
var staus;
//staus用于记录.的个数
status=0;
if ((opt2!=1) && (num.charAt(0)=='-'))
{
//alert("You have enter a invalid number.");
return 0;

}
//当最后一位为.时出错
if (num.charAt(i-1)=='.')
{
//alert("You have enter a invalid number.");
return 0;
}

for (j=0;j<i;j++)
{
if (num.charAt(j)=='.')
{
status++;
}
if (status>1)
{
//alert("You have enter a invalid number.");
return 0;
}
if (num.charAt(j)<'0' || num.charAt(j)>'9' )
{
if (((opt1==0) || (num.charAt(j)!='.')) && (j!=0))
{
//alert("You have enter a invalid number.");
return 0;
}
}
}
return 1;
}


//函数名：chkdate
//功能介绍：检查是否为日期
//参数说明：要检查的字符串
//返回值：0：不是日期 1：是日期

function chkdate(datestr)
{
var lthdatestr
if (datestr != "")
lthdatestr= datestr.length ;
else
lthdatestr=0;

var tmpy="";
var tmpm="";
var tmpd="";
//var datestr;
var status;
status=0;
if ( lthdatestr== 0)
return 0


for (i=0;i<lthdatestr;i++)
{ if (datestr.charAt(i)== '-')
{
status++;
}
if (status>2)
{
//alert("Invalid format of date!");
return 0;
}
if ((status==0) && (datestr.charAt(i)!='-'))
{
tmpy=tmpy+datestr.charAt(i)
}
if ((status==1) && (datestr.charAt(i)!='-'))
{
tmpm=tmpm+datestr.charAt(i)
}
if ((status==2) && (datestr.charAt(i)!='-'))
{
tmpd=tmpd+datestr.charAt(i)
}

}
year=new String (tmpy);
month=new String (tmpm);
day=new String (tmpd)
//tempdate= new String (year+month+day);
//alert(tempdate);
if ((tmpy.length!=4) || (tmpm.length>2) || (tmpd.length>2))
{
//alert("Invalid format of date!");
return 0;
}
if (!((1<=month) && (12>=month) && (31>=day) && (1<=day)) )
{
//alert ("Invalid month or day!");
return 0;
}
if (!((year % 4)==0) && (month==2) && (day==29))
{
//alert ("This is not a leap year!");
return 0;
}
if ((month<=7) && ((month % 2)==0) && (day>=31))
{
//alert ("This month is a small month!");
return 0;

}
if ((month>=8) && ((month % 2)==1) && (day>=31))
{
//alert ("This month is a small month!");
return 0;
}
if ((month==2) && (day==30))
{
//alert("The Febryary never has this day!");
return 0;
}

return 1;
}




//函数名：fucPWDchk
//功能介绍：检查是否含有非数字或字母
//参数说明：要检查的字符串
//返回值：0：含有 1：全部为数字或字母

function fucPWDchk(str)
{
var strSource ="0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
var ch;
var i;
var temp;

for (i=0;i<=(str.length-1);i++)
{

ch = str.charAt(i);
temp = strSource.indexOf(ch);
if (temp==-1)
{
return 0;
}
}
if (strSource.indexOf(ch)==-1)
{
return 0;
}
else
{
return 1;
}
}

function jtrim(str)
{   while (str.charAt(0)==" ")
    {str=str.substr(1);}  
while (str.charAt(str.length-1)==" ")
    {str=str.substr(0,str.length-1);}
return(str);
}


//函数名：fucCheckNUM
//功能介绍：检查是否为数字
//参数说明：要检查的数字
//返回值：1为是数字，0为不是数字
function fucCheckNUM(NUM)
{
var i,j,strTemp;
strTemp="0123456789";
if ( NUM.length== 0)
return 0
for (i=0;i<NUM.length;i++)
{
j=strTemp.indexOf(NUM.charAt(i));
if (j==-1)
{
//说明有字符不是数字
return 0;
}
}
//说明是数字
return 1;
}

//函数名：fucCheckTEL
//功能介绍：检查是否为电话号码
//参数说明：要检查的字符串
//返回值：1为是合法，0为不合法
function fucCheckTEL(TEL)
{
var i,j,strTemp;
strTemp="0123456789-()# ";
for (i=0;i<TEL.length;i++)
{
j=strTemp.indexOf(TEL.charAt(i));
if (j==-1)
{
//说明有字符不合法
return 0;
}
}
//说明合法
return 1;
}

//函数名：fucCheckLength
//功能介绍：检查字符串的长度
//参数说明：要检查的字符串
//返回值：长度值
function fucCheckLength(strTemp)
{
var i,sum;
sum=0;
for(i=0;i<strTemp.length;i++)
{
if ((strTemp.charCodeAt(i)>=0) && (strTemp.charCodeAt(i)<=255))
sum=sum+1;
else
sum=sum+2;
}
return sum;
}