主頁 > 知識庫 > asp下經(jīng)常用到的代碼

asp下經(jīng)常用到的代碼
熱門標(biāo)簽：科大訊飛語音識別系統(tǒng) Mysql連接數(shù)設(shè)置 服務(wù)器配置 Linux服務(wù)器 銀行業(yè)務(wù) 團(tuán)購網(wǎng)站 電子圍欄 阿里云
點(diǎn)擊提示“確定”與“取消”提示框
onclick='{if(confirm("您確定刪除嗎?此操作將不能恢復(fù)!")){return true;}return false;}'


刪除.LDB文件
%
Application.Contents.Removeall()
%>

將HTML格式轉(zhuǎn)換為純文本格式
%  
Function RemoveHTML(strHTML)  
 Dim objRegExp, Match, Matches     
 Set objRegExp = New Regexp  

 objRegExp.IgnoreCase = True  
 objRegExp.Global = True  
 '取閉合的>  
 objRegExp.Pattern = ".+?>"  
 '進(jìn)行匹配  
 Set Matches = objRegExp.Execute(strHTML)  

 ' 遍歷匹配集合，并替換掉匹配的項(xiàng)目  
 For Each Match in Matches     
     strHtml=Replace(strHTML,Match.Value,"")  
 Next  
 RemoveHTML=strHTML  
 Set objRegExp = Nothing  
End Function  

%>
調(diào)用
%=RemoveHTML(你的字段)%>


25、當(dāng)前頁地址
% 
response.write "http://"Request.ServerVariables("server_name")Request.ServerVariables("script_name") 
%>

標(biāo)簽：廣元 大理 蚌埠 衢州 衡水 江蘇 棗莊 萍鄉(xiāng)

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《asp下經(jīng)常用到的代碼》，本文關(guān)鍵詞  ；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 收縮
    • 微信客服
    • 微信二維碼

    • 電話咨詢

    • 400-1100-266