| 您所在的位置：首页 > 澳洲移民 > <%select case classcode
case "101104"
Response.Write ("技术移民")
case "101107"
Response.Write ("商业移民")
case "101112"
Response.Write ("工作签证")
case "101113"
Response.Write ("配偶移民")
case "101118"
Response.Write ("商务考察")
case "101119"
Response.Write ("其它移民")
end select%> |
| <%=title%> |
|
| 来源:<%=newsform%> 时间:<%=creadate%> 浏览<%=querycount+1%>次 发表评论 |
|
|
| <%=intro%> 更新时间：<%=updatetime%> |
|
| <%
if infocount>0 then
sqltext="select * from product_info where prono="&prono&" order by sortnum"
rs2.Open sqltext,cn,1,1
do while not rs2.EOF
if rs2("picflag")="1" then
select case rs2("picalign")
case "1"
position="left"
case "2"
position="right"
case else
position="center"
end select
if position="center" then
%>
<%if rs2("flag")="1" then%>
<%=trim(rs2("title"))%>
<%end if
else
if rs2("picflag2")="1" then
%>
" target=_blank> " border="0" align=<%=position%> onload="if (this.width > 700) this.width = 700;">
<% else %>
" border="0" align=<%=position%> onload="if (this.width > 700) this.width = 700;">
<%end if
end if
end if
Response.Write(checkstr(trim(rs2("content")),"1")&"
")
rs2.MoveNext
loop
rs2.Close
end if
if picflag="1" then
if picflag2="1" then%>
<%else%>
<%end if
end if
%>
<%=checkstr(content,"1")%>
[责任编辑：<%=author%>]
<%select case traffic
case "0"
Response.Write ("本文是ABC原创，转载请注明来源“ABC签证网”，并且连接到本站！")
case "1"
Response.Write ("本文是ABC原创，未经授权，不得转载，否则追究法律责任！")
case "2"
Response.Write ("欢迎转载本文，高速传递信息，一起共享成果！")
end select%>
<%
sqltext="select top 1 title,prono from product where state='1' and classcode like '1%' and prono<"&prono&" order by prono desc"
rs2.Open sqltext,cn,1,1
if rs2.eof then
response.write "上一篇：这是澳洲移民分类的第一篇文章"
else
response.write "上一篇："&rs2("title")&""
end if
rs2.Close
%>
<%
sqltext="select top 1 title,prono from product where state='1' and classcode like '1%' and prono>"&prono&" order by prono"
rs2.Open sqltext,cn,1,1
if rs2.eof then
response.write "下一篇：这是澳洲移民分类的最后一篇"
else
response.write "下一篇："&rs2("title")&""
end if
rs2.Close
%>
|
|
|
|
 移民点击排行 |
 |
| <%
sqltext="select prono,title,querycount,updatetime from product where state='1' and classcode like '1%' order by querycount desc"
rs2.Open sqltext,cn,1,1
i=1
do while not rs2.EOF and i<=10
%>| <%=i%> <%=subss(trim(rs2("title")),26)%> | <%
i=i+1
rs2.MoveNext
loop
rs2.Close
%>
|
<%end if%>
