magazine_file = ""
    if FileObj.FileSize("magazine_file") > 0 and FileObj.FileSize("magazine_file") < 5*1024*1024 then
          '设置上传文件路径
          FileObj.FilePath =COMMON_agent_upload_path & "\" & magazine_id
          '取文件扩展名
          magazine_file = FileObj.FileName("magazine_file")
          if FileObj.SaveFile("magazine_file",magazine_file)="False" then
              magazine_file = ""
          end if
    end if
这段是上传文件.我的安装是有组件的上传.请问.我怎么让上传后的文件,自动生成文件,比方说1.jsp,2.jsp.....依次这么加上去.麻烦各位了,最好能写成安照时间来自动生成,比方说你上传的时间是2007年12月10号19:11,上传后是的文件就生成这样200712101911.jsp这样就更好了.

[[italic] 本帖最后由 taoxinhui 于 2007-12-10 19:36 编辑 [/italic]]

谢谢楼主，谢谢一楼的。我最后采用了1楼的方法，他有个问题magazine_file="year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&"magazine_file应该这样写magazine_file=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)。这样名字就改了。为什么要改名字，主要是后台下附件的时候好下载。楼主的。我复制了慢慢参考。