尝试添加图像时出现Microsoft VBScript运行时错误'800a0034'

肯尼索

我不是编码人员,并且正在一个旧的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] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

Microsoft VBScript运行时错误'800a01a8':必需的对象

解码函数并获取Microsoft VBScript运行时错误'800a000d'

错误类型:Microsoft VBScript运行时(0x800A01A8)ASP中所需的对象

Microsoft VBScript运行时错误:输入文件末尾错误

Microsoft VBScript运行时错误:创建CDONTS.NEWMAIL时权限被拒绝:'CreateObject'

尝试使用pip时出现运行时错误

尝试生成多个进程时出现运行时错误(图像检测和打印到终端)

渲染图像时出现Flutter运行时错误

设置图像javafx时出现运行时错误IllegalArgumentException

0x800a01b6-Microsoft JScript运行时错误:对象不支持属性或方法“ jqGrid”

运行时错误与编译时错误

运行时出现Android ClassNotFoundException错误

Meteor - 运行时出现“Meteor”错误

Crontab运行时出现错误

AndroidAnnotations出现运行时错误

运行时出现批处理错误

运行Go代码时出现运行时错误

运行“粘贴”时,出现VBA运行时错误438

尝试运行服务器时出现Django运行时错误

尝试在C#中的类中向列表属性添加项目时出现运行时错误

在Hive中处理行时出现Hive运行时错误

尝试插入公式时VBA运行时错误'1004'

从FormControl ListBox检索值时出现运行时错误

迭代.next()时出现Java“ ConcurrentModificationException”运行时错误

3265检索表信息时出现运行时错误

使用Trim时出现运行时错误13

打开Word文件时出现运行时错误'1004'

替换公式时出现运行时错误1004

保存NewWorkbook时出现运行时错误