Рекомендуется: ASP вызывает веб -сервисы ASP вызывает веб-службы % функция CallWebservices (SURL, SMETHODNAME, SOAPMessage, XMLSTRING) CallWebServices = false set xmlhttp = createObject (msxml2.xmlhttp) xmlhttp.open post, surl, false xmlhttp.setrequeste
Преобразование JavaScript:
<Скрипт>
/*
***********************************************
* Описание параметра:
* Str: строка, которая должна быть преобразована
* Флаг: Марк, от 0 и с половиной до полной, не от 0 до половины до полного
* Возвращение значения Тип: строка
***********************************************
*/
функция dbc2sbc (str, flag) {
var i;
var result = '';
if (str.length <= 0) {alert ('error in string parameter'); вернуть false;}
для (i = 0; i <str.length; i ++)
{str1 = str.charcodeat (i);
if (str1 <125 &&! flag)
result+= string.fromCharcode (str.charcodeat (i) +65248);
еще
result+= string.fromCharcode (str.charcodeat (i) -65248);
}
результат возврата;
}
</script>
//Пример:
<Скрипт>
оповещение (DBC2SBC (AAABC, 0));
Document.Write (DBC2SBC (ABCDEFG, 0)))
</script>
Преобразование ASP:
<%
'*********************************
'* Описание параметра:
'* str: строка, которая должна быть преобразована
* Флаг: Марк, это 0 и половина, чтобы повернуть все, и это не 0 и половина, чтобы повернуть все
'* Возвращение значения Тип: строка
'*********************************
Функция dbc2sbc (str, flag)
DIM I.
Если Len (str) <= 0, тогда
Ошибка MSGBOX 'в параметре строки'
Выходная функция
конец, если
для i = 1 до Лена (Str)
str1 = asc (mid (str, i, 1))
Если str1> 0 и str1 <= 125, а не флаг, тогда
dbc2sbc = dbc2sbc & chr (asc (mid (str, i, 1))-23680)
еще
dbc2sbc = dbc2sbc & chr (asc (mid (str, i, 1))+23680)
конец, если
следующий
конечная функция
%>
Поделиться: 6 практических кодов для ASP для управления базой данных XML №1-Create As a Database Data.xm? XML Version = 1.0? xmldoc = server.createobjcet (microsoft.xmldom) xmld