Recommandé: ASP appelle les services Web ASP appelle les services Web% function callwebservices (Surl, smethodname, soapMessage, xmlString) callwebservices = false set xmlhttp = createObject (msxml2.xmlhttp)
Conversion JavaScript:
<cript>
/ *
************************************
* Description du paramètre:
* Str: la chaîne à convertir
* Flag: Mark, 0 et moitié au plein, non 0 et moitié à plein
* Type de valeur de retour: chaîne
************************************
* /
fonction dbc2sbc (str, drapeau) {
var i;
var result = '';
if (str.length <= 0) {alert ('erreur dans le paramètre de chaîne'); return false;}
pour (i = 0; i <str.length; i ++)
{str1 = str.charcodeat (i);
if (str1 <125 &&! drapeau)
résultat + = string.fromCharcode (str.charcodeat (i) +65248);
autre
résultat + = string.fromCharcode (str.charcodeat (i) -65248);
}
Résultat de retour;
}
</cript>
//Exemple:
<cript>
alerte (dbc2sbc (aaabc, 0));
Document.Write (DBC2SBC (ABCDEFG, 0))
</cript>
Conversion ASP:
<%
'*******************************
'* Description du paramètre:
'* Str: La chaîne à convertir
'* Flag: Mark, il est 0 et moitié pour tourner tout, et c'est non 0 et moitié pour tourner tout
'* Type de valeur de retour: chaîne
'*******************************
fonction dbc2sbc (str, drapeau)
dim je
Si Len (str) <= 0 alors
msgbox 'erreur dans le paramètre de chaîne'
fonction de sortie
terminer si
pour i = 1 à Len (str)
str1 = asc (mid (str, i, 1))
Si str1> 0 et str1 <= 125 et non pas de l'indicateur alors
dbc2sbc = dbc2sbc & chr (ASC (mid (str, i, 1)) - 23680)
autre
dbc2sbc = dbc2sbc & chr (asc (mid (str, i, 1)) + 23680)
terminer si
suivant
fonction finale
%>
Partager: 6 codes pratiques pour ASP pour contrôler la base de données XML No.1 - Créer une base de données XML Data.xm? XML Version = 1.0? xMLDOC = server.createobjcet (Microsoft.xmldom) XMLD