ASP

複製代碼 代碼如下:<form method="post" name=myform> 姓　名：<input type="text" name="name" value=""><br> 學　號：<input type="text" name="num" value=""><br> 。。。：<input type="text" name="aaa" value=""><br> 。。。：<input type="

1。建立資料庫表 表名為online 設如下欄位 id '用來記錄每一個訪問都的session.sessionid name '如果是訪客，則記錄為訪客。 online '如果是訪各為0 如果是會員1 datetime '最近啟用時間 username '會員的登入使用者名稱,訪客為空白。 ip '記錄訪問都的登入IP head.asp '向資料庫表寫入線上人數，該頁面必須搜入到每一個用於瀏覽ASP頁面中。 <% set

其實這裡的靜態頁面並不是真正意義上的靜態，但可以達到了靜態頁面的解析效率，還未經項目測試，拿來分享。複製代碼 代碼如下:<% Const DEVJS_INDEX="index.html" Const INDEX_DEFAULT_INTERVAL=300 Dim sLastUpdate '用Application儲存最後更新的時間，而在頁面裡做判斷，每隔300秒(5分鐘)就產生一次頁面 sLastUpdate=Application("INDEX_LAST_Update") If

abs(number) 返回絕對值。 array(arglist) 建立一個數組。 asc(string) 返回字串第一個字元的ansi碼。 atn(number) 返回反正弦值。 cbool (expression) 轉換成boolean資料類型變數。 cbyte (expression) 轉換成byte資料類型變數。 ccur (expression) 轉換成currency資料類型變數。 cdate (expression) 轉換成date資料類型變數。 cdbl (expression)

<% '#######以下是一個類檔案，下面的註解是調用類的方法################################################ '# 注意：如果系統不支援建立Scripting.FileSystemObject對象，那麼資料庫壓縮功能將無法使用 '# Access 資料庫類 '# CreateDbFile 建立一個Access 資料庫檔案 '# CompactDatabase 壓縮一個Access 資料庫檔案 '# 建立對象方法: '# Set a =

現在有一個xml，格式如下： 複製代碼 代碼如下:<date> <item> <id> 1 </id> <name> ABC </name> </item> <item> <id> 2 </id> <name> cde </name> </item> <item> <id> 3 </id>

說明：本函數作用是截取指定英漢混合字串，並保持顯示長度一至。就是將一個漢字當兩英文來截取。 用途：一般會用在標題顯示列表，可以避免截取的字串參插不齊的現象。 程式碼 複製代碼 代碼如下:'//A_strString要處理的字串 '//A_intLen以英文字元數為準 '//A_strAddString如果A_strString有截取字元時添中的尾碼，如：...，可以為空白 function CutString(byval A_strString,byval A_intLen,byval

什麼是RSS？ RSS是網站用來和其他網站之間共用內容的一種簡易方式（也叫彙總內容），通常被用於新聞和其他按順序排列的網站，例如Blog。一段項目的介紹可能包含新聞的全部介紹等。或者僅僅是額外的內容或者簡短的介紹。這些項目的連結通常都能連結到全部的內容。網路使用者可以在用戶端藉助於支援RSS的新聞彙總軟體（如FeedDemon、SharpReader,NewzCrawler），在不開啟網站內容頁面的情況下閱讀支援RSS輸出的網站內容。網站提供RSS輸出，有利於讓使用者發現網站內容的更新。

最好的方法： 先說一下基本的東西： <%@ codepage=65001%>UTF-8 <%@ codepage=936%>簡體中文 <%@ codepage=950%>繁體中文 <%@ codepage=437 %>美國/加拿大英語 <%@ codepage=932 %>日文 <%@ codepage=949 %>韓文 <%@ codepage=866 %>俄文

登入頁面能訪問得到，但當執行下級目錄的檔案就不行了，瀏覽器直接跳出以下錯誤頁面：     除些以外沒有任何其它有價值的資訊，因為此網站在我的電腦上執行是正常的，猜想應該是IIS配置上的問題（早就聽說IIS的安全性提高了，是否是有做過限制），但My

