Écriture et exemples de plusieurs fonctionnalités similaires de VBScript et JScript du côté serveur

Byshawl.qiu

résumé:

Cet article montre plusieurs applications importantes des scripts côté serveur ASP.

Table des matières:

1. Transfert la collection / objet

Collection de formulaire de traversée 1.1 VBScript

1.2 Collection de formulaire de traversée JScript

2. Transformez la valeur de la variable en une variable et attribuez une valeur

2.1vbscript transforme la valeur de variable en une variable et attribue une valeur

2.2JScript convertit la valeur de variable en variable et attribue une valeur

3. Inclure dynamiquement les fichiers

3.1 VBScript Inclus de fichiers dynamiquement

3.2JScript comprend dynamiquement des fichiers

châle.qiu

2006-10-11

http://blog.csdn.net/btbtd

1. Transfert la collection / objet

Collection de formulaire de traversée 1.1 VBScript

linium

<%

foreachTempinRequest.form

Response.WriteTemp & ":" & request.form (temp)

suivant

%>

1.2 Collection de formulaire de traversée JScript

linium

<%

pour (var $ e = newenumerator (request.form) ;! $ e.atend (); $ e.movEnext ()) {

Réponse.write ($ e.item () + ': <br/>' + request.form ($ e.item ()));

}

%>

2. Transformez la valeur de la variable en une variable et attribuez une valeur

2.1vbscript transforme la valeur de variable en une variable et attribue une valeur

linium

<%

foreachTempinRequest.form

EXECTITÉLEMP & "= request.form (temp)"

suivant

%>

2.2JScript convertit la valeur de variable en variable et attribue une valeur

linium

<%

var $ xml = newactivexObject ("Microsoft.xmldom");

$ xml.load (server.mappath ('config.xml'));

var $ childnodes = $ xml.documentElement.SelectSingLenode ('// SiteConfig'). ChildNodes

pour ($ e = newenumerator ($ childnodes) ;! $ e.atend (); $ e.movEnext ()) {

eval ($ E.Item (). Nodename + "= $ e.item (). Texte");

}

$ xml = null;

Response.Write (SiteKeywords);

%>

3. Inclure dynamiquement les fichiers

3.1 VBScript Inclus de fichiers dynamiquement

linium

<%

functionfinclude (filepath)

'SampleCall' '' /// ExecuteFincLed ("include / System / Language /" & SitefGlang & "/ main.asp") /// '' '

diable

cnt = createObject ("scripting.fileSystemObject"). OpenTExtFile (server.mappath (filepath)). Readall