Recomendado: ASP llama a los servicios web ASP llama a Web Services % Función CallWebServices (Surl, SmethodName, SoapMessage, XMLString) CallWebServices = false set xmlhttp = createObject (msxml2.xmlhttp) xmlhttp.open post, surl, falso xmlhttp.setrequesttheader content-type, text/xm/xmm/xmm
Conversión de JavaScript:
<script>
/*
**************************************
* Descripción del parámetro:
* str: la cadena a convertir
* Bandera: Mark, 0 y mitad a completa, no 0 y mitad a la completa
* Tipo de valor de retorno: cadena
**************************************
*/
función dbc2sbc (str, flag) {
var i;
resultado var = '';
if (str.length <= 0) {alert ('Error en el parámetro de cadena'); return false;}
para (i = 0; i <str.length; i ++)
{str1 = str.charcodeat (i);
if (str1 <125 &&! flag)
resultado+= string.FromCharCode (str.charcodeat (i) +65248);
demás
resultado+= String.FromCharCode (str.charcodeat (i) -65248);
}
resultado de retorno;
}
</script>
//Ejemplo:
<script>
alerta (DBC2SBC (AAABC, 0));
Document.Write (DBC2SBC (ABCDEFG, 0))
</script>
Conversión de ASP:
<%
'**********************************
'* Descripción del parámetro:
'* str: la cadena a convertir
'* Bandera: Mark, es 0 y mitad para girar todo, y no es 0 y mitad para girar todo
'* Tipo de valor de retorno: cadena
'**********************************
función dbc2sbc (str, flag)
Dim I
Si len (str) <= 0 entonces
msgbox 'Error en el parámetro de cadena'
función de salida
final si
para i = 1 a Len (Str)
str1 = ASC (Mid (Str, I, 1))
Si str1> 0 y str1 <= 125 y no bandera entonces
DBC2SBC = DBC2SBC & CHR (ASC (MID (STR, I, 1))-23680)
demás
DBC2SBC = DBC2SBC & CHR (ASC (MID (STR, I, 1))+23680)
final si
próximo
función final
%>
Compartir: 6 códigos prácticos para ASP para controlar la base de datos XML No.1-Create una versión de base de datos XML. xmldoc = server.createobjcet (microsoft.xmldom) xmld