%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim whnc__MMColParam
whnc__MMColParam = "1"
If (Request.QueryString("id") <> "") Then
whnc__MMColParam = Request.QueryString("id")
End If
%>
<%
Dim whnc
Dim whnc_numRows
Set whnc = Server.CreateObject("ADODB.Recordset")
whnc.ActiveConnection = MM_whnc_STRING
whnc.Source = "SELECT * FROM cun WHERE id = " + Replace(whnc__MMColParam, "'", "''") + ""
whnc.CursorType = 0
whnc.CursorLocation = 2
whnc.LockType = 1
whnc.Open()
whnc_numRows = 0
%>
无标题文档
|
 |
威海环海路悠闲游
从大福源坐3路小客车路过远遥村终点站靖子村,在靖子村下车后,一直随着马路走,一路走过,山和水壮阔、秀美、丰润、斑斓和张扬,大自然在不经意间展现的种种妆容,会美得让你不由自主地摒住呼吸。山色翠绿,村庄安静,渔船错落,大海恬静,那里春天有花,大海碧绿;夏山青翠,大海湛蓝;秋山斑斓,大海墨翠;冬山硬朗,大海磅礴,四时风景各不同,但美好的感觉不变。
环海路车辆很少,偶而看到的车是教练车,
|
|
| |
|
|
|
<%
whnc.Close()
Set whnc = Nothing
%>