Recomendado: ASP Chamadas de Serviços da Web ASP calls web services % Function CallWebServices(sUrl, sMethodName, soapMessage, XmlString) CallWebServices = false Set xmlhttp = CreateObject(MSXML2.XMLHTTP) xmlhttp.Open POST,sUrl, False xmlhttp.SetRequestHeader Content-Type,text/xm
Conversão de JavaScript:
<Cript>
/*
************************************
* Descrição do parâmetro:
* str: a string a ser convertida
* Bandeira: Mark, 0 e meia a cheia, não 0 e meio a cheia
* Retorno Tipo de Valor: String
************************************
*/
função dbc2sbc (str, sinalizador) {
var i;
var resultado = '';
if (str.Length <= 0) {alert ('erro no parâmetro string'); retorna false;}
para (i = 0; i <str.Length; i ++)
{str1 = str.charcodeat (i);
if (str1 <125 &&! Flag)
resultado+= string.fromCharcode (str.charcodeat (i) +65248);
outro
resultado+= string.fromCharcode (str.charcodeat (i) -65248);
}
resultado de retorno;
}
</script>
//Exemplo:
<Cript>
alerta (dbc2sbc (AAABC, 0));
document.write (dbc2sbc (abcdefg, 0))
</script>
Conversão ASP:
<%
'***********************************
'* Descrição do parâmetro:
'* str: a string a ser convertida
'* Bandeira: Mark, é 0 e meio para virar tudo, e não é 0 e meio para virar tudo
'* Retorno Valor Tipo: String
'***********************************
função dbc2sbc (str, bandeira)
dim i
Se Len (str) <= 0 então
msgbox 'erro no parâmetro string'
função de saída
final se
para i = 1 a len (str)
STR1 = ASC (MID (STR, I, 1))
Se str1> 0 e str1 <= 125 e não sinalizar então
DBC2SBC = DBC2SBC & CHR (ASC (MID (STR, I, 1))-23680)
outro
dbc2sbc = dbc2sbc & chr (asc (mid (str, i, 1))+23680)
final se
próximo
Função final
%>
Compartilhar: 6 códigos práticos para a ASP controlar o banco de dados XML No.1-Crie um banco de dados XML Data.xm? Xml versão = 1.0? xmldoc = server.createObjcet (Microsoft.xmldom) xmld