⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 upload.asp

📁 仿雅虎论坛静态生成html版 后台管理:admin/admin.asp 用户名:admin 密码:admin TOP/top.htm 顶部模板 left.htm 左边树形菜单模板
💻 ASP
字号:
<!--#include file='upload_config.asp'-->
<!--#include file="../conn.asp"-->
<!--#include file="uploadx.asp"-->
<head>
<link rel="stylesheet" type="text/css" href="../css/style1.css">
</head>
<html>
<%
Dim fileName
Dim PerFileListN
Dim intPerFileListN
Dim PerFilenameN
Dim i
Dim Filelist
Dim UpFlag
SavType = 0					'取得报错方式
filename = SaveFile(FormFieldName, filePath, maxfilesize, SavType, FsoType, ForbidType)	'保存并取得文件名
If len(trim(filename))>0 then
	FileList = ""
	PerFileListN = Split(filename,",")
	intPerFileListN = Ubound(PerFileListN)
		PerFilenameN = Split(Trim(PerFileListN(i)),"|")
		Select Case Trim(PerFilenameN(0))
			Case "SetError"
				Response.Write i+1 &"

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -