<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% strSQL = "SELECT TOP 1 us1 FROM about_us_info" SET rs = Conn.Execute(strSQL) If rs.BOF AND rs.EOF Then AboutUs3 = "" Else AboutUs3 = rs("us1") End If Call rsClose() %> <% strSQL = "SELECT TOP 1 us2 FROM about_us_info" SET rs = Conn.Execute(strSQL) If rs.BOF AND rs.EOF Then AboutUs4 = "" Else AboutUs4 = rs("us2") End If Call rsClose() %> <% Key = Trim(Request.QueryString("k")) If Key = "" Then Key = "" Else Key = " News_id = " & Key End If TableName = "products_info" FieldName = " * " SearchWhere = Key OrderFieldName = "id" OnlyFieldName = "id" OrderType = 1 PageSizeNum = 30 Page = Trim(Request.QueryString("page")) ''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Call ShowTotalPage() rsTotal = Session("rsTotal") TotalPages = Session("TotalPages") CurrentPage = Session("CurrentPage") Session("rsTotal") = "" Session("TotalPages") = "" Session("CurrentPage") = "" PageSQL = GetPageSQL(TableName,FieldName,SearchWhere,OrderFieldName,OnlyFieldName,OrderType,PageSizeNum,CurrentPage) '''''''''''''''''''''''''' %> 海外生活 - 亚美加移民
首页 > 海外生活
<% Call ShowPages(1,1,1) %>
友情链接 更多>>
<% strSQL = "SELECT * FROM LINK_LIST where P_TYPE=1 order by id" SET rs = Conn.Execute(strSQL) If Not (rs.BOF AND rs.EOF) Then Do While Not rs.EOF %>
  • " target="_blank" title="<%=rs("P_Name")%>">" alt="<%=rs("P_Name")%>" />
  • <% rs.MoveNext Loop End If Call rsClose() %>
    移民项目 | 加拿大移民 / 英国移民 / 美国移民 / 香港定居 / 澳洲移民 / 新加坡移民 / 菲律宾移民 | 移民动态 | 海外生活 | 安家服务 | 云南分公司
    关于我们 | 联系我们 | 在线评估 | 人才招聘
    深圳市亚美加因私出入境服务有限公司 版权所有 Copyright © 1996-2014 amega.ca All rights reserved.
    地址:深圳市罗湖区南湖路3009号国贸商厦19A 518001
    电话: 86(0755) 82233844 传真:86(0755) 82222544
    粤ICP备12091534号