-
asp防止垃圾留言代碼
<!--#include file="common/conn.asp"--> <!--#include file="common/sub.asp"--> <% server_v1=Cstr(Request.ServerVariables("HTTP_REFERER")) Response.Write(server_v1) server_v2=Cstr(R...
作者：asdasdasd03-30 -
asp獲取URL參數的幾種方法分析總結 原創
需要用到這個功能，沒怎么測試呢，測試后給具體代碼 假如地址是： http://dxy.com:8082/test/geturl.asp?Param-VR52tmx3syn03777.html 方法一：簡單，得不到參數，只有一個虛擬路徑 復制代碼 代...
作者：asdasdasd03-30 -
關于Asp代碼與頁面的分離模板技術第1/3頁
在使用ASP制作一個站點的時候，常常會出現一個ASP文件中，程序代碼和HTML代碼混合的情況。這樣子做有許多缺點： 1.編程時就要對頁面布局進行設計和編排，造成代碼混亂難懂，不規范; 2.當...
作者：asdasdasd03-30 -
ASP javascript Application對象的Contents和StaticObjects做Cache的一些經驗
Application對象內置集合有為存放簡單類型設計的Contents,默認Application("key")就可以使用。 不過Application.Contents不能存放對象,可以存vbs數組,但是在javascript下甚至數組都不能放。 使用...
作者：asdasdasd03-30 -
利用MSXML2.XmlHttp和Adodb.Stream采集圖片
利用MSXML2.XmlHttp和Adodb.Stream 復制代碼 代碼如下:<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html ...
作者：asdasdasd03-30 -
asp分頁（自己整理的2個分頁程序）
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http:...
作者：asdasdasd03-30 -
asp+javascript實現404頁的處理轉換
主要是給用戶的友好性，原來用戶是依靠搜索引擎進入我每篇文章的，怎么能讓用戶讓一個舊的頁面跳轉到新的頁面，且文章不變，如： 程序代碼 http://www.jb51.net/blog/article.asp?id=381 ...
作者：asdasdasd03-30 -
用GetString提高ASP的速度
<% 'Create connection / recordset 'Populate data into recordset object %> <TABLE> <% Do While not rs.EOF %> <TR> <TD ><%=rs("Field1")% ></TD> <TD ><%=rs("Field2")% ></TD...
作者：asdasdasd03-30 -
ASP常用的系統配置函數
sub SaveConfig() dim fso,hf set fso=Server.CreateObject("Scripting.FileSystemObject") set hf=fso.CreateTextFile(Server.mappath("../inc/config.asp"),true) hf.write "<" & "%" & v...
作者：asdasdasd03-30 -
海陽2006+功能中的潛水王
ps:我還沒測試。 信息來源：H4×0r's Blog 復制代碼 代碼如下:bOtherUser = False ''是否需要其它NT用戶身份登錄 If bOtherUser = True And Trim(Request.ServerVariables("AUTH_USER")) = "" ...
作者：asdasdasd03-30 -
ASP字符串轉換為整形、雙精度型、布爾
Rem 將字符串轉換為整形數據 function toInteger(str,num) str=trim(str) if str="" or not isnumeric(str) then toInteger=num else toI...
作者：asdasdasd03-30 -
ASP+模板生成Word、Excel、html的代碼第1/2頁
大多數都是采用Excel.Application(http://www.blueidea.com/tech/program/2006/3547.asp)組件來生成發現容易出錯，而且對于大多數和我一樣的菜鳥來說，比較麻煩，考慮到前些天用ASP+模板+adodb....
作者：asdasdasd03-30 -
用cookies實現閃電登錄論壇方法
方法一：利用Cookies，一勞永逸 Cookies能通過IE的“文件-導入和導出”將登錄信息通過Cookies導出保存（傲游這個功能MS不能用），曾見過有人撰文說將“FALSE”空格后面的“10********”修改為“...
作者：asdasdasd03-30 -
ASP計算str2在str1中出現的次數
function CountStr(str1,str2) dim tmp,i,j if str1="" or isnull(str1) then j=0 elseif str2="" or isnull(str2) then j=1 e...
作者：asdasdasd03-30 -
雨哲防采集策略之列表篇
在一般的鏈接地址形式如： 復制代碼 代碼如下:1、<a class="鏈接樣式" href="鏈接地址" title="鏈接說明" target="_blank">文章標題</a> 2、<a class='鏈接樣式' href='鏈接地址' title='鏈接...
作者：asdasdasd03-30 -
天楓常用的ASP函數封裝如下
復制代碼 代碼如下:<% '－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ '天楓ASP class v1.0，集常用asp函數于一體 '天楓版權所有'QQ:76994859 EMAIL:Chenshaobo...
作者：asdasdasd03-30 -
隱藏ASP木馬后門的兩種方法
1、建立非標準目錄：mkdir images.. 拷貝ASP木馬至目錄：copy c:inetpubwwwrootdbm6.asp c:inetpubwwwrootimages..news.asp 通過web訪問ASP木馬：http://ip/images../news.asp?action=l...
作者：asdasdasd03-30 -
asp下對POST提交數據限制的解決方法
問題的解決辦法是，對于一個需要發送大數據的域，在提交表單前將數據拆分為小于限額的數份，分別放在數個hidden域中，同時把原有域清空，再正式提交表單。服務器端還是用Request.Form()讀取...
作者：asdasdasd03-30 -
ASP把長的數字用逗號隔開顯示的代碼
000000000000000000000000000000000000000000000000000000000000000 復制代碼 代碼如下:<% Function Comma(str) If Not(IsNumeric(str)) or str = 0 Then Result = 0 ElseIf Len(Fix(str)) ...
作者：asdasdasd03-30 -
Asp無組件生成縮略圖的代碼
還是先看看基礎部分吧。首先，我們知道在頁面中顯示圖片是如下代碼： <img src="pic.gif" border="0" width="300" height="260"> src是圖片路徑，border控制圖片邊緣寬度，width是...
作者：asdasdasd03-30 -
asp獲取當前文件名的代碼
Dim curUrl:curUrl = Replace(Request.ServerVariables("Script_Name"),"/","")...
作者：asdasdasd03-30 -
asp+Access通用的自動替換數據庫中的字符串
當初只是為了玩玩寫的，沒想到寫了之后不斷有人詢問，所以改寫了一下代碼，完善了一下，支持了正則替換，避開了會導致出錯的二進制（ole對象），并且做了一個EXE的程序。感謝虛擬幫忙。 附asp代...
作者：asdasdasd03-30 -
不用WinRar只有asp將網絡空間上的文件打包下載
<%@ Language=VBScript %> <% Option Explicit %> <!--#include file="asptar.asp"--> <% Response.Buffer = True Response.Clear Dim Co,Temp,T,x,i,fsoBrowse,theFolder,TheSubFolders,FilePa...
作者：asdasdasd03-30 -
asp下用fso生成js文件的代碼
<%sub fsojs()%> <% Set fso= Server.CreateObject("Scripting.FileSystemObject") set fd=fso.createtextfile(server.MapPath("../category.js"),true) '開始操作 set rs=server.CreateObject...
作者：asdasdasd03-30 -
防止網頁后退 asp禁止緩存
像一般網上很多禁止緩存的代碼，有時并不可靠，這時你只要在操作的頁面加上就可以了，在網頁的里指定要定向的新頁，再點后退，看是不是不會再退到剛才的操作頁面了，實際上已經把這個歷史給刪除...
作者：asdasdasd03-30