推薦:ASP技巧實例:ASP實現最簡潔的多重查詢的解決方案我們經常會遇到多重查詢問題,而長長的SQL語句往往讓人丈二和尚摸不著頭腦。特別是客戶端部分填入查詢條件時,如用普通方法將更是難上加難。以下巧妙地利用where 1=1的恆等式(
簡單的ASP無組件上傳類,發出來讓大家看看。可以做做實驗!
| 以下為引用的內容: <%@ language=javascript%> <% var self = Request.serverVariables(SCRIPT_NAME); if (Request.serverVariables(REQUEST_METHOD)==POST) { var oo = new uploadFile(); oo.path = myFile; //存放路徑,為空表示當前路徑,默認為uploadFile oo.named = file; //命名方式,date表示用日期來命名,file表示用文件名本身,默認為file oo.ext = all; //允許上傳的擴展名,all表示都允許,默認為all oo.over = true; //當存在相同文件名時是否覆蓋,默認為false oo.size = 1*1024*1024; //最大字節數限制,默認為1G oo.upload(); Response.write('<script type=text/javascript>location.replace(' self ')</script>'); } //ASP無組件上傳類 function uploadFile() { var bLen = Request.totalBytes; var bText = Request.binaryRead(bLen); var oo = Server.createObject(ADODB.Stream); oo.mode = 3; this.path = uploadFile; this.named = file; this.ext = all; this.over = false; this.size = 1*1024*1024*1024; //1GB //文件上傳 this.upload = function () { var o = this.getInfo(); if (o.size>this.size) { alert(文件過大,不能上傳!); return; } var f = this.getFileName(); var ext = f.replace(/^. /./,); if (this.ext!=all&&!new RegExp(this.ext.replace(/,/g,|),ig).test(ext)) { alert(目前暫不支持擴展名為ext 的文件上傳!); return; } if (this.named==date) { f = new Date().toLocaleString().replace(//D/g,) . ext; } oo.open(); oo.type = 1; oo.write(o.bin); this.path = this.path.replace(/[^////]$/,$&/); var fso = Server.createObject(Scripting.FileSystemObject); if(this.path!=&&!fso.folderExists(Server.mapPath(this.path))) { fso.createFolder(Server.mapPath(this.path)); } try { oo.saveToFile(Server.mapPath(this.path f),this.over?2:1); alert(上傳成功!); } catch(e) { alert(對不起,此文件已存在!); } oo.close(); delete(oo); } //獲取二進制和文件字節數 this.getInfo = function () { oo.open(); oo.type=1; oo.write(bText); oo.position = 0; oo.type=2; oo.charset=unicode; var gbCode=escape(oo.readText()).replace(/%u(..)(..)/g,%$2%$1); var sPos=gbCode.indexOf() 12; var sLength=bLen-(gbCode.substring(0,gbCode.indexOf()).length/3)-sPos/3-6; oo.close(); oo.open(); oo.type = 1; oo.write(bText); oo.position=sPos/3; var bFile=oo.read(sLength); oo.close(); return { bin:bFile, size:sLength }; } //獲取文件名 this.getFileName = function () { oo.open(); oo.type = 2; oo.writeText(bText); oo.position = 0; oo.charset = gb2312; var fileName = oo.readText().match(/filename=/(. ?)//i)[1].split(//).slice(-1)[0]; oo.close(); return fileName; } function alert(msg) { Response.write('<script type=text/javascript>alert(' msg ');</script>'); } } %> <html> <head> <title>ASP無組件上傳類</title> <meta http-equiv=content-Type content=text/html; charset=gb2312> </head> <body> <form action=<%=self%> method=post enctype=multipart/form-data onSubmit=return (this.upFile.value!='');> <input type=file name=upFile/> <input type=submit value=上傳文件/> </form> </body> </html> |
分享:10行代碼讓你告別Arp作惡導致的掉線一同學在宿舍是很多人一起上網,有不少人用arp作惡,導致上網老是掉線。問我有什麼辦法嗎,於是就寫了下面的vbs腳本,同學說用了後聊天也不掉線了。 以