救命!!文件操作的问题,怎么实现文件的删除?
ykhxb 2003-08-18 04:41:09 scwj=request("scwj")
if scwj<>"" then
Set fso = CreateObject("Scripting.FileSystemObject")
Set f1 = fso.CreateTextFile(Server.MapPath("upfile/"&scwj),true)
f1.Close
set fso=nothing
id=request("id")
sql="delete from fileinfo where id="&id
conn.Execute sql
end if
<form method="POST" action="adm_del_bb.asp">
<input type="hidden" name="id" value="<%=rs("id")%>">
<td align="center"> <p align="center">
<input name="scwj" type="text" id="scwj" value="<%=rs("scwj")%>">
</td>
<td> <div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber1" width="1">
<tr>
<td width="1"> <input name="submit" type="submit" class="bt" id="submit" value="删除"></td>
</tr>
</table>
</center>
</div></td>
</form>