ASP

 asp修改記錄：學習目的：學會資料庫的基本操作－－修改記錄　　先來看代碼：(存為exam8.asp就可以了)<%set conn=server.createobject("adodb.connection")conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("data/guestbook.mdb")exec=&

 　　編寫asp代碼截取字串：　　'函數名：SubstZFC　　'作 用：截字串，漢字一個算兩個字元，英文算一個字元　　'參 數：str ----原字串　　' strlen ----截取長度　　'傳回值：截取後的字串　　'適用：標題截取指定字元，如果用LEFT截取，當有英文時就會出現取出來的標題明顯太短。　　'**************************************************　　Public Function SubstZFC(ByVal str,

 asp防止留言灌水原理:在每次提交留言的時候,要輸入隨機產生的4位認證碼. 以下代碼用在ASP 產生隨機4位元: <% dim key randomize timer key=Int((8999)*Rnd +1000) %> 在表單裡顯示: 認證碼：<%=key%> <input type="text"

www.veryhuo.com]<% '-------------------------資料庫連接----------------------- Set objConn = Server.CreateObject("ADODB.Connection") objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;"

 　　在有些時候我們無法控制亂碼的出現, 比如發送郵件的時候有些郵件顯示亂碼, 比如Ajax返回資料總是亂碼. 怎麼辦? 前些天我就碰到了用Ajax提交表單, 然後發送郵件的情況. 於是寫出了下面的兩個函數來解決這兩個問題.　　第一個函數把HTML中的資料轉成HTML實體, 而HTML標籤則自動不轉, 這樣無論到哪裡都不會亂碼, 可以在發送郵件時選擇發送HTML格式的郵件.　　第二個函數把JS資料同樣是換成逸出字元, 同樣避開了JS關鍵詞等字元的轉換,

 　　Rnd 函數　　描述　　返回一個隨機數。　　文法　　Rnd[(number)]　　number 參數可以是任意有效數值運算式。　　說明　　Rnd 函數返回一個小於 1 但大於或等於 0 的值。 number 的值決定了 Rnd 產生隨機數的方式：　　如果 number 為 Rnd 產生　　小於零 每次都相同的值，使用 number 作為種子。　　大於零 序列中的下一個隨機數。　　等於零 最近產生的數。　　省略 序列中的下一個隨機數。　　因每一次連續調用 Rnd

 　　迴圈是指在指定情況下，多次重複執行一組語句。最常用(for …next、 do …loop)，　　1、重複執行的語句叫迴圈語句。　　迴圈語句可以分為三種類型：　　(1)、當條件不為假之前的時候重複執行語句。　　(2)、當條件變為真之前重複執行語句。　　(3)、按指定的次數重複執行語句。　　2、For…Next 迴圈 如果重複操作的次數固定，使用 For…Next 迴圈是一個很好的選擇，此外也將介紹文法很類似的 For

 　　這篇文章主要介紹了ASP中獲得Select Count語句傳回值的方法,一般用在統計資料時使用Select Count語句,以此一獲得查詢到的行數,需要的朋友可以參考下　　我們一般統計資料庫記錄時會用到Select Count(*)語句，當我們使用SQL Server的查詢分析器時，直接輸入Select Count(*) From

 昨晚想搞一個js菜單，搞了一個晚上都沒弄出來。後來百度了下，有點狂汗~~~實現的效果很簡單，就是點一下顯示，再點一下就隱藏，只不過是多了幾級的問題。好，現在來說說我的設計思路，首先從第一層級開始，添加如下代碼：<div><a onclick="news_pro('1.1')">1</a></div> <div id="1.1" ><div>　<a

 　　方法：BuildPath　　文法：對象名.BulidPath(路徑,檔案名稱)　　說明：在路徑上添加檔案名稱，如果有需要的話，會自動加上分隔字元。　　方法：CopyFile　　文法：對象名.CopyFile(源路徑,目標路徑[,是否覆蓋])　　說明：將一個或多個檔案從源位置複製到目標位置。源位置支援萬用字元，如果目標路徑最後字元為則認為目標路徑是目錄，　　是否覆蓋參數預設值為TURE，如果目標位置檔案已經存在，而是否覆蓋屬性設定為FALSE的話會出錯。(關於是否覆蓋參數的說明其它

 　　404錯誤狀態代碼是頁面找不到時才返回的一個告訴搜尋引擎此頁面永久不存了，下面小編來給各位同學介紹一下404錯誤狀態代碼在asp代碼中如何?吧。　　asp中設定404狀態  代碼如下   <%      Response.Status =

 　　cstr()轉換成字串，cint()轉換成數字，clng()轉換為 Long 類型的 Variant　　先用isnumberic函數判斷　　整形……轉字元形用：cstr() 函數　　字元形轉整形用： cint() 函數　　字元形轉長整形用： clng() 函數　　函數列表　　CBool Boolean 任何有效字串或數值運算式。　　CByte Byte 0 至 255。　　CCur Currency -922,337,203,685,477.5808

 　　因工作關係好久沒有搞網站了，最近在搞一個ASP的宣傳網站，本想在本地測試遇到一些問題，整理記錄下以備日後有需。　　示範環境：W7 旗艦版64位 + IIS7 + ASP網站　　錯誤資訊如下：　　ADODB.Connection 錯誤 '800a0e7a'　　未找到提供者。該程式可能未正確安裝。　　/admin/Inc/Conn.asp，行 23　　在出現這個錯誤之後做了幾個判斷：　　1、此套ASP網站

 使用301重新導向可以把不帶www的網域名稱轉向帶www的網域名稱，這樣可以把權重全部指向帶有www的網域名稱，對網站最佳化很有協助。<% Dim Server_Name,Path_infostr,Query_Stringstr Path_infostr=lcase(request.ServerVariables("PATH_INFO"))

 <% Dim AppealNum,AppealCount AppealNum=10 '同一IP60秒內要求節流10次 AppealCount=Request.Cookies("AppealCount") If AppealCount="" Then response.Cookies("AppealCount")=1 AppealCount=1 

 <%Private Const BITS_TO_A_BYTE = 8Private Const BYTES_TO_A_WORD = 4Private Const BITS_TO_A_WORD = 32 Private m_lOnBits(30)Private m_l2Power(30) Private Function LShift(lValue, iShiftBits)If iShiftBits = 0 ThenLShift =

 <%Function SaveRemoteFile(LocalFileName,RemoteFileUrl)    SaveRemoteFile=Truedim Ads,Retrieval,GetRemoteDataSet Retrieval = Server.CreateObject("Microsoft.XMLHTTP")With Retrieval   .Open "Get",

 　　asp無組件上傳帶真實進度條無組件上傳帶真實進度條　　其中　　upload.asp為核心代碼，除非特殊需要，一般不需要修改　　demo.htm是示範無重新整理進度條(IE5.5+支援)　　demo.asp為處理demo.asp上傳的檔案，因為示範需要，在Demo.asp中僅僅上傳，不作儲存，如果需要儲存，只需去掉相關注釋即可。　　Example_Normal.htm，一個普通的上傳的例子　　Example_Normal_RadomFilename.htm，

 ASP編程常用的代碼--------------------------------------------------------------------------------1. ASP與Access資料庫連接：<% dim conn,mdbfile mdbfile=server.mappath("資料庫名稱.mdb") set

 asp寫入記錄：學習目的：學會資料庫的基本操作--寫入記錄　　資料庫的基本操作無非是：查詢記錄，寫入記錄，刪除記錄，修改記錄。　　今天我們先學習寫入記錄。先建立一個表單：(把下面文章儲存為5.htm)<form name="form1" method="post" action="exa5.asp">name <input type="text"