แนะนำ: วิธีใช้ ASP เพื่อแสดงภาพ GIF ของฐานข้อมูลการเข้าถึง เขียน: 1: อ่านไฟล์อิมเมจ GIF ลงในหน่วยความจำ (ตัวแปร STRTEMP) 2: เขียนไปยังฐานข้อมูล ต่อไปนี้เป็นเนื้อหาที่ยกมา: dim bintmp () เป็น byte dim conn เป็น adodb.conn
| ต่อไปนี้เป็นเนื้อหาที่ยกมา: - response.buffer = true Server.ScriptTimeOut = 9999999 เมื่อเกิดข้อผิดพลาดต่อไป - <!-#รวมไฟล์ = conn.asp-> <!-#รวมไฟล์ = function.asp-> <! doctype html สาธารณะ -// w3c // dtd xhtml 1.0 transitional // en http://www.w3.org/tr/xhtml1/dtd/xhtml1-transitional.dtd> <html xmlns = http: //www.w3.org/1999/xhtml> <head> <meta http-equiv = เนื้อหาประเภทเนื้อหา = text/html; charset = gb2312 /> <meta http-equiv = content-language content = zh-cn /> <meta content = all name = Robots /> <style type = text/css> - ร่างกายอินพุต {ตัวอักษรขนาด: 12px;} - </style> <title> ไฟล์ ASP อัปโหลด </title> </head> <body id = body> - checkuser () extName = XLS ' savePath = อัปโหลด 'savePath ถ้าถูกต้อง (savepath, 1) <>/ จากนั้น savepath = savepath &/ 'เพิ่ม (/) หลังจากไดเรกทอรี DECTANDCREATEFOLDER (SAVEPATH) uploadall_a = request.totalbytes 'รับเนื้อหาทั้งหมดของไคลเอนต์ ถ้า (uploadall_a> 0) จากนั้น ตั้งค่า UploadStream_c = server.createObject (adodb.stream) UploadStream_C.Type = 1 uploadstream_c.open uploadstream_c.write request.binaryRead (uploadall_a) UploadStream_c.position = 0 formDataall_d = uploadstream_c.read crlf_e = chrb (13) & chrb (10) formstart_f = instrb (formdataall_d, crlf_e) formend_g = instrb (formstart_f 1, formdataall_d, crlf_e) ตั้งค่า formstream_h = server.createObject (adodb.stream) formstream_h.type = 1 formstream_h.open uploadstream_c.position = formstart_f 1 uploadstream_c.copyto formstream_h, formend_g-formstart_f-3 formstream_h.position = 0 formstream_h.type = 2 formstream_h.charset = gb2312 formStreamText_i = formstream_h.readText formstream_h.close filename_j = mid (formstreamtext_i, instrrev (formstreamtext_i,) 1, formend_g) if (checkfileext (filename_j, extname)) จากนั้น savefile = server.mappath (savepath & filename_j) ถ้าเอ่อแล้ว Response.write ไฟล์อัปโหลด: <span style = color: red;> ข้อผิดพลาดในการอัปโหลดไฟล์! </span> <a href = & request.serverVariables (url) &> อัปโหลดไฟล์อีกครั้ง </a> <br/> err.lear อื่น saveFile = checkFileExists (savefile) SaveFileName = Mid (SaveFile, Instrrev (SaveFile,) 1) เซสชัน (ไฟล์) = savefilename k = instrb (formdataall_d, crlf_e & crlf_e) 4 l = instrb (k 1, formdataall_d, leftb (formdataall_d, formstart_f-1))-k-2 formstream_h.type = 1 formstream_h.open uploadstream_c.position = k-1 uploadstream_c.copyto formstream_h, l formstream_h.savetofile savefile, 2 SaveFileName = Mid (SaveFile, Instrrev (SaveFile,) 1) DIM Conn1, Driver1, DBPath1, RS1, SQL1 'สร้างวัตถุการเชื่อมต่อ ตั้งค่า conn1 = server.createObject (adodb.connection) driver1 = driver = {microsoft excel driver (*.xls)}; dbpath1 = dbq = & server.mappath (อัปโหลด/& savefilename) 'โทรเปิดเมธอดเพื่อเปิดฐานข้อมูล conn1.Open driver1 & dbpath1 SQL1 = SELECT * จาก [Sheet1 $] ตั้งค่า rs1 = conn1.execute (SQL1) ถ้า rs1.eof และ rs1.bof แล้ว ไม่พบ Response.wash ข้อมูลที่คุณต้องการ !! อื่น ทำในขณะที่ไม่ใช่ rs1.eof 'แทรกลงในฐานข้อมูล opendatabase select * จาก abc ถ้า len (rs1 (0)) = 7 แล้ว ctime = ซ้าย (rs1 (0), 4) อื่น ctime = ซ้าย (rs1 (0), 5) สิ้นสุดถ้า Rs.Addnew rs (เวลา) = ctime Rs.update floseTabase () Rs1.Movenext วง สิ้นสุดถ้า rs1.close ตั้งค่า rs1 = ไม่มีอะไร conn1.close ตั้งค่า conn1 = ไม่มีอะไร 'สิ้นสุดในฐานข้อมูล Response.write การอัปโหลดไฟล์: <span style = color: red;> & savefilename & </span> การอัปโหลดไฟล์สำเร็จ! <a href = 'choise.asp' '> ดำเนินการต่อเพื่ออัปโหลดไฟล์ </a> <br /> สิ้นสุดถ้า อื่น Response.write ไฟล์อัปโหลด: <span style = color: red;> รูปแบบไฟล์ไม่ถูกต้อง! </span> <a href = & request.serverVariables (url) &> upload ไฟล์ใหม่ </a> <br/> สิ้นสุดถ้า อื่น - <ภาษาสคริปต์ = JavaScript> - ฟังก์ชั่น validinput () - if (document.upform.upfile.value ==) - การแจ้งเตือน (โปรดเลือกอัปโหลดไฟล์!) document.upform.upfile.focus () กลับเท็จ - กลับมาจริง - - </script> <form action = '< %= request.ServerVariables (url) %>' method = 'post' name = upform onsubmit = return validinput () enctype = multipart/form-data> อัปโหลดไฟล์: <อินพุต type = 'file' name = 'upfile' size = 40> <input type = 'submit' value = upload> </form> - สิ้นสุดถ้า ตั้งค่า formstream_h = ไม่มีอะไร uploadstream.close ตั้งค่า UploadStream = ไม่มีอะไร - </body> </html> |
แบ่งปัน: ตีความรหัสของการฉีด ASP anti-SQL ต่อไปนี้เป็นเนื้อหาอ้างอิง: DIM SQL_INJDATA, SQL_INJ, SQL_GET, SQL_DATA, SQL_POST SQL_INJDATA = '| และ | EXEC | INSERT | SELETE | DELETE | UPDATE | UPDATE |