wy_updata.asp

来自「旅游信息管理系统,带论文,可作为课程设计参考资料」· ASP 代码 · 共 36 行

<!--#include file="../../wy_trip_inc/wy_trip_cnn.inc"-->
<%
  'response.Write(request.QueryString("name"))
	'response.Write(request.QueryString("tablename"))
	'response.Write(request.QueryString("solname"))
	
	tablename=request.QueryString("tablename")
	solname=request.QueryString("solname")
	filename=request.QueryString("name")
	solpic=request.QueryString("solpic")
	
	solpic="solpic"&solpic
  set rst=server.createobject("adodb.recordset")
	sqlstr="select * from "&tablename&" where solname='"&solname&"'"
    'response.Write("<BR>"&sqlstr)
	rst.open sqlstr,conn,1,3
	if not(rst.eof or rst.bof) then
		    oldname=rst(solpic)
        rst(solpic)=filename
		rst.update
	end if
    rst.close
    set rst=nothing
    
   

   set objfilesys=server.createobject("scripting.filesystemobject")
   'ss="文件名"
   ss="wy_trip_images/"&oldname
   ss=server.mappath(ss)
   if objfilesys.FILEExists(ss) then
     objfilesys.deleteFILE ss
   end if
   
   
%>