<% ' --------------------------- 创建连接数据库 --------------------------- '注:以 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



   
 
Weather Forecast
  Details >>

Heaven and earth, mountains and rivers are not great enough to become laws. However, they should be recognized to have a very close relationship with the weather. In today's society, people mostly get weather information through weather forecast. Though it is convenient, people cannot always get the information in time because of various reasons. In addition, some time the weather is unpredicted and people are careless. Once people cannot get the help of science, they cannot depend on anything, nor can they have any common science of nature. In this way, they will be detained on their way. But a farmer, though without a watch, can know the time of a day. People in the mountains and forests are good at predicting changes of weather though with no information in hand. This method depends on people, not on things; it depends on self not others. It is experience that helps. Now in order to help tourists, we collect our predecessor's experience here to make a reference.

•  In the morning before the sun rises, observe the clouds in the east. If they take such shape as the head of a chicken, head of a dragon, flag, mountain, carriage, stars, fish, snake, glossy ganoderma, or peony, or they are crossed by the dark purple air or around the sun, mostly there will be rain at about 13 pm-17pm.that day.

•  At night, observe the color of the moon. If the moon is red or blue, in most cases there will be a thunderstorm in the following day. If there are white clouds which form a bright circle like a big wheel (lunar halo), mostly there will be a strong wind in the following day. It is because of the saying “a halo around the sun indicates the coming of the rain; that around the moon indicates the rising of the wind; the direction which has no cloud around the moon will see the wind.”. There is another saying that “a halo around the moon indicates the rising of wind; the damp on a plinth is a sign of approaching rain.” A damp plinth mean there are drops of water on the surface of the plinth. In this case, there will be rain in the following days. Considering the modern situation, someone concludes that extreme hotness can generate wind and the damp plum can generate rain. In other words, if a sudden extreme hotness lasts several days, there will be a strong wind one or two days later. The plum of the runner water has drops of water come out, and they will come again if wiped, there will be rain one or two days later.

•  If the stars are shining, there will be wind rising. The white cloud is blocking the plow for 2 and 4 hours. “the weather is changing when the water turns blue.” In summer if there is mass at the bottom of the water and the water turns blue, there will be storm. If the water carries the fishy smell of the earth or the fragrance, there will be rain soon. If there is strong fishy smell of the earth, it will not turn sunny in one or two days.

•  On the seventh and eighth of the first month of lunar year, north wind will be sure to rise. It will be surely raining or cloudy on the third of the second month of lunar year, Tomb-sweeping Day on March, Summer Solstice in April, the 12 th of the sixth month of lunar year.

•  If the cloud appears in the east, there will be wind with sand; If it appears in the south, there will be a heavy rain; If it appears in the west, there will be rain; if it appears in the north, it was so sunny that farmers can dry their grains in the sun. Though there is often rain with east wind, it demonstrates sunny days in rainy season in hot summer days. In autumn day north wind indicates rain, but on the night of autumn north wind demonstrates the fine weather.

Because of different locations and natural conditions, it is better to refer to the experience above taking one's own experience and local situation into consideration in order to make an objective prediction.

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 %>