<% Response.Buffer=True %> <% function cutstr(tempstr,tempwid) if len(tempstr)>tempwid then cutstr=left(tempstr,tempwid)&"..." else cutstr=tempstr end if end function dim j set rs = server.createobject("adodb.recordset") %>
翻译服务  
 
翻译服务
<% rs.open "select top 7 * from SmallClass_New where BigClassName='翻译服务' and isMenu = 0 Order by orderby",conn,1,1 For j = 1 To 5 If rs.Eof or rs.bof Then Exit For if rs("BigClassName")<>"" and rs("SmallClassName")<>"" then sql="select top 1 id from news where BigClassName='"&rs("BigClassName")&"' and SmallClassName='"&rs("SmallClassName")&"' order by id desc" elseif rs("BigClassName")<>"" then sql="select top 1 id from news where BigClassName='"&rs("BigClassName")&"' order by id desc" end if tid = conn.Execute(sql)(0) %> <% rs.movenext Next %>
<%=gotTopic(rs("SmallClassName"),30)%>
 
特色翻译服务
<% For j = 1 To 2 If rs.Eof or rs.bof Then Exit For if rs("BigClassName")<>"" and rs("SmallClassName")<>"" then sql="select top 1 id from news where BigClassName='"&rs("BigClassName")&"' and SmallClassName='"&rs("SmallClassName")&"' order by id desc" elseif rs("BigClassName")<>"" then sql="select top 1 id from news where BigClassName='"&rs("BigClassName")&"' order by id desc" end if tid = conn.Execute(sql)(0) %>
<%=rs("SmallClassName")%>
<% rs.movenext Next rs.close %>
合作项目
&owen2=<%=Server.URLEncode("合作项目")%>" class="muen1">更多 >>
<% rs.open "select top 8 * from News where BigClassName='翻译服务' and SmallClassName='合作项目' and IsIndex = 1 ",conn,1,1 For j = 1 To 4 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next %>
"><%=gotTopic(rs("title"),50)%>
<% For j = 1 To 4 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close NoI = 1 %>
"><%=gotTopic(rs("title"),50)%>
猎头咨询：QQ <%=Siogon_lietou%>
翻译咨询：QQ <%=Siogon_zixun%>
培训咨询：QQ <%=Siogon_peixun%>
留学服务咨询：QQ <%=Siogon_liuxue%>
地址：<%=Siogon_address%>
猎头服务
译员信息 | INTERPRETER INFORMATION
按条件查找：
翻译语种： <%=getClassNamelist("_language","_Search",1)%>
翻译项目： <%=getClassNamelist("_project","_Search",2)%>
翻译经验： <%=getClassNamelist("_experience","_Search",3)%>
客户信息 | CUSTOMER INFORMATION
按条件查找：
语言分类： <%=getClassNamelist("_guestlanguage","_Guest",1)%>
项目分类： <%=getClassNamelist("_projectcategory","_Guest",2)%>
项目国家： <%=getClassNamelist("_projectcountry","_Guest",3)%>
成功案例 | SUCCESSFUL CASE
更多 >>
<% rs.close rs.open "select top 3 * from [Siogon_Success_article] where ok = 0 order by id desc",conn,1,1 For j = 1 To 3 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close %>
公司名称 岗位 人数 国家 年薪
"><%If rs("TitleFontColor")<>"" then Response.Write("") End if%><%=gotTopic(rs("companyname"),30)%><%If rs("TitleFontColor")<>"" then Response.Write("") End if%> <%=gotTopic(rs("job"),16)%> <%=rs("Number")%>/人 <%=rs("State")%> <%=rs("Salary")%>
  服务模块
 
译员简历填写
'' and [ClassID]='60' Order by Infotime desc")("FirstImageName")%>">点击此处下载，填写完整后
发送至translation@xianfanyi.com
  <% rs.open "select top 2 * from [Siogon_Article] where [Category]='_Recruitment' and IsIndex = 1 Order by Infotime desc",conn,1,1 For j = 1 To 2 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close %>
急聘职位 更多...
" title="<%=rs("Title")%>"><%If rs("TitleFontColor")<>"" then Response.Write("") End if%><%=gotTopic(rs("Title"),20)%><%If rs("TitleFontColor")<>"" then Response.Write("") End if%>
 
企业岗位需求表
'' and [ClassID]='61' Order by Infotime desc")("FirstImageName")%>">点击此处下载，填写完整后
发送至translation@xianfanyi.com
  <% rs.open "select top 2 * from [Siogon_Article] where [Category]='_Teacher' and IsIndex = 1 and [classid]='62' Order by Infotime desc",conn,1,1 For j = 1 To 2 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close %>
