-
身份證校驗算法與ASP程序
18位身份證校驗算法 身份證校驗碼算法 身份證校驗碼產生方法： ∑(ai×Wi)(mod 11) i: 表示號碼字符從由至左包括校驗碼在內的位置序號； ai 表示第i位置上的號碼字符值； Wi 第i位置上的加權因...
作者：asdasdasd03-30 -
用ASP讀取/寫入UTF-8編碼格式的文件
<% '------------------------------------------------- '函數名稱:ReadTextFile '作用:利用AdoDb.Stream對象來讀取UTF-8格式的文本文件 '--------------------------------------------------...
作者：asdasdasd03-30 -
Access 開發人員常犯錯誤大全
錯誤一：陷入界面設計陷阱。漂亮的姑娘喜歡穿美麗的衣服，丑姑娘也喜歡美麗的衣服，可ACCESS除了提供定制菜單與開關面版之外，不提供任何定制控鍵的功能。你如果想使用自己的按扭，得編寫許多許...
作者：asdasdasd03-30 -
Wrance的圖片系統目錄直讀版1.0
復制代碼 代碼如下:<%@language=vbscript codepage=936 %> <% '++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ '++++++Wrance的圖片系統目錄直讀版1.0+++++++++++++++++++++++ '...
作者：asdasdasd03-30 -
網頁木馬代碼例子（里面的文件是漏洞掃描器，呵呵）
對于經常上網沖浪的朋友對于網頁木馬一定不會陌生，打開某個網站，莫名其妙的運行了某個木馬，雖然在"Internet選項"里有"安全"設置，但是下面的代碼就不會彈出任何信息就直接運行了程序，不信，...
作者：asdasdasd03-30 -
ASP抽取數據的執行效率
通常從數據庫中抽取數據記錄，需要使用到SQL語句，查詢獲得相關記錄集，然后從記錄集中選擇相關字段、相關記錄行進行顯示。 那么在抽取到顯示的一系列列過程中，如果注意如下幾個要點，則令抽取...
作者：asdasdasd03-30 -
非常不錯的列出sql服務器上所有數據庫的asp代碼
主題:列出sql服務器上所有庫的代碼 第一個：dbo權限列出服務器上所有數據庫 復制代碼 代碼如下:<% Dim srv Dim objDB Set srv = Server.CreateObject("SQLDMO.SQLServer") srv.LoginTi...
作者：asdasdasd03-30 -
用Asp如何實現防止網頁頻繁刷新？
<% dim RefreshIntervalTime RefreshIntervalTime = 3 '防止刷新的時間秒數，0表示不防止 If Not IsEmpty(Session(“visit“)) and isnumeric(Session(“visit“)) and int(Refresh...
作者：asdasdasd03-30 -
信息發布中的判斷過期和有效期的東西
復制代碼 代碼如下:yxq=cdate(rdsInfo("InfoDate")) //得到有效期 fbsj=FormatTime(rdsInfo("CreateTime"),8) //發布時間 dqsj=DateAdd( "d" ,yxq ,fbsj) //到期時間 sysj=DateDiff ("d",dat...
作者：asdasdasd03-30 -
ASP萬用分頁程序
這只是個asp小技巧類的東西，它雖然適合在每個不同文件名里調用這個函數，但是也是有前提的，下面讓我們來仔細看看其中的原委。 下面這段是基本的分頁代碼： ＜% sql = "select………………...
作者：asdasdasd03-30 -
關于網站文件自動備份程序的一點思考
摘要： 本文提供了一種使用asp php腳本來實現網站文件備份的思路，可以實現指定文件的按天備份。 個人網站往往在虛擬主機上，對主機的控制權限很小，因此不能使用諸如任務計劃來實現定時備份，...
作者：asdasdasd03-30 -
非常不錯的flash采集程序測試通過
復制代碼 代碼如下:<% '-------------------------------------------------------------- Dbname = "../data/flash.mdb" '更改數據庫文件位置，強烈建議更改為.asp的文件！ Set Con...
作者：asdasdasd03-30 -
ASP 中使用 HTTP 協議發送參數詳解
<%@LANGUAGE=“VBSCRIPT“ CODEPAGE=“CP_ACP“%> <html> <head> <meta http-equiv=“Content-Type“ content=“text/html; charset=Shift-JIS“> <SCRIPT LANGUAGE=“JavaScri...
作者：asdasdasd03-30 -
小偷程序2
復制代碼 代碼如下:<% DJ54_path = "data/data.mdb" '數據庫地址 Set conn= Server.CreateObject("ADODB.Connection") connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapP...
作者：asdasdasd03-30 -
ASP項目中的公共翻頁模塊
在大型的ASP項目中，很多的頁面都涉及到翻頁功能。如果每個頁面都寫一個翻頁的程序的話，這樣的工作即降低了工作效率，也不利于工程的模塊化，不能使代碼重用。因此，把翻頁這樣的功能模塊化是很...
作者：asdasdasd03-30 -
DBTree 1.3.2
1.3.2的修改
作者：asdasdasd03-30
對 InsertNode進行了修改，不會再發生傳送的節點id有錯誤而默認插入到根下的行為。 （出于安全考慮而去掉）
完善了SubTree函數
添加了path函數可以得到路徑
添加了alterNode可以... -
防范ASP木馬的十大基本原則強列建議看下
由于ASP它本身是服務器提供的一項服務功能，特別是最近由dvbbs的upfile文件出現漏洞以來，其高度的隱蔽性和難查殺性，對網站的安全造成了嚴重的威脅。因此針對ASP木馬的防范和清除，為網管人員提...
作者：asdasdasd03-30 -
為什么 Windows2003 的 IIS6.0 不能上傳超過 200K 的文件？
Windows2003 的 IIS 6.0 對 asp 的上傳文件大小為200k限制，aspx的上傳程序沒有影響。在IIS6.0中，默認設置是特別嚴格和安全的，最大只能傳送 204,800 個字節，這樣可以最大限度地減少因以前太寬...
作者：asdasdasd03-30 -
一個ASP中的數組
當數據庫中讀取很多的數據。 將他連成了字符串，格式如下：str=1###0###1***2###1###1_1***3###1###1_2***4###2###1_1_1***5###2###1_1_2***6###4###1_1_1_1***7###6###1_1_1_1_1 然后用先用arr...
作者：asdasdasd03-30 -
asp實現批量錄入數據的實現
批量錄入在數據庫的應用中比較廣泛的，關于批量錄入的方法也有好多種。下面我就結合我實際中的應用，談一下兒我是怎么實現的。主要用到的是form的集合的概念，通過循環取的所有的集合內數據。考...
作者：asdasdasd03-30 -
抽取10萬條數據，想起GetRows()
現有10W條數據，Access數據庫保存通過正常提取：
作者：asdasdasd03-30
<%Set conn= Server.CreateObject("ADODB.Connection")connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db2.md... -
雷客圖ASP站長安全助手的ASP木馬查找功能
可以在線查找空間里的asp木馬復制代碼 代碼如下:<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% '設置密碼 PASSWORD = "jb51net" dim Report if request.QueryString("act")="login" then if ...
作者：asdasdasd03-30 -
ASP類的寫法
<% Class myClassName Private int_ID '分類id '類初始化 Private Sub Class_Initialize() m_strError = "" End Sub '類釋放 Private Sub Class_Terminate() m_strError = "" End Sub '-----讀寫...
作者：asdasdasd03-30 -
超精華的asp代碼大全第1/2頁
顯示頁面加載時間 重復域中的斑馬線 顯示字符串前20個字符并在結尾處添加“……” 如果動態圖片為空，使用默認圖片代替 如果數據為空，使用默認提示信息代替 ●顯示頁面加載時間 頁面頂部添...
作者：asdasdasd03-30 -
從文本文件中讀取信息并存儲入數據庫
<% dim fso,f1 Const ForReading = 1 set fso=createobject("Scripting.FileSystemObject") ''使用fso對象讀取信息。 set f1=fso.OpenTextFile("E:doitinfo2.txt", ForReading) ''打開要讀取...
作者：asdasdasd03-30