listxianlu.asp

旅游路线管理 比较方便的旅游路线管理

<!--===============================================================-->
<!--Mfkiqpl旅行社旅游线路预订程序源代码仅供学习或部分旅行社网站用---->
<!--任何单位或个人不得随意修改、截取其中代码或做不法用途------------->
<!--版权归属:mfkiqpl   http://www.zjjnet.com 所有-------------------->
<!--请务必保留以下版权信息------------------------------------------->
<!--作者:mfkiqpl----------------------------------------------------->
<!--QQ:31827726 mail:[e-mail]--------------------------------->
<!--主页地址:http://www.zjjnet.com----------------------------------->
<!----------------欢迎各位站长与本人小站进行友情链接----------------->
<!--===============================================================-->
<!--#include file="conn.asp" -->
<!--#include file="system/ubb.asp" -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
dim id
id=trim(request("id"))
if id="" or not IsNumeric(id) then
Response.Redirect "error.asp?errormsg=<li>您没有指定线路的ID号！系统无法查找。</li><br><li>您指定的ID号是错误的！</li>"
else
sql="select * from xianlu where id="+ id
set rs=conn.execute(sql)
if rs.eof then
Response.Redirect "error.asp?errormsg=<li>您所指定的线路ID号错误，系统无法查找。</li><br><li>请确定您从有效链接进入！</li>"
end if
sqlup="update xianlu set x_n=x_n+1 where id="+id
conn.execute(sqlup)
pagestart
response.Write("<table width=755 border=0 align=center cellpadding=0 cellspacing=0><tr><td height=5></td></tr></table>")
response.write("<table width=755 border=0 cellspacing=1 cellpadding=0 align=center bgcolor="&c1&"><tr bgcolor="&c4&"><td height=125 rowspan=5 align=center width=268>")
if trim(rs("x_jingdiantupian"))="" then
response.Write("暂无图片")
else
response.Write("<a href="&trim(rs("x_jingdiantupian"))&" target=_blank><img src="&trim(rs("x_jingdiantupian"))&" alt='点击在新窗口观看' width=200 height=100 border=0></a>")
end if
response.Write("</td><td width=53 height=25 align=center bgcolor="&c3&" >ID号</td><td width=267 height=25 bgcolor="&c4&">　"&rs("id")&"</td>")
response.Write("<td width=162 height=25 align=center bgcolor="&c3&"><a href =giveme.asp?id="&rs("id")&"><img src=images/mfk7.gif width=10 height=14 border=0> 预订这条线路</a></td></tr><tr>")
response.Write("<td width=53 height=25 align=center bgcolor="&c3&">名称：</td><td height=25 colspan=2 bgcolor="&c4&">　"&mfkiqpl(rs("x_name"))&"</td></tr><tr><td width=53 height=25 align=center bgcolor="&c3&">类型：</td>")
response.Write("<td height=25 colspan=2 bgcolor="&c4&">　"&mfkiqpl(rs("x_leixun"))&"</td></tr><tr><td width=53 height=25 align=center bgcolor="&c3&">报价：</td>")
response.Write("<td width=267 height=25 bgcolor="&c4&">　"&mfkiqpl(rs("x_baojia"))&"</td><td width=162 height=25 align=center bgcolor="&c3&">此线路已有<b>"&mfkiqpl(rs("x_n"))&"</b>人查看</td>")
response.Write("</tr><tr><td width=53 height=25 align=center bgcolor="&c3&">时间：</td><td height=25 colspan=2 bgcolor="&c4&"> 　"&mfkiqpl(rs("x_shijian"))&"</td>")
response.Write("</tr></table><table width=755 border=0 align=center cellpadding=0 cellspacing=0><tr><td height=4></td></tr></table>")
response.Write("<table width=755 border=0 cellspacing=1 cellpadding=0 align=center bgcolor="&c1&"><tr><td height=115 bgcolor="&c3&" width=39 align=center><p>线<br>")
response.Write("<br>路<br><br>说<br><br>明</p></td><td height=115 bgcolor="&c4&" width=713 class=text><table width=694 border=0 align=center cellpadding=0 cellspacing=0 class=ttt>")
response.Write("<tr><td>"&ubbcode(rs("x_shuoming"))&"</td></tr></table></td></tr></table>")
response.Write("<table width=755 border=0 align=center cellpadding=0 cellspacing=0><tr><td height=4></td></tr></table>")
response.Write("<table width=755 border=0 cellspacing=1 cellpadding=0 align=center bgcolor="&c1&">")
response.Write("<tr><td height=115 bgcolor="&c3&" width=39 align=center> <p>线<br><br>路<br><br>景<br><br>点</p></td><td height=115 bgcolor="&c4&" width=713 class=text>")
response.Write("<table width=694 border=0 align=center cellpadding=0 cellspacing=0 class=ttt><tr><td>"&ubbcode(rs("x_jingdian"))&"</td></tr></table></td></tr>")
response.Write("</table><table width=755 border=0 align=center cellpadding=0 cellspacing=0><tr><td height=4></td></tr></table><table width=755 border=0 cellspacing=1 cellpadding=0 align=center bgcolor="&c1&">")
response.Write("<tr><td height=115 bgcolor="&c3&" width=39 align=center><p>行<br><br>程<br><br>安<br><br>排</p></td><td height=115 bgcolor="&c4&" width=713 class=text><table width=694 border=0 align=center cellpadding=0 cellspacing=0 class=ttt>")
response.Write("<tr><td>"&ubbcode(rs("x_anpai"))&"</td></tr></table></td></tr></table><table width=755 border=0 align=center cellpadding=0 cellspacing=0><tr><td height=4></td></tr></table>")
response.Write("<table width=755 border=0 cellspacing=1 cellpadding=0 align=center bgcolor="&c1&"><tr><td height=115 bgcolor="&c3&" width=39 align=center><p>备<br><br>注</p></td><td height=115 bgcolor="&c4&" width=713 class=text>")
response.Write("<table width=694 border=0 align=center cellpadding=0 cellspacing=0 class=ttt><tr><td>"&ubbcode(rs("x_zhushi"))&"</td></tr></table></td></tr></table><table width=755 border=0 align=center cellpadding=0 cellspacing=0><tr><td height=4></td></tr></table>")
closers(rs)
end if
pageend
%>