ASP 文件上传

下面的是将用户上传的文件名保存为时间，请问怎样才能把文件名加上字段，由用户输入“标题”再加上上传时间。。。

<%
Server.ScriptTimeOut = 999
IF stat_FileUpLoad=true and memName<>empty Then
IF Request.QueryString("action")="upload" Then
Dim upl,FSOIsOK
FSOIsOK=1
Set upl=Server.CreateObject("Scripting.FileSystemObject")
If Err<>0 Then
Err.Clear
FSOIsOK=0
End If
Dim D_Name,F_Name
If FSOIsOK=1 Then
D_Name="投稿"&DateToStr(Now(),"ym")
If upl.FolderExists(Server.MapPath("attachments/"&D_Name))=False Then
upl.CreateFolder Server.MapPath("attachments/"&D_Name)
End If
Else
D_Name="All_Files"
End If
Set upl=Nothing
Dim FileUP
Set FileUP=New Upload_File
FileUP.GetDate(-1)
Dim F_File,F_Type,I_title,I_authur
set F_File=fileup.file("I_title")
Set F_File=FileUP.File("

asp文件怎么上传?? ASP怎么上传文件 ASP上传文件问题 ASP.NET上传文件 asp 上传文件！！！！！ ASP上传文件 ASP上传文件的问题 asp.net上传指定文件 asp.net c# 上传文件 Asp.Net 文件上传问题