採集中 或者 線上添加文章中 都可以用到此功能 俺自己在baidu上搜尋的儲存遠程圖片到本地的代碼 感覺比較難用點 而且沒有現成的比較全的代碼 俺也看不懂 俺從 SNA新聞採集系統 For 3.62 (程式製作:ansir)裡提取了點函數 用下 比較簡單好用 以下是函數 程式碼 複製代碼 代碼如下:<% '================================================== '函數名：CheckDir2 '作 用：檢查檔案夾是否存在 '參

其中使用到一個分頁類CPaging 複製代碼 代碼如下:Class CPaging Public RS ' RecordSet對象 Public Mark ' 指標標籤 Private sSize ' 每頁顯示數 Private sTotal ' 總記錄數 Private sPage ' 當前頁碼 Private sCount ' 總頁碼 Private Sub Class_Initialize sSize = 20 sPage = 1 sCount = 1 End Sub Private

<% set conn=server.createobject("adodb.connection") connstr="Provider=Microsoft.jet.oledb.4.0;data source="&server.mappath("cou.mdb") //cou是資料庫名 conn.open connstr if session("visited")<>"yes" then application.Lock() conn.execute("update

複製代碼 代碼如下:<% str = request("str") reg = request("reg") set regex = new RegExp With regex .Pattern = reg .IgnoreCase = False .Global = True End With Set match = regex.Execute(str) If match.Count > 0 Then For Each matched in match Response.Write

為什麼我寫ASP分頁教程要提到AJAX呢,因為我們要多練習一下編程過程中,結構化的重要性. 再加上很多朋友對分頁感到很高深,所以一直都不敢去碰他,要麼就用別人寫好的組件,要麼就是改改別人的東西.特別是.net,我深有感觸,假如要快速開發一個項目,我想.net是一個非常優秀的平台.但是,因為他的嚴重控制項化,反而是新手接觸不到編程的思想,完全找不到編程的感覺,彷彿就象在搭積木.有時候還是要練習一下底層一點的東西,這樣個人的技術能力才會得到提高.我可不想做只會用.NET的組裝工人.

下面是代碼，如果看不懂，建議先把表格的一些<tr><td>的表格原理弄清楚了，就可以了複製代碼 代碼如下:<table border="0" cellpadding="0" cellspacing="0"> <% dim rs,sqltext set rs = Server.CreateObject("adodb.recordset") sqltext="select * from [bigclass]" rs.Open sqltext,conn,1,1

這個分頁使用的是0遊標，也就是Rs.Open Sql,Conn,0,1。但是感覺也快不了多少，10萬條資料的分頁時間300多豪秒之間。複製代碼 代碼如下:<% '****************************** '名稱：分頁類 '日期：2005/12/3 '作者：西樓冷月 '網址：www.xilou.net | www.chinaCMS.org '描述：無 '著作權：轉載請注名出處，作者 '****************************** Class Page

rs.open sql,conn,A,B A： ADOPenforwardonly (=0) 唯讀，且當前資料記錄只能向下移動。 ADOPenkeyset (=1) 唯讀，當前資料記錄可自由移動。 ADOpendynamic (=2) 可讀寫，當前資料記錄可自由移動。 ADOpenstatic (=3) 可讀寫，當前資料記錄可自由移動，可看到新增記錄。 B： ADLockreadonly (=1) 預設鎖定類型，記錄集是唯讀，不能修改記錄。 ADLockpessimistic (=2)

'定義變數 Dim cn,rs,Sql Sql = "select CustomerID from Orders" '記錄總數 Dim TotalNumbe Set cn = Server.CreateObject("ADODB.Connection") cn.Open "Provider=SQLOLEDB.1;User ID=sa;Initial Catalog=NorthWind;Data Source=.;Password=;" Set rs = Server.CreateObject("

<!--註冊模組-->default.asp 複製代碼 代碼如下:<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <title>Ajax -