แนะนำ: ใช้ไฟล์ vb activex.dll ใน ASP ไม่มีใครจะใช้วิธีการที่ยุ่งยากมากขึ้นในการทำงานโดยไม่ต้องใช้เว้นแต่จะไม่มีทางเลือก ดังนั้นถ้าฉันจะบอกคุณว่ามีเทคนิคง่ายๆที่สามารถทำให้การพัฒนา ASP ของคุณเร็วขึ้นและมีประสิทธิภาพมากขึ้นคุณต้องสนใจเป็นพิเศษ วิธีนี้จะถ่ายโอนจากหน้า ASP ส่วนใหญ่ของคุณไปยัง Visual Basic Active Active
ฟังก์ชั่นทั่วไปหากไม่สามารถรับ IP จริงได้จะแทนที่พร็อกซี IP
ฟังก์ชั่นส่วนตัว getip ()
สลัว
ถ้า request.serverVariables (http_x_forwarded_for) = หรือ instr (request.serverVariables (http_x_forwarded_for) ไม่ทราบ)> 0 จากนั้น
stripaddr = request.serverVariables (remote_addr)
elseif instr (request.serverVariables (http_x_forwarded_for) ,,)> 0 จากนั้น
stripaddr = mid (request.serverVariables (http_x_forwarded_for), 1, instr (request.serverVariables (http_x_forwarded_for),)-1)
elseif instr (request.serverVariables (http_x_forwarded_for),;)> 0 จากนั้น
stripaddr = mid (request.serverVariables (http_x_forwarded_for), 1, instr (request.serverVariables (http_x_forwarded_for),;)-1)
อื่น
stripaddr = request.serverVariables (http_x_forwarded_for)
สิ้นสุดถ้า
getip = trim (mid (stripaddr, 1, 30))
ฟังก์ชันสิ้นสุด
แชร์: คลายไฟล์ RAR โดยอัตโนมัติผ่าน ASP โดยอัตโนมัติ ในความเป็นจริงมันเป็นเรื่องง่ายมากที่จะใช้ฟังก์ชั่นนี้ จากนั้นคุณต้องอัปโหลดโปรแกรมที่ดำเนินการ rar.exe ในที่สุดเราเริ่มดำเนินการโปรแกรมเหล่านี้ ดูรหัสต่อไปนี้