แนะนำ: ฟังก์ชั่นการแบ่งหน้า ASP ที่ใช้งานได้จริง แบ่งปันฟังก์ชั่นการปนเปื้อนของ ASP มันดูดีทีเดียว มุมมองจะแสดงในรูป: คุณสามารถแก้ไขได้ตามสถานการณ์ของคุณเอง รหัส: % 'Xie Liang ซ่อมแซมโปรแกรมเพจ Page' Call PageControl (บันทึกทั้งหมด, หมายเลขหน้าทั้งหมด, หน้าปัจจุบัน) sub PageControl (ICount, pagecount, หน้า) Response.write (สไตล์ = ข้อความ/CSS/*Xie Liang Pagination CSS*/Div.pager
โมเดลใช้องค์ประกอบอัพโหลดไฟล์ ASP เพื่ออัปโหลดไฟล์ไปยังเซิร์ฟเวอร์เพื่อพิจารณาว่าขนาดไฟล์เกินขนาดที่ระบุหรือไม่ ตัวอย่างนี้พูดถึงส่วนประกอบอัปโหลดไฟล์ UPLOAD_5XSOFT file.filesize> 10,000,000 สามารถ จำกัด จำนวนไฟล์ k ไว้ที่
Dim upload, file, formname, formpath, icount, filename, fileext
ตั้งค่า upload = new upload_5xsoft 'สร้างวัตถุอัปโหลดวัตถุ
formPath = ดาวน์โหลด/ 'เพิ่ม (/) หลังจากไดเรกทอรี
ถ้าถูกต้อง (formpath, 1) <>/ จากนั้น formPath = formPath &/
สำหรับแต่ละ formname ใน upload.file 'รายการไฟล์ที่อัปโหลดทั้งหมด
ตั้งค่าไฟล์ = upload.file (formName) 'สร้างวัตถุไฟล์
ถ้า file.filesize> 10,00000 แล้ว
ข้อความ = 1
อย่างอื่น 'ถ้า Filesize <20000 หมายความว่ามีข้อมูลไฟล์
fileext = lcase (ขวา (file.filename, 4))
ถ้า fileext <>. exe และ fileext <>. zip และ fileext <>. rar และ fileext <>. mxp แล้ว
ข้อความ = 2
อื่น
สุ่ม
rannum = int (90000*RND) +10000
filename = formpath & lemongtree_ & ปี (ตอนนี้) & เดือน (ตอนนี้) & วัน (ตอนนี้) & ชั่วโมง (ตอนนี้) & นาที (ตอนนี้) & วินาที (ตอนนี้) & rannum & fileext
SAVE.SAVEAS SERVER.MAPPATH (ชื่อไฟล์) 'บันทึกไฟล์
ถ้า fileext = .zip แล้ว
uploadType = zip
elseif fileext = .rar แล้ว
uploadType = rar
elseif fileext = .mxp แล้ว
uploadType = mxp
elseif fileext = .exe แล้ว
uploadType = exe
สิ้นสุดถ้า
uploadchar = ชื่อไฟล์
size = clng (file.filesize)/1000
ข้อความ = 3
สิ้นสุดถ้า
สิ้นสุดถ้า
ต่อไป
-
<% ถ้าข้อความ = 1 แล้ว%>
<html>
<head>
<tite> ขนาดเกินมาตรฐาน </title>
<meta http-equiv = เนื้อหาประเภทเนื้อหา = text/html; charset = gb2312>
<ภาษาสคริปต์ = เอฟเฟกต์หน้าเว็บ>
ฟังก์ชั่น error_size ()
-
การแจ้งเตือน (ขนาดไฟล์เกิน 1,000kb โปรดเลือก Reselect);
window.location = upload.asp;
-
</script>
</head>
<body bgcolor =#f2f2f2 leftmargin = 0 topmargin = 0 onload = error_size ()>>
</body>
</html>
<% elseif message = 2 แล้ว%>
<html>
<head>
<title> พิมพ์ไม่ตรงกัน </title>
<meta http-equiv = เนื้อหาประเภทเนื้อหา = text/html; charset = gb2312>
<ภาษาสคริปต์ = JavaScript>
ฟังก์ชั่น error_type ()
-
การแจ้งเตือน (อัปโหลดไฟล์ zip/rar/exe/mxp เท่านั้นโปรดเลือกประเภทไฟล์ที่ถูกต้อง!);
window.location = upload.asp;
-
</script>
</head>
<body bgcolor =#f2f2f2 leftmargin = 0 topmargin = 0 onload = error_type ()>>
</body>
</html>
<% elseif message = 3 แล้ว%>
<html>
<head>
<title> อัปโหลดสำเร็จ </title>
<meta http-equiv = เนื้อหาประเภทเนื้อหา = text/html; charset = gb2312>
<ภาษาสคริปต์ = JavaScript>
ฟังก์ชั่น image_success ()
-
การแจ้งเตือน (การอัปโหลดไฟล์สำเร็จ!);
parent.form1.url1.value = < %= uploadchar %>
parent.form1.size.value = <%= size%> k
window.location = upload.asp;
-
</script>
</head>
<body bgcolor =#f2f2f2 leftmargin = 0 topmargin = 0 onload = image_success ()>>
</body>
</html>
< % end ถ้า %>
-
ตั้งค่าไฟล์ = ไม่มีอะไร
ตั้งค่าอัปโหลด = ไม่มีอะไร '' ลบวัตถุนี้
-
แบ่งปัน: คุณสมบัติและฟังก์ชั่นของการผลิตเว็บไซต์ ASP ภาษา ASP (ตัวย่อของหน้าเซิร์ฟเวอร์ที่ใช้งานอยู่) หมายถึงหน้าเว็บเซิร์ฟเวอร์ที่ใช้งานอยู่ ASP เป็นแอปพลิเคชั่นที่พัฒนาโดย Microsoft เพื่อแทนที่ CGI Scripting Programs มันสามารถโต้ตอบกับฐานข้อมูลและโปรแกรมอื่น ๆ และเป็นเครื่องมือการเขียนโปรแกรมที่ง่ายและสะดวก รูปแบบของไฟล์เว็บเพจของ ASP คือ. asp และตอนนี้มักใช้ในเว็บไซต์ไดนามิกต่างๆ ASP เป็นสภาพแวดล้อมการเขียนสคริปต์ฝั่งเซิร์ฟเวอร์ที่สามารถใช้งานได้