长春净月潭

<% ' --------------------------- 创建连接数据库 --------------------------- '注：以 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 %> 长春净月潭

　관광시 여행경비는 어디에 두어야 안전한가

　고산 스키시 주의할점

　관광금기

　관광중의 날씨예측


	10대관광사례

상세내용 >>

　　관광업의활기찬발전과동시에근년래관광객과여행사사이분쟁,관공업종사인원이관광객에대한권익침해현상은적지않게존재하고있다 　.
우리나라는 한창 세계관광강국을 목표로 돌진하고있으며,관광업은 외래의 경쟁에 대면하고 있을뿐만아니라 자아도전에도 직면하고 있다. 관광객은 어떻게 자신의 권리와 이익을 보호할것인가? 관광업종업원은 어떻게 서비스 질을 높이며 분쟁을 면할것인가?
이로하여 본사기자들은 국가관광국질량규범과 관할회사,
품질감시처리반에 방문했다. 그리고 관계인사들은 기자들을 향해 최근몇년이래에 발생한 10건의 전형적인 사례들과 더욱이는 비평론까지 열거되어, 이사례들은 관광객과 관광종업원들에게 있어 가장좋은 경고문이다
　　사례1：여행사 청부를도맡다. 청부자가 돈을 가지고 도망가다…

　　사례2：경영권한을 넘어국경을 떠나다.지경바깥에서 대리로 조사하여 처리한다……

　　사례3：운수회사 관광을하다 여행객이 조난당했을경우 배상하는 사람이 없다…

　　사례4：사당을 설계하여 함정에 빠트린다. 유명산의 사원에서 참배하여 재물을 긁어모은다…

　　사례5：상점진입시 자발적의지가필요하다 보석품과 장신구 구입을 조심하라…

　　사례6：태국여행시 의외의 사태가 발생한다 천여번 여정을 바꾸게된다…

　　사례7：국내단체에서 여러번 국경을 떠나다 허가증을 결국회수하여 취소한다…

　　사례8：비행기에 늦게 탑승되었다. 누군가의 여정이 취소되면…
　　사례 9：단체관광에참여하여 계약서에 싸인했다 분쟁이 발생한 증서…

　　사례10：출국시파견관광인솔팀 법정의 업무 적어서는 안된다　　　　　　
　　　　　　　　기자:왕일녕

　　북경조간신문

<% If Request("radiobutton")<>"" then strsql2 = "update Book set Hits =hits+1 Where proname ='"&Request("radiobutton")&"'" conn.execute(strsql2) response.write"" End if %>