求改一个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
相关问答：
conn.asp
<%
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.MapPath("Connt ......
当结束时间大于开始时间则显示未完成
当结束时间小于开始时间则显示未达到任务
没有时间则显示正在进行中
asp代码应该怎么写
如:开始时间 结束时间 & ......
我有一个asp源码，但是出现一个文件，我用asp解密都是乱码
请教
VBScript code:
??
% # , #&')*) -0-(0%()(?
(((((((((((((((((((((((((( ......
我用VB按MVC的构架写组件供ASP调用
BLL层
VB code:
Private Dal As New moonPotato_DAL
Public Sub inSertUser(Model As moonPotato_Model)
Dal.InSertCls (Model)
End Sub
ASP中调用
VB c ......
能上传但不能插入数据库信息。ASP文件代码如下：
<%
Response.Buffer = True
Server.ScriptTimeOut=9999999
On Error Resume Next
%>
<!DOCTYPE html PUBLIC ......
