求改一个ASP小程序加上传功能和下载功能。。
文件:folder.inc
HTML code:
<%
Dim folderini,pos,pageName
fPath = Request.ServerVariables("PATH_TRANSLATED")
pos = instrRev(fPath,"\")
folderini = Left(fPath,pos)+"Upfile"
%>
文件:index.asp
HTML code:
<!--#Include file="folder.inc"-->
<html>
<head>
<title>FileSearch</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<frameset rows="80,*" frameborder="1" border="1" framespacing="1" cols="*">
<frame name="topFrame" scrolling="NO" src="up.asp" >
<frame name="mainFrame" src="getinfo.asp?foldinfo=<%=folderini%>">
</frameset>
<noframes><body bgcolor="#FFFFFF">
</body></noframes>
</html>
文件:up.asp
HTML code:
<!--#Include file="folder.inc"-->
<html><title>Up</title>
<head>
<style type="text/cs
相关问答:
<form id="form1" runat="server">
<div>
<script type="text/javascript">
function oo(a){
document.getEleme ......
最近我通过学习,感觉自己学的还可以了,想做一网站,但是一直都找不到题材,不知道做什么,希望各位给我点意见,如果有需求文档就更好了!希望大家给我点意见,谢谢!
先做个企业网站吧,我感觉一个人做网站不适宜 ......
问个问题,我的一个网站能上传文件,我把网站目录考到同一台电脑的另一个目录下,然后在复制过来的目录上新建了一个网站,程序文件没动(相关路径的设置已经改了,不是路径问题),但是新网站不能上传文件,我网上查了 ......
能上传但不能插入数据库信息。ASP文件代码如下:
<%
Response.Buffer = True
Server.ScriptTimeOut=9999999
On Error Resume Next
%>
<!DOCTYPE html PUBLIC ......