up.asp

来自「为中小型企业与欲创业的个人提供一个合适的企业型网站」· ASP 代码 · 共 35 行

ASP
35
字号
<!--#include file="Include/Tyi86_setup.asp"-->
<!--#include file="Conn.asp" -->
<!--#include file="upload_class.asp" -->
<!--#include file="Include/check.asp"-->
<%
    CheckAdmin1
    response.expires=-1
%>
<head>
<link rel="stylesheet" href="other/admin.css" type="text/css">
<title>通盈系统-文件上传</title>
<base target="_self">
</head>
<body>
<%
    Dim action
    action=Request.QueryString("action")
    Dim up
    Set up=new LBUpload
    Select Case action
    Case "add"
    If LCase(Request.ServerVariables("request_method"))="post" Then
    up.Add()
    Else
    up.PageHtmlForm()
    End If
    Case "delete"
    'up.Delete()
    Case Else
    'up.PageUplist(30)
    End Select
    Set up=Nothing
    call CloseConn()
%>
</body>

⌨️ 快捷键说明

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