ASP

1、IsStartupScriptRegistered：對象是否註冊了啟用指令碼。 2、IsClientScriptBlockRegistered：對象是否註冊了用戶端指令碼塊。 3、IsClientScriptIncludeRegistered：對象是否註冊了用戶端指令碼包含。 第一個例子： string info = "<script>alert('你好嗎？');</script>";

<% Function AutoKey(strKey) Const lngSubKey=2 lngLenKey=Len(strKey) Select Case lngLenKey Case 0 '若為空白串，轉到出錯頁 Response.Redirect "Error.htm" Case 1 '若長度為1，則不設任何值 strNew1="" strNew2="" Case Else '若長度大於1，則從字串首字元開始，迴圈取長度為2的子字串作為查詢條件 For i=1

下面這個是比較不錯的一個複製代碼 代碼如下:Function FormatImg2(content) dim re Set re=new RegExp re.IgnoreCase =true re.Global=True re.Pattern="(script)" Content=re.Replace(Content,"script") re.

輕鬆實現將上傳圖片到資料庫 很久就想自己寫一寫程式了，不過由於賴就不想寫我，今天剛好有空，所以寫了這個小小的程式很容易一看就知道的，不多說了就此開始： 　　我們做一個上傳的。資料據庫的欄位就id自動編號 big 欄位類型是 OLE 呵呵就簡單的那個欄位好了 　　 　　uppic.asp上傳程式名 　　 　　<% 　　dim rs 　　dim formsize,formdata,bncrlf,divider,datastart,dataend,mydata

主程式共三個 我的調用方式 <script language="javascript" src="/verify/num.asp"></script> 驗證方式 if trim(Loginnum)<>trim(session("Loginnum")) then Response.Write Error("驗證碼錯誤！") Response.End end if num.asp <% '### To encrypt/decrypt

作用：將頁面中的電話號碼產生圖片格式。複製代碼 代碼如下:<% Call Com_CreatValidCode(Request.QueryString("tel")) Public Sub Com_CreatValidCode(pTel) '----------禁止緩衝 Response.Expires = 0 Response.AddHeader "Pragma","no-cache" Response.AddHeader

bitmap.Save(imgPath,ImageFormat.Jpeg); //這是儲存縮圖的一段代碼，其中的ImageFormat.Jpeg一定不能省略，即使你儲存的檔案本來就是jpg格式的，也不能去掉。因為如果去掉的話，產生的縮圖比原始圖片還要大！ //另外，imgPath必須首先建立，否則會產生GDI+的一般性錯誤。 path=System.Web.HttpContext.Current.Server.MapPath(path); 使用if(!System.IO.Directory.

輸入歌名自動會自動聯想歌名讀取音樂地址時，背景變暗不可操作同步LRC歌詞顯示，使用者可自己進行擴充，整合音樂站mp3.asp複製代碼 代碼如下:<%@ language="vbscript" CodePage="936"%> <% response.charset="gb2312" set regex = New regexp regex.IgnoreCase=True regex.Global=True songname=unescape(query("songname"))

'================================================== '函數名：GetPaing '作 用：擷取分頁 '================================================== Function GetPaing(Byval ConStr,StartStr,OverStr,IncluL,IncluR) If ConStr="$False$" or ConStr="" Or StartStr="" Or

利用.NET 提供的類，如Drawing.Bitmap ，Drawing.Bitmap 等，很容易就可以實現對圖片的簡單處理。包括打浮水印，放大縮小，等操作。 public partial class WebForm4 : System.Web.UI.Page { // 原始圖片路徑 private string path; private System.Drawing.Bitmap bitmap;

伺服器端操作方便之處我就不吹了，地球人都知道，它最煩莫過於頁面重新整理，頭都被刷暈了，而且他在重新整理的時候，還觸發伺服器端的事件(解決方案：http://skylaugh.cnblogs.com/archive/2006/06/05/418010.html)，現在Ajax的出現，他們的結合是發展的必然！ 一、介紹一下Ajax在Asp.Net中的基本使用 1、在工程中引入Ajax.dll檔案。

ASP 技巧一則之 簡化建立關閉記錄集對象並建立使用簡單的MSSQL預存程序 By shawl.qiu 1. 建造 建立關閉記錄集函數 2. 在MSSQL查詢分析器中建立簡單的MSSQL預存程序 3. 在ASP中應用步驟1,2 shawl.qiu 2006-8-26 http://blog.csdn.net/btbtd 1. 建造 建立關閉記錄集函數 linenum function createRs(rs) set

破解目標：破解一asp木馬的經過加密的登破解asp木馬密碼陸密碼。由於木馬里沒有版本說明，具體也不知道這木馬叫什麼名。 破解思路：兩種，用加密後的密碼替換密文和利用密文及密碼編譯演算法反解出密碼。前者根本算不上真正的破解。 破解目的：沒事破著玩。

其實做這個的原理是很簡單的，只是我們當時沒有仔細的去想想該怎麼實現，我這裡用的是xmlhttp來實現的，當然還有其它的辦法，我就不多說了。 現在看論壇上很多都是要一些“完整的代碼”，看了之後真的是....汗-_-! a.html 複製代碼 代碼如下:<?xml version="1.0" encoding="UTF-8"?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"

============================================================= ' 感謝您使用ASP001工作室開發的實用函數程式 ' HTTP://WWW.ASP001.NET '============================================================= 'ASP001工作室為您提供訂製程式開發、企業互連網拓展服務 'QQ：1974229

若要使用瀏覽器，通過ASP調用ADSI來控制windows 2000的資源，必須使用Administrators組使用者權限才可以正常使用。 有二種解決方案。 一、通過修改IIS網站--目錄安全--匿名訪問使用者--將Administrators組使用者設為匿名訪問使用者即可 設定後，訪問此網站使用者都將具有Administrators組使用者權限，因此，應小心設定此操作。 二、通過修改IIS網站--目錄安全--只選擇基本難證一項即可

HTML檔案標記 <html> <head> <!--> <title> <body> 文字排版標記 <br/> <nobr> <p> <pre> 原始文字樣式 <center> <blockquote> 向內縮排 <h> 標題 <strong>,<b&

方式一： 複製代碼 代碼如下:<% Function IsSelfRefer() Dim formUrl,relUrl formUrl=LCase(Trim(request.ServerVariables("HTTP_REFERER"))) If formUrl="" Then IsSelfRefer = False Else relUrl="http://" &

複製代碼 代碼如下:<% Function CopyMyFolder(FolderName,FolderPath) sFolder=server.mappath(FolderName) oFolder=server.mappath(FolderPath) set fso=server.createobject("scripting.filesystemobject") if fso.folderexists(server.mappath(FolderName))

複製代碼 代碼如下:<% dim objXML dim objRootElement dim strValue dim strInetURL dim strXML dim item strInetURL ="http://pf.inetsolution.com/inetactive2001/inetactive2001news.xml" Dim HttpReq set HttpReq =