% Dim Conn Set Conn = Server.CreateObject("Adodb.Connection") Conn.Open ConnStr Dim Parent If Request("Parent")="" Then Parent=0 Else Parent=CLng(Request("Parent")) End If Dim sType sType=Replace(Request("sType"),"'","") If sType="" Then sType="Title" End If Dim sKey sKey=Replace(Request("sKey"),"'","") %>
|
![]() |
|
|
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
|
首页 | 康辉简介 | 企业文化 | 省内分社 | 精彩回顾 | 旅游论坛
Copyright 2008 河北康辉国际旅行社 |