asp连接数据库代码实例(8)

asp 连接数据库代码实例

end if

if rs.bof or rs.eof then

response.write"<font color=#ff0000>暂没有任何数据！</font>"

'response.end

else

rs.absolutepage=page

end if

i=0

do while not rs.eof and i<rs.pagesize

%>

<%=rs("id")%>

<% rs.movenext

i=i+1

loop

%>

--------------显示此分类的纪录结束----------------

---------删除所在分类纪录开始------------

<% if request("classname")<>"" then%>

<a href="?action=del_fenlei&classname=<%=request("classname")%>" title="删除所有本类信息？" onClick="{if (confirm('您确定要删除所有信息吗？')){return true;}return false;}"><font color=FF0000>清空所有本类信息</font></a> <%end if%>

if request("action")="del_fenlei" then

classname=request("classname")

conn.execute("delete * from biao where fenlei='"&classname&"'")

CloseDB

response.write"<script language='javascript'>alert('删除本类成功！');location.href('?action=manage');</script>"

end if

---------删除所在分类纪录结束--------------------------------

-------------------------------

7。上传文件或者图片 删除文件代码 (请在同一目录建立文件夹upfile/softpic)

上传文件的页面（调用upsoftpic.asp）