ASP.net根据时间生成随机文件名
ASP中随机文件名的函数,在Asp.Net不用修改也能用
放到Module1.vb里,声明公有函数
在任何一个WebForm里都能调用。
(Module1.vb在VB6.0就有了,看来.Net还是保留下来了)
Function makeFileName(ByVal fname) '根据时间生成文件名
fname = Now()
fname = Replace(fname, "-", "")
fname = Replace(fname, " ", "")
fname = Replace(fname, ":", "")
fname = Replace(fname, "PM", "")
fname = Replace(fname, "AM", "")
fname = Replace(fname, "上午", "")
fname = Replace(fname, "下午", "")
makefilename = fname & ".htm"
End Function
调用的方法:
Public Sub FileWrite(ByVal Str As String, ByVal myPath As String, ByVal myFileName As String) '新增文件(内容,路径,文件名)
End Sub
Call FileWrite("I Like Asp.net","Path",makeFileName())