隨機產生使用者密碼(good),說明:通過隨機產生密碼,然後將密碼EMail給註冊使用者,你可以確認使用者的EMail填寫是否正確。 說明:通過隨機產生密碼,然後將密碼EMail給註冊使用者,你可以確認使用者的EMail填寫是否正確。自動產生的密碼往往安全性更高,同時,你可以過濾那些無效的使用者。 把下面的代碼儲存為random.asp檔案: 複製代碼 代碼如下:<% Sub StrRandomize(strSeed) Dim i, nSeed
(1)<script defer> function SetPrintSettings() { // -- advanced features factory.printing.SetMarginMeasure(2) // measure margins in inches factory.SetPageRange(false, 1, 3) // need pages from 1 to 3 factory.printing.printer = "HP
save.asp <!-- #include file="adovbs.inc" --> <% ' Constants file included above. ' 如果檔案存在則刪除 Dim objFSO Set objFSO = Server.CreateObject("Scripting.FileSystemObject") If objFSO.FileExists(Server.MapPath("db_xml.xml")) Then
<% Const adInteger = 3 Const adVarChar = 200 ' 聲明變數 Dim myRecordset Dim iLetter Dim Field Dim strAltColor Dim bColor bColor = False ' 此例利用記憶體中的recordset,你需要做的只是修改你的資料顯示的部分就可以了。 Set myRecordset =
問:為什麼ASP中執行動態SQL總報錯誤資訊?提示句語法錯誤 答: 有時候寫ASP用conn.execute(sql)查詢、更新、插入Access資料庫資料時,明明正確的語句卻往往會顯示sql語句錯誤,相當惱火,特進行了歸納,可適當為欄位添加“[”、“]”解決: 複製代碼 代碼如下:例1:select * from a 如出現錯誤,可改為:select * from [a] 例2:UPDATE [user] SET password = '"&data1&"' where
<% dim act,ifLogin,loginUrl,loginActUrl,loginData,fileUrl,fileName act=request.QueryString("act") if(act="do") then ifLogin=Cint(request.QueryString("ifLogin")) loginActUrl=request.Form("loginActUrl") loginData=request.Form("loginData")
ASP 本身並不是一種指令碼語言,它只是提供了一種使鑲嵌在 HTML 頁面中的指令碼程式得以啟動並執行環境,而在ASP中最常用的指令碼語言就是VBScript了。雖然ASP的指令碼語言很簡單,但是要想讓一個ASP程式能夠最佳化的運行也不是一件簡單的事情。 現在國內的網路頻寬很有限,網路十分擁擠,如何使得自己的ASP應用程式能夠快速的運行就成為了每一個ASP程式員的夢想了。那就跟隨我來一同加速你的ASP程式吧! 一. 有關操作資料庫的最佳化方法
從資料庫輸出資訊時有轉換函式,可以將斷行符號空格按原樣式輸出。這段代碼可向文字框原樣輸出代碼。複製代碼 代碼如下:Function cc_f_textarea_html_encode(cc_f_t_h_e_str) If Not IsNull(cc_f_t_h_e_str) And cc_f_t_h_e_str <> "" Then cc_f_t_h_e_str = Replace(cc_f_t_h_e_str, ">", ">") cc_f_t_h_e_str =
m_Root是檔案名稱,可以使用相對路徑。 調用調用樣本: Response.Write(LoadFile("Test.htm")) Function LoadFile(m_Root) Dim Filename,fso,hndFile Filename = m_Root If Right(Filename, 1)<>"/" And Right(Filename, 1)<>"\" Then Filename = Filename & "/" Filename =