Time of Update: 2017-01-18
<% Const adInteger = 3 Const adVarChar = 200 ' 聲明變數 Dim myRecordset Dim iLetter Dim Field
Time of Update: 2017-01-18
用零長度字元指示不存在資料
Time of Update: 2017-01-18
********************** (一) 開啟記錄集,建立數組,把記錄集的值賦給數組. <% Dim count set Rs=server.createobject("adodb.recordset") Sql = "select * from BookBoard order by ClassId desc" Rs.open
Time of Update: 2017-01-18
希望大家支援點擊廣告! 前些日子在群裡頭有位朋友問到怎麼實現在網頁上的郵箱訪問功能現在將從網上看到的網站載了下來,便人便已。 這個是html的代碼您在訪問網站時是否會在有些頁面上見到這種功能---您在可以訪問此網站的同時,還可以查看您免費郵箱中是否有新郵件。這個功能是不是讓您覺得很心動、很神秘呢?下面,我就用ASP來舉個例子讓您知道是如何?這一功能的。
Time of Update: 2017-01-18
ASP中最頭疼的就是偵錯工具的時候不方便,我想可能很多朋友都會用這樣的方法“response.write ”,然後輸出相關的語句來看看是否正確。前幾天寫了一個千行的頁面,裡面大概有七八個SUB/FUNCTION,調試的時候用了有三十幾個 response.write ,天,調試完後把這三十個一個個刪除,累! 今天看到一個ASP中的Debug類(VBS),試用了一下,絕! 使用方法很簡單: test.asp
Time of Update: 2017-01-18
'****************************** 'Function CheckIp(cInput_Ip,cBound_Ip) 'Created by qqdao, qqdao@263.net 2001/11/28 '說明:首先需要根據;號迴圈,然後判斷是否含有"-",如果有則進行拆分處理,最後判斷是否在範圍內 '參數: cInput_Ip,代檢查的ip
Time of Update: 2017-01-18
最近網上流行著一些採集程式,更多人拿著這些東西在網上叫賣,很多不太懂的人看著那些程式眼羨,其實如果你懂一些ASP,瞭解自動採集程式的原理後,你會感覺實現自動化也是那麼的簡單. 原理及優點:通過XML中的XMLHTTP組件調用其它網站上的網頁,然後批量截取或替換原有的資訊使其轉化成變數後再一一儲存到資料庫中。其主要的優點便是無需再手工添加大量的資訊了,可以指定對某一個站資訊的截取進行批量錄入,達到省時省力的目的。與其單純的ASP小偷程式不同的是:它已經不再依賴其目標網站。 簡單案例: 複製代碼
Time of Update: 2017-01-18
網站同一顯示很多廣告?需要不同權重?簡單的20行代碼。 複製代碼 代碼如下:Dim cc_fv_ad_468_80_code,cc_fv_ad_power,cc_fv_ad_i '廣告權重顯示 明月星光 Copyright http://www.5iya.com/blog 原創
Time of Update: 2017-01-18
1.MS SCRIPT ENCODE 基本上沒什麼用了,一段JS就可以破解 2.封裝成DLL 比較可行的方法,有通過VB封裝成DLL的例子,而且無需改動很多代碼,修改方便,調用時也很簡單.缺點是需要註冊DLL控制項,虛擬機器主機通常不能達到這一要求. 封裝時可在代碼裡加入主機網域名稱判斷的代碼,不對則拒絕運行,不過提倡封裝類,而展現邏輯還是留在ASP檔案裡吧,呵呵 案例:動易CMS 不過VB屬於解釋型語言,似乎可以反編譯 3.使用NETBOX
Time of Update: 2017-01-18
從資料庫輸出資訊時有轉換函式,可以將斷行符號空格按原樣式輸出。這段代碼可向文字框原樣輸出代碼。複製代碼 代碼如下: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
Time of Update: 2017-01-18
&nbs
Time of Update: 2017-01-18
添加超級使用者的.asp代碼[藍屏的原創,凱文改進,Ms未公布的漏洞] 作者:藍屏,凱文 文章來源:冰點極限其實上個禮拜我和凱文就在我的肉雞上測試了,還有河馬史詩.結果是在user許可權下成功添加Administrators組的使用者了(雖然我不敢相信我的眼睛). 上次凱文不發話,我不敢發布啊....現在在他的blog 上看到他發布了,就轉來了咯(比我上次測試時還改進了一點,加了個表單).這下大家有福咯```
Time of Update: 2017-01-18
m_Root是檔案名稱,可以使用相對路徑。 調用調用樣本: Response.Write(LoadFile("Test.htm")) Function LoadFile(m_Root) Dim Filename,fso,hndFile Filename = m_Root
Time of Update: 2017-01-18
<%@ Language=VBScript %> <!-- METADATA TYPE="TypeLib" UUID="{01E88D14-F479-4CA5-9CA8-EBD2EED74C83}" --> <HTML> <BODY> <H1 align=center>線上註冊示範</H1> <% Dim sMessage If
Time of Update: 2017-01-18
VB- 工程 -引用 - ADO 2.0 ,建一個類DB,工程名設為 SQLCONN 以下是偶程式中的部分代碼,大家有空可以試試 Option Explicit Public strError As String Public Conn As New ADODB.Connection Public Rs As New&
Time of Update: 2017-01-18
Option Explicit Private Const NCBASTAT = &H33 Private Const NCBNAMSZ = 16 Private Const HEAP_ZERO_MEMORY = &H8
Time of Update: 2017-01-18
隨機產生使用者密碼(good),說明:通過隨機產生密碼,然後將密碼EMail給註冊使用者,你可以確認使用者的EMail填寫是否正確。 說明:通過隨機產生密碼,然後將密碼EMail給註冊使用者,你可以確認使用者的EMail填寫是否正確。自動產生的密碼往往安全性更高,同時,你可以過濾那些無效的使用者。 把下面的代碼儲存為random.asp檔案: 複製代碼 代碼如下:<%
Time of Update: 2017-01-18
調用Word列印... 運行下列的指令碼需要將IE的安全層級設為低,或在中級安全層級下將那個ActiveX控制項設為啟用,別忘記了: <html> <head> <title>Build Document by Script</TITLE> </HEAD> <Table id="myData" border=1
Time of Update: 2017-01-18
請看下面樣本,這是一個用來顯示圖書分類的例子程式: displayBooks.asp < %@ LANGUAGE=JavaScript % > < html > < body > < form method=post >
Time of Update: 2017-01-18
本文執行個體講述了asp.net使用LINQ to SQL串連資料庫及SQL動作陳述式用法。分享給大家供大家參考,具體如下:LINQ簡介LINQ:Language-integrated Query (LINQ)(Language INtegrated Query)是一組用於c#和Visual Basic語言的擴充。它允許編寫C#或者Visual Basic代碼以查詢資料庫相同的方式操作記憶體資料。LINQ是一門查詢語言,和SQL一樣,通過一些關鍵字的組合,實現最終的查詢。LINQ的分類LINQ