Time of Update: 2018-12-08
最近網上流行著一些採集程式,更多人拿著這些東西在網上叫賣,很多不太懂的人看著那些程式眼羨,其實如果你懂一些ASP,瞭解自動採集程式的原理後,你會感覺實現自動化也是那麼的簡單. 原理及優點:通過XML中的XMLHTTP組件調用其它網站上的網頁,然後批量截取或替換原有的資訊使其轉化成變數後再一一儲存到資料庫中。其主要的優點便是無需再手工添加大量的資訊了,可以指定對某一個站資訊的截取進行批量錄入,達到省時省力的目的。與其單純的ASP小偷程式不同的是:它已經不再依賴其目標網站。 簡單案例: 複製代碼
Time of Update: 2018-12-08
這是以前用ASP寫的,本想改成ASP.net的給大家,後來想大家能看懂演算法就行了。IP比對的關鍵是IP地址的線性化,下面就是代碼。 複製代碼 代碼如下:'可以進入的ip '218.7.44.0 - 218.7.45.253 '61.180.240.0 - 61.180.240.253 '202.118.208.0 - 202.118.223.253 ' '218.7.44.0 3657903103 '218.7.45.253 3657903612
Time of Update: 2018-12-08
ASP物件導向編程探討及比較 選擇自 RAINMAN_NET 的 Blog 關鍵字 ASP物件導向編程探討及比較 出處 ASP是Microsoft於較早期推出的動態網頁編程技術,但其結合ADO對資料庫方便快捷的訪問、結合XML、COM/ActiveX等其它技術 實現伺服器多層結構的功能使它在今天還有著頑強的生命力,並且依然有著一定的發展。ASP.Net雖然在架構上完全不同於ASP,但它很多內建對象也是基
Time of Update: 2018-12-08
ASP串連資料庫的全能代碼 '解決了ACCESS資料庫路徑的問題! '採用DBType=0或DBType=1來區分AC庫還是MSSQL庫 '具體採用AC庫時應注意的事項,請看程式說明 -------------------------------------------------------------------------------- Dim DBType,Conn,StrConn DBType=0 '0為Access資料庫,1為MSSQL資料庫
Time of Update: 2018-12-08
大家都知道ASP是一種無類型的指令碼語言,而VB,VC,DELPHI等語言開發出來的DLL組件都是強型別的,這樣就存在一個問題.這樣就會存在問題. 我還是用我遇到的問題來說話吧,我用VB寫一個類Test,存在一個方法FunA,方法FunA的傳回值為一個數組,範例程式碼: Class Test: Public Function GetStr() GetStr = Split("a,b,c,d", ",") End Function ASP代碼: Dim o Set
Time of Update: 2018-12-08
程式設計中我們時常需要檢測使用者輸入是否正確,特別是姓名,地址等等是不是輸入的漢字。那麼,如何判斷一個字元是不是漢字呢?其實在asp中至少有兩種方式一、直接將某字元用asc轉為ascii碼,如果是英文,他應該是0-127的範圍,而漢字則是一個比較大的數字,所以可以使用以下代碼來判斷:if abs(asc(whichchar))>127 thenresponse.write whichchar & "是一個漢字"elseresponse.write whichchar & "
Time of Update: 2018-12-08
如果你用ODBC connection (DSN or DSN-less)來訪問遠端的(UNC path)資料庫, OLEDB會出現以下錯誤資訊: Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Microsoft Access Driver] The Microsoft Jet database engine cannot open the file '(unknown)'. It
Time of Update: 2018-12-08
同一空間多綁一個網域名稱複製代碼 代碼如下:<% CheckDomain Sub CheckDomain() dim sDomain sDomain = Request.ServerVariables("HTTP_HOST") If Instr(sDomain,"a.xxx.com")>0 then Response.Redirect "a/" End Sub %> 同一空間多綁二個網域名稱 複製代碼 代碼如下:<% CheckDomain Sub
Time of Update: 2018-12-08
複製代碼 代碼如下:<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% '設定登陸密碼,使用前務必修改此密碼 PASSWORD = "www.pifoo.com" '其他掃描設定 DimFileExt = "asp,cer,asa,cdx" '檔案類型副檔名列表,不在此列表的將不被掃描 maxfilesize= 51200 '500K,超過此檔案大小的檔案(一般不是木馬),將不被掃描 timeout=600
Time of Update: 2018-12-08
1、資料庫連接。 ASP與Access資料庫連接: <%@ language=VBscript%> <% dim conn,mdbfile mdbfile=server.mappath("資料庫名稱.mdb") set conn=server.createobject("adodb.connection") conn.open "driver={microsoft access driver
Time of Update: 2018-12-08
來自:http://www.linuxeden.com/download/data/soft/1083.html我曾經發布過一個讓apache支援asp的東西,但是那是perl的一個擴充,是類asp,並不相容ms的asp,所以意義不大我很不甘心,今日我在瀏覽我的光碟片時偶爾發現一個東東,就是這個,竟然完美的 支援了 ms的asp將asp真正意義上移植到了unix/linux上,我擷取了最新版本2.11,經過半個小時的努力我終於在我的linux上完美的
Time of Update: 2018-12-08
<% Public Function ArrayToxml(DataArray, Recordset, row, xmlroot) Dim i, node, rs, j If xmlroot = "" Then xmlroot = "xml" Set ArrayToxml = Server.CreateObject("msxml2.FreeThreadedDOMDocument"& MsxmlVersion)
Time of Update: 2018-12-08
複製代碼 代碼如下:<script language="JavaScript" type="text/javascript"> var pos, str, para, parastr, tempstr1; tempstr = ""; str = window.location.href; pos = str.indexOf("?")parastr = str.substring(pos + 1); document.write("<br>檔案路徑:" + str);
Time of Update: 2018-12-08
輸出RSS和XML時經常用到,和HTMLEncode還不完全一樣原理:CharacterConverted To""''&&<<>>代碼<%Function XMLEncode(byVal sText) sText = Replace(sText, "&" , "&") sText = Replace(sText, "<" , "<") sText = Replace(sText, ">" , "&
Time of Update: 2018-12-08
複製代碼 代碼如下:<% '//---- 輸入字串並結束當前頁面(調試用),函數可以也命名為Debug ----// Function Trace(s) On Error Resume Next Response.Write(s & vbCrLf) Response.End() End Function %> 下面的是個修改升級版,還在測試中... 複製代碼 代碼如下:<% '//---- 輸入字串並結束當前頁面(調試用) -
Time of Update: 2018-12-08
為了避免ASP程式和HTML代碼混寫造成維護困難的情況,本文介紹了一種方法,利用模板來分離程式和頁面,使程式設計更加輕鬆。 在使用ASP製作一個網站的時候,常常會出現一個ASP檔案中,程式碼和HTML代碼混合的情況。這樣子做有許多缺點: 1. 且不說編程時就要對頁面配置進行設計和編排,造成代碼混亂難懂,不規範; 2. 當需要改變頁面外觀時,你不僅要改變HTML部份,也需要改變ASP代碼,不易維護。 那麼,要如何才能避免這些麻煩呢?
Time of Update: 2018-12-08
複製代碼 代碼如下:<?php /** * 功能:實現像JSP,ASP裡Application那樣的全域變數 * author: [url]www.itzg.net[/url] * version: 1.0 * 著作權:如許轉載請保留著作權聲明 */ /*+----------------example---------------------- require_once("Application.php"); $arr =
Time of Update: 2018-12-08
1. 下面的代碼示範了如何在服務端擷取來自用戶端瀏覽器中某一個圖片的x,y座標,注意input控制項的類型是image類型。 <form> <Input Name="ImageMap" Type="Image" Src="ImageMap.jpg" Alt="Click Anywhere"> </form> <%ImageMap.x = <%=Request("ImageMap.x") ImageMap.y = <%=Request("
Time of Update: 2018-12-08
很久以前的文檔,整理出來,回味一下 使用VB封裝ASP,建立SayHello測試程式 1、開啟VB6,建立ActiveX DLL 2、在工程引用中加入Microsoft Active Server Pages Object Library選擇 3、填加代碼如下: 'Code Start '聲明部分 Private MyScriptingContext As ScriptingContext Private MyApplication As Application Private
Time of Update: 2018-12-08
'============================================================= ' 感謝您使用ASP001工作室開發的實用函數程式 ' HTTP://WWW.ASP001.NET '============================================================= 'ASP001工作室為您提供訂製程式開發、企業互連網拓展服務 'QQ:1974229