我不是编码人员,并且正在一个旧的ASP网站上工作,并且有一个页面可以将图像上传到给定页面(从下拉列表中),但是当我尝试将图像添加到相应页面时,出现此错误,这是我想从一开始就去过那里。
Microsoft VBScript运行时错误'800a0034'错误的文件名或数字/path-to-file/foto.asp,行105
相关代码是这个
'Create and Write to a File
Randomize()
strChiave = Cstr(Right(DatePart("yyyy", Date()),2))
strChiave = strChiave + Cstr(DatePart("y", Date()))
strChiave = strChiave + Replace(Time(),".","")
strChiave = strChiave + Right(Session.SessionID,4)
strChiave = strChiave + CSTR(INT(RND()*1000))
strImmagine = strChiave + Right(filename,4)
Set MyFile = ScriptObject.CreateTextFile(Application("path_public") & "/" & strImmagine)
For i = 1 to LenB(value)
MyFile.Write chr(AscB(MidB(value,i,1)))
Next
MyFile.Close
105行是这个
Set MyFile = ScriptObject.CreateTextFile(Application("path_public") & "/" & strImmagine)
谢谢
该Time()
方法以以下结构返回时间:HH:mm
其中“ HH”是小时,“ mm”是分钟。如您所见,它包含一个冒号字符,而不是一个点,并且冒号在文件路径内无效。
在代码中更改此行:
strChiave = strChiave + Replace(Time(),".","")
为此:
strChiave = strChiave + Replace(Time(),":","")
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句