国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

全角半角轉換代碼_ASP教程

2024-07-21 02:05:02
字體:
來源:轉載
供稿:網友

推薦:ASP調用web services
ASP調用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

javascript轉換:

<SCRIPT>
/*
****************************
* 參數說明:
* str:要轉換的字符串
* flag:標記,為0時半轉全,為非0時全轉半
* 返回值類型:字符串
****************************
*/
function DBC2SBC(str,flag) {
var i;
var result='';
if (str.length<=0) {alert('字符串參數出錯');return false;}
for(i=0;i<str.length;i++)
{ str1=str.charCodeAt(i);
if(str1<125&&!flag)
result+=String.fromCharCode(str.charCodeAt(i)+65248);
else
result+=String.fromCharCode(str.charCodeAt(i)-65248);
}
return result;
}
</script>
//示例:
<script>
alert(DBC2SBC("AAabc",0));
document.write(DBC2SBC("abcdefg",0))

</script>

asp轉換:

<%
'****************************
'* 參數說明:
'* str:要轉換的字符串
'* flag:標記,為0時半轉全,為非0時全轉半
'* 返回值類型:字符串
'****************************
function DBC2SBC(str,flag)
dim i
if len(str)<=0 then
msgbox '字符串參數出錯'
exit function
end if
for i=1 to len(str)
str1=asc(mid(str,i,1))
if str1>0 and str1<=125 and not flag then
dbc2sbc=dbc2sbc&chr(asc(mid(str,i,1))-23680)
else
dbc2sbc=dbc2sbc&chr(asc(mid(str,i,1))+23680)
end if
next
end function
%>

 

分享:asp控制xml數據庫的6條實用代碼
NO.1--建立一個XML數據庫data.xm ?xml version=1.0? records record namecaca/name qq154222225/qq emailroot@3ney.com/email /record records NO.2--建立對象CreateObject 建立data.xml的對象先 set xmldoc=server.createobjcet(microsoft.xmldom) xmld

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 萝北县| 新宾| 徐水县| 克拉玛依市| 岱山县| 望都县| 始兴县| 万全县| 广东省| 犍为县| 五台县| 罗甸县| 台东县| 富锦市| 开封县| 余姚市| 饶阳县| 娄底市| 泗水县| 额尔古纳市| 枝江市| 阳高县| 沙坪坝区| 界首市| 且末县| 色达县| 虹口区| 漯河市| 江西省| 郸城县| 平阴县| 姚安县| 神木县| 岐山县| 韶关市| 海原县| 嘉荫县| 汤阴县| 齐齐哈尔市| 东乡| 青阳县|