职场资讯 更多...
"title="<%=rs("Title")%>"><%If rs("TitleFontColor")<>"" then Response.Write("") End if%><%=gotTopic(rs("Title"),20)%><%If rs("TitleFontColor")<>"" then Response.Write("") End if%>
工程英语翻译培训
 
企业招聘 | CUSTOMER INFORMATION
　赴外英语翻译招聘 　更多>>
<% rs.open "select top 4 * from [Siogon_Article] where [Category]='_Recruitment' and IsIndex = 1 and [ClassID]='29' Order by Infotime desc",conn,1,1 For j = 1 To 4 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close %>
" title="<%=rs("title")%>"><%If rs("TitleFontColor")<>"" then Response.Write("") End if%><%=gotTopic(rs("title"),50)%><%If rs("TitleFontColor")<>"" then Response.Write("") End if%>
　国内英语翻译招聘 更多>>
<% rs.open "select top 4 * from [Siogon_Article] where [Category]='_Recruitment' and IsIndex = 1 and [ClassID]='30' Order by Infotime desc",conn,1,1 For j = 1 To 4 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close %>
" title="<%=rs("title")%>"><%If rs("TitleFontColor")<>"" then Response.Write("") End if%><%=gotTopic(rs("title"),50)%><%If rs("TitleFontColor")<>"" then Response.Write("") End if%>
开设班型 | CUSTOMER INFORMATION 更多>>
<% sql = "select top 6 * from [Siogon_classtype_article] order by id desc" rs.open sql,conn,1,1 For j = 1 To 6 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close %>
班级名称
入学条件
学费
学时
课程介绍
上课时间
状态
<%=rs("requirements")%>
<%=rs("Tuition")%>
 <%=rs("Hours")%>
<%=gotTopic(rs("Description"),12)%>
<%=rs("AddTime")%>-<%=rs("LastTime")%>
 ">
师资介绍 | CUSTOMER INFORMATION 更多>>  
<% rs.open "select top 3 * from [Siogon_Article] where [Category]='_Teacher' and IsIndex = 1 and [ClassID]='27' and Ok = True and FirstImageName<>'' Order by Infotime desc",conn,1,1 For j = 1 To 3 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close %>
" title="<%=rs("title")%>">" width="113" height="102" border="none">
" title="<%=rs("title")%>"><%If rs("TitleFontColor")<>"" then Response.Write("") End if%><%=rs("title")%><%If rs("TitleFontColor")<>"" then Response.Write("") End if%>
<%=gotTopic(LoseHtml(rs("ArtDescription")),250)%>
视频介绍
" title="<%=rs("title")%>">
葡萄牙、巴西留学服务
<% Set Rspp=server.CreateObject("adodb.recordset") rs.open "select top 7 * from [Siogon_Class] where [Category]='_StudyService' and TopID = 0 and IsIndex=1 and link=0 order by num",conn,1,1 For i = 1 To 7 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next Set rspp= Nothing rs.close %>
<% Sqlpp ="select top 2 * from [Siogon_Class] Where [Category]='_StudyService' and TopID="&rs("ID")&" and IsIndex=1 and link=0 order by num" rspp.open sqlpp,conn,1,1 For j = 1 To 2 If rs.Eof or rs.bof Then Exit For %> <% rspp.movenext Next rspp.close %>
<%=rs("ClassName")%> :
  <%=Rspp("ClassName")%>
 
就业前景：
<% set rss = conn.Execute("select top 1 * from [Siogon_Article] where [Category]='_StudyService' and IsIndex = 1 and [ClassID]='25' Order by Infotime desc") Response.Write(""&gotTopic(LoseHtml(rss("ArtDescription")),250)&"") rss.close:Set rss = Nothing%>
咨询代表： 更多>>  
<% rs.open "select top 2 * from [Siogon_Article] where [Category]='_StudyService' and IsIndex = 1 and [ClassID]='26' and Ok = True and FirstImageName<>'' Order by Infotime desc",conn,1,1 For j = 1 To 2 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close %>
" title="<%=rs("title")%>">" width="90" height="107" border="none">
"><%=gotTopic(rs("title"),8)%>
  图文中心 更多
<% rs.open "select top 6 * from news where BigClassName='图文中心' order by id desc",conn,1,1 For j = 1 To 6 If rs.Eof or rs.bof Then Exit For %> <% rs.movenext Next rs.close %>
" title="<%=rs("title")%>">" width="152" height="128" border='none' />
" title="<%=rs("title")%>"><%=gotTopic(rs("title"),20)%>
<%call ShowFriendLinks(1,5,5,2)%>