<%= AboutUs %>

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% strSQL = "SELECT TOP 1 us FROM about_us_info" SET rs = Conn.Execute(strSQL) If rs.BOF AND rs.EOF Then AboutUs = "" Else AboutUs = rs("us") End If Call rsClose() %> <% strSQL = "SELECT TOP 1 us1 FROM about_us_info" SET rs = Conn.Execute(strSQL) If rs.BOF AND rs.EOF Then AboutUs1 = "" Else AboutUs1 = 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 AboutUs2 = "" Else AboutUs2 = rs("us2") End If Call rsClose() %> <% Key = request("t") If Key = "" Then Key = "" Else Key = " News_name ='" +Key+"'" End If TableName = "case_list" 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) '''''''''''''''''''''''''' %> <%= AboutUs %>

成功案例加拿大移民 英国移民 美国移民 香港定居 新加坡移民 澳洲移民 菲律宾移民

首页 > 成功案例

">[<%= rs("news_name") %>] " href="caseinfo.asp?id=<%= rs("id") %>" target="_blank"> <% if len(rs("News_Title")) > 9 then response.Write left(rs("News_Title"),8)&"..." else response.write rs("News_Title") end if %> [<%=GetFormatDate(rs.Fields("AddTime").Value)%>]

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

"><%=rs("P_Name")%>

关于我们 | 联系我们 | 在线评估 | 人才招聘

成功案例 加拿大移民英国移民美国移民香港定居新加坡移民澳洲移民菲律宾移民

成功案例加拿大移民英国移民美国移民香港定居新加坡移民澳洲移民菲律宾移民