关于ASP删除页代码问题 - 编程论坛

#2

cj62112013-02-01 12:05

删除文件：（删除Access 2003中的记录就不说了，你会的）
<%
'建立对象
    Set Rs = Server.CreateObject("Scripting.FileSystemObject")
    jpgName = “http://localhosst/uploadfile/image/001.jpg“

'取得包含物理路径的文件名
    Filename=Server.MapPath(jpgName)

'如果存在文件即删除
    If(Rs.FileExists(trim(Filename))) Then
      Rs.DeleteFile trim(Filename)
    End If
%>

其他三个图片同样操作
如果成功了，记着给我分哦

[ 本帖最后由 cj6211 于 2013-2-1 13:58 编辑 ]

#3

xiaoche80162013-02-01 18:49

回复 2楼 cj6211

呵呵，还是不行啊！一个字段内有001.jpg|002.jpg|003.jpg|004.jpg（也就是说保存了4张图片的名称）。
我运行时出现了这样的错误：

错误类型：
Microsoft VBScript 编译器错误 (0x800A0408)
无效字符
/del.asp, line 13, column 10
jpgName = “http://localhosst/uploadfile/image/001.jpg“

#4

cj62112013-02-03 10:21

我前面说的只是删除文件的语句，你要删除4个文件，还需要用函数做个循环，思路是：用split()函数将c_picdz记录拆开为4个文件名装入数组（记录中有几个文件它就会拆成几个），然后循环删除语句，逐个调用数组中的文件名删除。

你回复的运行错误，jpgName 变量应该赋值为你网站的虚拟目录，或者是你用的引号是全角的导致“无效字符”错误。
正确写法：
jpgName = "你网站调用图片的地址写法"

[ 本帖最后由 cj6211 于 2013-2-3 10:29 编辑 ]