ASP

實現功能不難，想要完善，甚至完美，那才叫難。所以，小弟將功能實現帖出來，和各位初學者討論討論。至於完善，就看各位自己的想法了一、建立資料庫在就開始了，我建了一個名為windsn.mdb的資料庫，包含4張表admin表（用於管理員資訊）：id, name(使用者名稱), pwd(密碼), ...concent表（用於存放文檔資料）：con_id, title, author, part, con, time, numcon_id 自動編號title 文章標題author 作者或出處part

這幾天維護網站的時候要加很多的新聞或者其它文章，因為經常到一個網站上找文章，所以就想，能不能做個程式，指定一個網址，讓ASP去搜尋這個網址上所有的文章，進而把搜尋回來的文章進行分析，把文章內容儲存到資料庫裡，這樣不就可以省去很多麻煩了嗎？ 　　後來才知道，這個想法早就有人想過，也有人做過新聞小偷，呵呵，不過據說是php的，我沒見過，呵呵，反正報著一種開發的心態開始進行工作…… 　　我記得以前收集的有一篇文章介紹的有如何用ASP擷取別人的網頁，拿出來一看，嗨，沒幾句代碼： URL = http:/

簡單採集類1.0測試版------------------------------Cls_Ajax.asp 負責採集網頁Cls_Filter.asp 負責過濾資料Cls_Thief.asp

<% '處理接收分頁得參數,顯示頁數 也就預設第一頁 'page這個參數就是讓變數pagenum去顯示第一也得值:0 if Request("page")="" then pageNum=0 '下面就是page接參數 else pageNum=Request("page") if not isnumeric(pageNum) then Call DH.Alert("操作錯誤！","-1") else pageNum=clng(pageNum) end if end if %&

此類高亮根據Editplus高亮來做的 複製代碼 代碼如下:Class Wyd_AspCodeHighLight Private RegEx Public Keyword,ObjectCommand,Strings,VBCode Public KeyWordColor,ObjectCommandColor,StringsColor,Comment,CodeColor Private Sub Class_Initialize() Set RegEx = New

來自：http://www.linuxeden.com/download/data/soft/1083.html我曾經發布過一個讓apache支援asp的東西，但是那是perl的一個擴充，是類asp，並不相容ms的asp，所以意義不大我很不甘心，今日我在瀏覽我的光碟片時偶爾發現一個東東，就是這個，竟然完美的 支援了 ms的asp將asp真正意義上移植到了unix/linux上，我擷取了最新版本2.11，經過半個小時的努力我終於在我的linux上完美的

基於很多原因，有不少朋友的空間不支援FSO， 還有就是當大量的頁面產生靜態頁面時，佔用大量的空間， 還有就是修改樣式時，不方便， 所以動態網頁面還是有動態網頁面的好處， 但我們站長都希望是所有的都是靜態頁面 因為靜態頁面容易受搜尋引擎的青睞， 所以我想用Asp實現假靜態來矇混一下搜尋引擎， 比如我們要訪問 view.asp?id=xxxx 從一個串連跳轉 <a href=view.asp?id=<%=xxxx%>.html>如何?假靜態</a>

1.不要放過任何一個看上去很簡單的小編程問題——他們往往並不那麼簡單，或者可以引伸出很多知識點； 2.會用asp，並不說明你會asp； 3.看asp的書，是學不了asp語言的； 4.浮躁的人容易說：asp語言不行了，應該學yy；——是你自己不行了吧！？ 5.浮躁的人容易問：我到底該學什麼；——別問，學就對了； 6.浮躁的人容易問：asp有錢途嗎；——建議你去搶銀行； 7.浮躁的人容易說：我要中文版！我英文不行！——不行？學呀！ 8.浮躁的人容易問：asp和yy哪個好；——告訴你吧，

<% Public Function ArrayToxml(DataArray, Recordset, row, xmlroot) Dim i, node, rs, j If xmlroot = "" Then xmlroot = "xml" Set ArrayToxml = Server.CreateObject("msxml2.FreeThreadedDOMDocument"& MsxmlVersion)

