📄 wy_trip_solutioninforup.asp
字号:
<!--#include file="../wy_trip_inc/wy_trip_cnn.inc"-->
<!--#include file="../wy_trip_inc/wy_trip_fun.inc"-->
<html>
<head>
<title>PTrip Server 2005 For 数据库课程设计
</title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../wy_trip_css/wy_trip.css">
</head>
<%
solname=request.QueryString("solname")
tablename=request.QueryString("tablename")
kind=request.QueryString("kind")
'delete item
if(kind=0) then
set rst=server.CreateObject("adodb.recordset")
sqlstr="select * from "&tablename&" where solname='"&solname&"'"
rst.open sqlstr,conn,1,3
if not (rst.eof or rst.bof) then
pfile1=rst("solpic1")
pfile2=rst("solpic2")
pfile3=rst("solpic3")
end if
rst.close
set rst=nothing
set objfilesys=server.createobject("scripting.filesystemobject")
ss1="wy_trip_images/"&pfile1
ss2="wy_trip_images/"&pfile2
ss3="wy_trip_images/"&pfile3
ss1=server.mappath(ss1)
ss2=server.mappath(ss2)
ss3=server.mappath(ss3)
if objfilesys.FILEExists(ss1) then
objfilesys.deleteFILE ss1
end if
if objfilesys.FILEExists(ss2) then
objfilesys.deleteFILE ss2
end if
if objfilesys.FILEExists(ss3) then
objfilesys.deleteFILE ss3
end if
tablenameinfor=tablename&"infor"
i=deleteitem(solname,tablename)
j=deleteitem(solname,tablenameinfor)
'response.Write(solname&"<br>")
'response.Write(tablename&"<br>")
'response.Write(tablenameinfor)
'response.Write(i)
'response.Write(j)
'if(i=1 and j=1 ) then
response.Redirect("wy_trip_admin.asp")
'else
' response.Write("error")
' end if
else
%>
<script language="javascript" src="../wy_trip_js/wy_trip_uppic.js"></script>
<script language="javascript" src="../wy_trip_js/wy_trip_check.js"></script>
<body leftmargin="0" topmargin="0" bottommargin="0" rightmargin="0" link="#3357B3" vlink="#3357B3" alink="#3357B3" bgcolor="#e8eefc">
<table width="734" height="100%" cellpadding="0" cellspacing="0">
<tr>
<td valign="top" class="Main">
<p class="NoBreakBeforeAfter"><img src="../wy_trip_images/TopCol3.gif" WIDTH="247" HEIGHT="23"></p>
<p class="NoBreakBeforeAfter"><img src="../wy_trip_images/HeaderOtherDestination.gif" width="229" height="28"></p>
<p class="Indented1" align="center"><font size="6"><b>PTrip 2005 后台管理</b></font></p>
<p class="Indented1" align="center"><b>欢迎管理员 <%=adname%> 登录</b></p>
<hr align="center" width="80%" color="#999999">
<%
if(kind=1) then
'response.Write(solkind)
sqlstr="select * from "&tablename&" where solname='"&solname&"'"
'sqlstr="select * from trip_soloverseas where solname='"&solname&"'"
set rst=server.CreateObject("adodb.recordset")
rst.open sqlstr,conn,1,1
if not(rst.eof or rst.bof) then
sinfor1=rst("solinfor1")
sinfor2=rst("solinfor2")
sinfor3=rst("solinfor3")
end if
rst.close
set rst=nothing
%>
<form name="form1" action="wy_trip_asp/wy_trip_solutionupasp.asp?solname=<%=solname%>" method="post" onSubmit="return wychecksolinfor(this)" >
<table width="85%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="27%" scope="col" valign="top" align="center">说明信息1</td>
<td width="73%" colspan="5" scope="col"><textarea name="solinfor1" cols="70" rows="3" id="solinfor1"><%=sinfor1%></textarea></td>
</tr>
<tr>
<td valign="top" align="center">说明信息2</td>
<td colspan="5"><textarea name="solinfor2" cols="70" rows="3" id="solinfor2"><%=sinfor2%></textarea></td>
</tr>
<tr>
<td valign="top" align="center">说明信息3</td>
<td colspan="5"><textarea name="solinfor3" cols="70" rows="3" id="solinfor3"><%=sinfor3%></textarea></td>
</tr>
<tr>
<td> </td>
<td colspan="5"> </td>
</tr>
<tr>
<td> </td>
<td>
<div align="right">
<input type="submit" name="Submit" value=" 提 交 ">
</div></td>
<td> </td>
<td> </td>
<td> </td>
<td>
<div align="left">
<input type="reset" name="Submit" value=" 重 置 ">
</div></td></tr>
</table>
</form>
<p align="center">
<div id="sponsorAdDiv" style="visibility:hidden; left: 2px; top: 15px; width: 197px; height: 13px">
<table width="200" height="25" bgcolor="#0099cc" border=0 cellspacing=1>
<tr>
<td>
<table width="100%" height="100%" border=0 cellspacing=0>
<tr bgcolor="#d2e9fe">
<td> 正在上传图片，请稍候...... </td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</p>
<table width="85%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<th scope="col"><a href="wy_trip_solutionpicup.asp?solname=<%=solname%>&tablename=trip_soloverseas&picnu=1">更新图片1</a></th>
<th colspan="3" scope="col">
<form method="post" action="wy_trip_up/wy_upload2.asp?up=<%=up%>&solname=<%=solname%>&tablename=trip_soloverseas&solpic=1" enctype="multipart/form-data" name="form2" onsubmit="initAd();">
<input type=file name="sf_upfile" size="25" class=text>
<input type="submit" name="submit" value="上 传 图 片" class="text">
</form>
</th>
<th scope="col"> </th>
</tr>
<tr>
<th scope="col"><a href="wy_trip_solutionpicup.asp?solname=<%=solname%>&tablename=trip_soloverseas&picnu=2">更新图片2</a></th>
<th colspan="3" scope="col">
<form method="post" action="wy_trip_up/wy_upload2.asp?up=<%=up%>&solname=<%=solname%>&tablename=trip_soloverseas&solpic=2" enctype="multipart/form-data" name="form2" onsubmit="initAd();">
<input type=file name="sf_upfile" size="25" class=text>
<input type="submit" name="submit" value="上 传 图 片" class="text">
</form>
</th>
<th scope="col"> </th>
</tr>
<tr>
<th scope="col"><a href="wy_trip_solutionpicup.asp?solname=<%=solname%>&tablename=trip_soloverseas&picnu=3">更新图片3</a></th>
<th colspan="3" scope="col">
<form method="post" action="wy_trip_up/wy_upload2.asp?up=<%=up%>&solname=<%=solname%>&tablename=trip_soloverseas&solpic=3" enctype="multipart/form-data" name="form2" onsubmit="initAd();">
<input type=file name="sf_upfile" size="25" class=text>
<input type="submit" name="submit" value="上 传 图 片" class="text">
</form>
</th>
<th scope="col"> </th>
</tr>
<tr>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
</tr>
<tr>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"> </th>
<th scope="col"><a href="wy_trip_admin.asp">返回上一页</a></th>
<th scope="col"> </th>
</tr>
</table>
<p> </p>
<p> </p>
<p> </p></td>
</tr>
</table>
<%
else
sqlstr="select * from "&tablename&" where solname='"&solname&"'"
'sqlstr="select * from trip_soloverseas where solname='"&solname&"'"
set rst=server.CreateObject("adodb.recordset")
rst.open sqlstr,conn,1,1
if not(rst.eof or rst.bof) then
solna=rst("solname")
soladdress=rst("soladdress")
soltype=rst("soltype")
solabode=rst("solabode")
solmoney=rst("solmoney")
solnote=rst("solnote")
soltime=rst("soltime")
end if
rst.close
set rst=nothing
%>
<form name="form2" action="wy_trip_asp/wy_trip_solutioninforupasp.asp?tsolname=<%=solname%>&tablename=<%=tablename%>" method="post">
<table width="734" height="67%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="30%" height="22" scope="col"><div align="center">方案名称</div></td>
<td width="70%" colspan="4" scope="col"><input name="solname" type="text" id="solname" value="<%=solna%>"></td>
</tr>
<tr>
<td height="22"><div align="center">地点</div></td>
<td colspan="4"><input name="soladdress" type="text" id="soladdress" value="<%=soladdress%>"></td>
</tr>
<tr>
<td height="24"><div align="center">类型</div></td>
<td colspan="4"><select name="soltype">
<option value="<%=soltype%>" selected><%=soltype%></option>
<option value="山" >山</option>
<option value="水">水</option>
<option value="海">海</option>
<option value="其它">其它</option>
</select></td>
</tr>
<tr>
<td height="22"><div align="center">下榻地点</div></td>
<td colspan="4"><input name="solabode" type="text" id="solabode" value="<%=solabode%>"></td>
</tr>
<tr>
<td height="22"><div align="center">费用</div></td>
<td colspan="4"><input name="solmoney" type="text" id="solmoney" value="<%=solmoney%>"></td>
</tr>
<tr>
<td height="70"><div align="center">其它说明</div></td>
<td colspan="4"><textarea name="solnote" cols="70" rows="3" id="solnote"><%=solnote%></textarea></td>
</tr>
<tr>
<td height="22"><div align="center">公布时间</div></td>
<td colspan="4"><input name="soltime" type="text" id="soltime" value="<%=soltime%>" readonly="true"></td>
</tr>
<tr>
<td height="13"> </td>
<td colspan="4"> </td>
</tr>
<tr>
<td> </td>
<td><div align="right">
<input type="submit" name="Submit" value=" 提 交 ">
</div></td>
<td> </td>
<td><input type="reset" name="Submit" value=" 重 置 "></td>
<td> </td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
<td><a href="wy_trip_admin.asp" target="main">放弃</a></td>
</tr>
</table>
</form>
<%
end if
end if
%>
</body>
</html> ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -