<% ' --------------------------- 创建连接数据库 --------------------------- '注：以 Access 数据库为连接对象，连接对象名为：Conn。 Set ProduConn = Server.CreateObject("ADODB.Connection") cnnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source =" & Server.MapPath("Database/Produ.mdb") ProduConn.Open cnnStr Set Conngao = Server.CreateObject("ADODB.Connection") cnnStrgao = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source =" & Server.MapPath("Database/Other.mdb") Conngao.Open cnnStrgao Set ConnNews = Server.CreateObject("ADODB.Connection") cnnStrNews = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source =" & Server.MapPath("Database/News.mdb") ConnNews.Open cnnStrNews Set Conn = Server.CreateObject("ADODB.Connection") cnnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source =" & Server.MapPath("Database/Book.mdb") Conn.Open cnnStr ' --------------------------- 创建记录集 --------------------------- '注：记录集名 "Rs" 应与表名相加。并以 3, 2 方式打开。 Set ContentRs = Server.CreateObject("ADODB.RecordSet") ContentSQL = "Select * From Content" ContentRs.Open ContentSQL, Conngao, 3, 2 Set ProduRs = Server.CreateObject("ADODB.RecordSet") ProduSQL = "Select * From Produ Order By ID DESC" ProduRs.Open ProduSQL, ProduConn, 3, 2 Set HomeNewsRs = Server.CreateObject("ADODB.RecordSet") HomeNewsSQL = "Select top 8 * From HomeNews Order by ID Desc" HomeNewsRs.Open HomeNewsSQL, ConnNews, 3, 2 Set Produtype = Server.CreateObject("ADODB.RecordSet") Produtype1 = "Select * From Produtype Order By ID DESC" Produtype.Open Produtype1, ProduConn, 3, 2 set Bookrs = Server.CreateObject("ADODB.Recordset") Booksql = "select * from Book" Bookrs.open Booksql,conn,3,2 Dim j j = Produtype.RecordCount Dim Produ_type(30),imaetype(30) For i = 0 to Produtype.RecordCount - 1 Produ_type(i) = Produtype("produtype") imaetype(i)=Produtype("produimage") Produtype.Movenext Next %> 长春净月潭
　How to pay tips when traveling abroad
　Ten cases sound the alarm
　Be wary of travel advertisements
　Look out for “maggot's illness”
　Railway passengers' notice
　Elders do not forget keep health during traveling
　Look out for travel trap
　How to Hold on to Your Money While Traveling
　Notice of skiing
　Travel taboos
　Travel air forecast



   
 
Ten travel case
  Details >>

　　With the prosperous development of tourism, there are more and more conflicts between tourists and travel agencies and travel agents harm tourists’ rights 　

　　　Our nation is moving towards the goal of becoming International travel giant, and the travel industry faces both an external competition and internal challenges. How can tourists protect their own rights? In terms of Travel agents how to rise service quality, and avoid disptute? To answer theses questions, our reporter visited National Travel Service Management Department, the people in charge listed ten typical cases which happened in recent years, and made comments on them. These cases sounded a warning for tourists and travel agents.

　　 Case 1：travel agents adopt contract system, contractor flees with found

　　 Case 2：guide abroad on trip without permission, overseas travel office is closed down
　　 case 3：transport company does travel business, tourists are in danger and get no Compensation

         Case 4：Tourists can visit mountain ,temples and vendors make traps, collect money in the name of worship…

　　 Case 5：shopping by free will, be cautious to buy jewellery…

　　 Case 6: Visit to Thai and undergoes changes, schedule change adds 1000yuan...

　　 Case 7：domestic agencies guide trip abroad ,license is cancelled...

　　 Case 8：Airplane late and tourists refuse to board, trip is cancelled, Who's responsible…

　　 Case 9：sign travel contract as evidence when dispute happens...

　　 Case 10：sent tour guide for abroad trip, legal duty can't be lost... 　　　　　　　

　　 Reporter　WangYining


From : BeiJing Morning


2002@copy the copyright belonging to Changchun Jingyuetan Tourism Development Co., Ltd.
E-mail:jingyuetan@jingyuetan.com
<% If Request("radiobutton")<>"" then strsql2 = "update Book set Hits =hits+1 Where proname ='"&Request("radiobutton")&"'" conn.execute(strsql2) response.write"" End if %>