Empfohlen: ASP ruft Webdienste an ASP ruft Web Services % Funktion Callwebservices (Surl, SMETHODNAME, SOAPMESSAGE, XMLSTRING) CALLWEBServices = False Set xmlhttp = createObject (msxml2.xmlhttp) xmlhttp.open post, surl, false xmlhttp.setRequestreadRequestreadRequestreaTrequestreadreeTeRequestreadRequestreadRequestreadRequestreadRequestreadRequestreadRequestreadRequestreadRequestreadreeTe-TYPE, Text/XMLHTTP.
JavaScript -Konvertierung:
<Script>
/*
************************************************************
* Parameterbeschreibung:
* STR: Die zu konvertierende Zeichenfolge
* Flag
* Rückgabewerttyp: String
************************************************************
*/
Funktion DBC2SBC (STR, Flag) {
var i;
var result = '';
if (Str.Length <= 0) {alert ('Fehler im String -Parameter'); return false;}
für (i = 0; i <str.length; i ++)
{str1 = str.charCodeat (i);
if (str1 <125 &&! Flag)
result+= string.fromCharCode (str.arCodeat (i) +65248);
anders
result+= string.fromCharCode (str.arCodeat (i) -65248);
}
Rückgabeergebnis;
}
</script>
//Beispiel:
<Script>
ALERT (DBC2SBC (AAABC, 0));
document.write (DBC2SBC (ABCDEFG, 0))
</script>
ASP -Konvertierung:
<%
'*********************************
'* Parameter Beschreibung:
'* str: Die zu konvertierende Zeichenfolge
'* Flag: Mark, es ist 0 und halb, um alle zu drehen, und es ist nicht 0 und halb, um alle zu drehen
'* Rückgabewerttyp: String
'*********************************
Funktion DBC2SBC (STR, Flag)
dim i
Wenn Len (str) <= 0 dann
msgbox 'Fehler im String -Parameter' '
Ausgangsfunktion
Ende wenn
für i = 1 bis len (str)
STR1 = ASC (MID (STR, I, 1))
Wenn Str1> 0 und str1 <= 125 und nicht fahnen
DBC2SBC = DBC2SBC & CHR (ASC (MID (STR, I, 1))-23680)
anders
DBC2SBC = DBC2SBC & CHR (ASC (MID (STR, I, 1))+23680)
Ende wenn
nächste
Endfunktion
%>
Teilen: 6 Praktische Codes für ASP zur Steuerung der XML -Datenbank Nr. 1-Erstellen Sie eine XML-Datenbankdaten.xm? XML Version = 1.0? xmldoc = server.createObjcet (microsoft.xmldom) xmld