沒有用正常的迴圈tr內迴圈td的方法，所以就沒有計算最後一頁的記錄集數量。 但當記錄集不足時也同樣能夠自動補空行空列，如有不足請指出，謝謝。 使用方法很簡單： 複製代碼 代碼如下:<% showData("查詢語名") Call pagehead(行數,列數) '-------------------------------------------------------------------------------

複製代碼 代碼如下:<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);

<% '取欄位資料每個漢字的拼音首字母 Function getpychar(char) tmp = 65536 + Asc(char) If(tmp>= 45217 And tmp<= 45252) Then getpychar = "A" ElseIf(tmp>= 45253 And tmp<= 45760) Then getpychar = "B" ElseIf(tmp>= 47761

輸出RSS和XML時經常用到,和HTMLEncode還不完全一樣原理:CharacterConverted To""''&&<<>>代碼<%Function XMLEncode(byVal sText) sText = Replace(sText, "&" , "&") sText = Replace(sText, "<" , "<") sText = Replace(sText, ">" , "&

不知道為什麼現在各大搜尋引擎編碼居然不一樣.當然不是GB2312就是UTF-8了.編碼問題是比較頭疼的問題...頭疼的不要命...我們獲得關鍵詞,一般是通過來訪頁面的url進行分析的.比如http://www.google.com/search?hl=zh-CN&q=%E5%AD%A4%E7%8B%AC&lr=各位肯定知道這個是通過urlencode編碼的.我們得到其中的資訊,需要進行2步.第一步是進行urldecode,在我們普通參數活得的時候,這個是由ASP自己來進行的,但是

ASPJPEG是Persits出品的共用軟體，試用期為30天，您可以在這裡下載：http://www.persits.com/aspjpeg.exe。最新版本號碼是1.3=========================================<% sub jpegclass(imgurl,fontsize,family,isbold,top,left,content,Horflip) '調用過程名 Dim

複製代碼 代碼如下:<%On Error Resume Next%> <% dim p, ppic, id, body, myCache randomize p=Int((3*rnd)+1) id= Request.QueryString("id") HttpUrl="http://sms.2e7.net/可愛卡通0"&p&".gif" Set myCache = new cache myCache.name = "picindex"&id

複製代碼 代碼如下:<% '//---- 輸入字串並結束當前頁面(調試用),函數可以也命名為Debug ----// Function Trace(s) On Error Resume Next Response.Write(s & vbCrLf) Response.End() End Function %> 下面的是個修改升級版,還在測試中... 複製代碼 代碼如下:<% '//---- 輸入字串並結束當前頁面(調試用) -

ASP中最頭疼的就是偵錯工具的時候不方便，我想可能很多朋友都會用這樣的方法“response.write ”，然後輸出相關的語句來看看是否正確。前幾天寫了一個千行的頁面，裡面大概有七八個SUB/FUNCTION，調試的時候用了有三十幾個 response.write ，天，調試完後把這三十個一個個刪除，累！ 今天看到一個ASP中的Debug類（VBS），試用了一下，絕！ 使用方法很簡單： test.asp <!--#INCLUDE FILE="debuggingConsole.asp"--

因為發現AJAX目前跨域有點問題，只能在IE裡面設定才可以使用，所以自己就寫了個簡單ASP的webService，其實作用就是一個小偷程式，把雅虎的天氣抓了過來，然後產生XML。先從這裡開始吧，以後會考慮添加資料庫，這樣用戶端寫好後讀取速度就很快了。 習慣了用JS寫東西，一不小心ASP也全拿JS寫的，呵呵，有時間再改成VB。 我再鄙視他一下，FLASH是N年前就搞過的，時間雖然丟的有點長了，但是在AW的協助，慢慢就會有所起色。 總算平息了火，還算是又默默改變了一件事情。複製代碼

最近給分頁快搞死,記得之前曾經發過修改DW ASP分頁的方法,後來又寫過手工打造的ASP分頁,現在進入.NET當然要配合預存程序打造純手工高效能分頁了. 為什麼會叫做高效能,為什麼要手工打造,不使用.NET現有的分頁控制項呢?這個還要追溯到我修改DW ASP分頁的時候,那個我還不怎麼懂程式這個東西,只會修修補補,就更不要去談什麼效能問題.當時改的很心煩,接著叫我的私人技術總監張總幫我看看,當時張總就以一種不屑一顧的眼神往著我,說了句話:值得嗎?