马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
使用cdonts,可以发送、查看邮件,实现webmail的功能。结合wsh,可以实现对nt主机的管理,如nt用户管理、iis虚拟主机设置、exchange邮箱设置等等,就像管理本地机一样方便。js|jscript|vbscript 服务端VBScript与JScript几个不异特征的写法
择要:本文演示了ASP服务端剧本的几个主要使用.
1.遍历汇合/工具
1.1VBScript遍历表单汇合
linenum
<%
foreachtempinrequest.Form
response.writetemp&":"&request.form(temp)
next
%>
1.2JScript遍历表单汇合
linenum
<%
for(var$e=newEnumerator(Request.Form);!$e.atEnd();$e.moveNext()){
Response.Write($e.item()+:<br/>+Request.Form($e.item()));
}
%>
2.变化量值为变量,并赋值
2.1VBScript变化量值为变量并赋值
linenum
<%
foreachtempinrequest.Form
executetemp&"=request.form(temp)"
next
%>
2.2JScript变化量值为变量并赋值
linenum
<%
var$xml=newActiveXObject("microsoft.xmldom");
$xml.load(Server.MapPath(config.xml));
var$childNodes=$xml.documentElement.selectSingleNode(//siteconfig).childNodes
for($e=newEnumerator($childNodes);!$e.atEnd();$e.moveNext()){
eval($e.item().nodeName+"=$e.item().text");
}
$xml=null;
Response.Write(sitekeywords);
%>
3.静态包括文件
3.1VBScript静态包括文件
linenum
<%
functionfInclude(filepath)
samplecall///executefInclude("include/system/language/"&sitefglang&"/main.asp")
dimcnt
cnt=CreateObject("scripting.fileSystemObject").openTextFile(server.MapPath(filepath)).readall
cnt=replace(cnt,"<"&chr(37),"")
cnt=replace(cnt,chr(37)&">","")
fInclude=cnt
endfunctionshawl.qiucode
executefInclude("include/system/language/"&sitefglang&"/main.asp")
%>
3.2JScript静态包括文
linenum
<%
eval($dynInc(aj2.asp));
Response.Write($test);
function$dynInc($fl){
/*------------------------------------
*服务端JScript静态包括文件Byshawl.qiu
*samplecall:eval($dynInc(aj2.asp));
*------------------------------------*/
var$fso=newActiveXObject("scripting.fileSystemObject");
$str=$fso.OpenTextFile(Server.MapPath($fl)).ReadAll();
$str=$str.replace(/<\%|\%>/g,);
$fso=null;
return$str;
}
%>
帮助用户快速实现各种应用服务,ASP商有整合各方面资源的能力,可在短期内为用户提供所需的解决方案。例如,典型的ERP安装,如果要在客户端安装的话需要半年到二年的时间,但是美国的一些ASP商如USI和CORIO能在90—120天内提供ERP应用方案。 |