帮忙看下这个代码是不是写错了啊,报错。
<%parentID=request("parentID")action=request("action")
actions=request("actions")
id=request("id")
parentID=request("parentID")
set rs=server.createobject("adodb.recordset")
sql="select * from News where ID="&id&""
rs.open sql,conn,1,3
if action="del" then
set fso = CreateObject( "Scripting.FileSystemObject ")
photofile= "../ "&rs( "Img ") //图片路径 这个是第15行。
filepath=server.mappath(photofile)
if fso.FileExists(filepath)=true then
Set file = fso.GetFile(filepath)
file.delete
end if
set file=nothing
set fso=nothing
conn.execute "delete from News where ID = "&ID&""
response.Redirect"News_Manage.asp?parentID="&parentID&""
end if
rd.close
set rs=nothing
selectbookid=request("selectbookid")
if selectbookid<>"" then
conn.execute "delete from News where ID in ("&selectbookid&")"
response.Redirect "News_Manage.asp?parentID="&parentID&""
response.End
end if
%>
提示:
Microsoft VBScript 编译器错误 '800a03ea'
语法错误
\admin\News_Manage.asp, line 15
谁帮忙解决下啊,急。