长春净月潭

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

旅游公司　　

游乐公司

苗木公司
鹿业公司

您规在的位置是：首　页 → 集团介绍

长春净月潭旅游发展股份有限公司简介

　　长春净月潭旅游发展股份有限公司地处吉林省长春市，距市中心18公里，位于国家风景名胜区---净月潭国家森林公园。
　　公司由1997年3月份经长春市人民政府批准成立，是吉林省第一家旅游资源开发为主导产业的股份制企业，公司总股本为7000万元人民币。
　　公司作为净月潭旅游经济开发区的大型骨干企业，全面担负着净月潭国家森林公园的经营管

理工作。公司奉行以改革求发展，坚持高起点，高标准，高速度，高效益的原则。通过联营，兼并控股，参股等形式不断拓宽领域，发展壮大经济实力。把净月潭建成国内具有国际水准的即综合性，多功能，高品位的生态旅游，冰雪旅游，度假旅游胜地作为公司的工作重点。以发展吉林旅游事业为己任，为长春的旅游市场开辟一条独特，亮丽的风景线。
　　中国长春净月潭旅游发展股份有限公司热烈欢迎海内外各界朋友到长春净月潭投资兴业，观光旅游。

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