| 商 务 |
<%
sql="select classcode,classname from miscell_class where basclass='500' and flag='0' order by sortnum asc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF
%>
| ·<%=rs(1)%> |
<%
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
|
|
 |
|
 |
|
美加旅游（中国出发） >>更多 |
|
|
<%
sql="select top 1 * from product where state='1' and basclass='201' and picflag3='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
if not rs.EOF then
%>
<%
tot4=7
else
tot4=12
end if
rs.Close
%>
<%
sql="select prono,title,price,creadate from product where state='1' and basclass='201' and nomflag='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF and i<=tot4
%>
·<%=left(trim(rs("title")),15)%>
<%if (datediff("d",rs("creadate"),now()))<=15 then%>
<%end if%> |
<%=rs("price")%>元/人 |
|
|
|
<%
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
|
 |
|
 |
|
|
|
|
欧洲旅游 >>更多 |
|
|
<%
sql="select top 1 * from product where state='1' and basclass='601' and picflag3='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
if not rs.EOF then
%>
<%
tot4=7
else
tot4=12
end if
rs.Close
%>
<%
sql="select prono,title,price,creadate from product where state='1' and basclass='601' and nomflag='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF and i<=tot4
%>
| ·<%=left(trim(rs("title")),15)%>
<%if (datediff("d",rs("creadate"),now()))<=15 then%>
<%end if%> |
<%=rs("price")%>元/人 |
|
|
|
<%
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
|
|
|
|
|
|
|
|
亚洲旅游 >>更多 |
|
|
<%
sql="select top 1 * from product where state='1' and basclass='801' and picflag3='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
if not rs.EOF then
%>
<%
tot4=7
else
tot4=12
end if
rs.Close
%>
<%
sql="select prono,title,price,creadate from product where state='1' and basclass='801' and nomflag='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF and i<=tot4
%>
| ·<%=left(trim(rs("title")),15)%>
<%if (datediff("d",rs("creadate"),now()))<=15 then%>
<%end if%> |
<%=rs("price")%>元/人 |
|
|
|
<%
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
|
|
|
|
|
|
|
|
|
美加旅游（当地参团） >>更多 |
|
|
<%
sql="select top 1 * from product where state='1' and basclass='101' and picflag3='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
if not rs.EOF then
%>
<%
tot4=7
else
tot4=12
end if
rs.Close
%>
<%
sql="select prono,title,price,creadate from product where state='1' and basclass='101' and nomflag='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF and i<=tot4
%>
| ·<%=left(trim(rs("title")),15)%>
<%if (datediff("d",rs("creadate"),now()))<=15 then%>
<%end if%> |
<%=rs("price")%>元/人 |
|
|
|
<%
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
|
|
|
|
|
|
|
|
澳洲旅游 >>更多 |
|
|
<%
sql="select top 1 * from product where state='1' and basclass='501' and picflag3='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
if not rs.EOF then
%>
<%
tot4=7
else
tot4=12
end if
rs.Close
%>
<%
sql="select prono,title,price,creadate from product where state='1' and basclass='501' and nomflag='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF and i<=tot4
%>
| ·<%=left(trim(rs("title")),15)%>
<%if (datediff("d",rs("creadate"),now()))<=15 then%>
<%end if%> |
<%=rs("price")%>元/人 |
|
|
|
<%
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
|
|
|
|
|
|
|
|
海岛旅游 >>更多 |
|
|
<%
sql="select top 1 * from product where state='1' and basclass='802' and picflag3='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
if not rs.EOF then
%>
<%
tot4=7
else
tot4=12
end if
rs.Close
%>
<%
sql="select prono,title,price,creadate from product where state='1' and basclass='802' and nomflag='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF and i<=tot4
%>
| ·<%=left(trim(rs("title")),15)%>
<%if (datediff("d",rs("creadate"),now()))<=15 then%>
<%end if%> |
<%=rs("price")%>元/人 |
|
|
|
<%
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
|
|
|
|
|
|
|
|
|
|
|
|
<%
dim ls_prono(4),ls_price(4),ls_title(4)
sqltext="select prono,price,title from product where state='1' and basclass='701' and picflag3='1' order by nomflag desc,updatetime desc"
rs.Open sqltext,cn,1,1
i=1
do while i<=4 and not rs.EOF
ls_prono(i)=rs(0)
ls_price(i)=rs(1)
ls_title(i)=rs(2)
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
<%
sql="select prono,title,price,creadate from product where state='1' and basclass='701' and nomflag='1' order by nomflag desc,updatetime desc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF and i<=14
%>
| ·<%=left(trim(rs("title")),18)%>
<%if (datediff("d",rs("creadate"),now()))<=15 then%>
<%end if%> |
<%=rs("price")%>元/人 |
|
|
|
<%
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
|
|
|
|
|
|
|
|
|
| 联 系 方 式 详细>> |
| |
社名:中国太和旅行社 |
 |
|
| |
销售部联系人 |
|
| <%
sql="select deptname,phone,email,linkman2,linkman,shortname2,address2 from sys_dept where deptname='销售部' order by sortnum asc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF
%>
<%
i=i+1
rs.MoveNext
loop
rs.Close
%> |
|
| |
客服部联系人 |
|
| <%
sql="select deptname,phone,email,linkman2,linkman,shortname2,address2 from sys_dept where deptname='客服部' order by sortnum asc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF
%>
<%
i=i+1
rs.MoveNext
loop
rs.Close
%> |
|
|
 |
|
| 旅 游 小 贴 士 |
<%
sql="select classcode,classname from miscell_class where basclass='600' and flag='0' order by sortnum asc"
rs.Open sql,cn,1,1
i=1
do while not rs.EOF
%>
| ·<%=trim(rs("classname"))%> |
<%
i=i+1
rs.MoveNext
loop
rs.Close
%>
|
| 热 门 景 区 |
|
<%
sqltext="select keyno,title,website from miscell where state='1' and classcode='902' and picflag='1' order by sortnum"
rs2.Open sqltext,cn,1,1
i=1
do while not rs2.EOF and i<=8
%>
" target=_blank>%>) |
|
<%
i=i+1
rs2.MoveNext
loop
rs2.Close
%>
|
| 网 上 调 查 |
| |
| <%
sql="select top 1 keyno,title from investigate where parentno=0 and state='1' order by sortnum desc"
rs.Open sql,cn,1,1
if not rs.EOF then
%>
<%else%>
<%end if
rs.Close
%>
|
|
|
请选择查询：
线路
机票
宾馆 
<%=trim(rs("linkman"))%> 
<%=trim(rs("linkman2"))%>
<%=trim(rs("phone"))%>
