<%
'=========================================================
'
'產品名稱： 公司(企業)網站管理系統（簡稱：www.web300.cn）
'版權所有：www.web300.cn
'程序制作：QQ812256@hotmail.com
'Copyright 2006-2008 www.web300.cn - All Rights Reserved.
'
'========================================================
%>
<%
'打開站點設置連接
Dim rs_Main,sql_Main,CSJ_Profile,CSJ_Ceo,CSJ_Culture,CSJ_Organize,CSJ_Principle
Dim CSJ_Contact,CSJ_Bulletin,CSJ_Sale,CSJ_Salea,CSJ_Jobs

Set rs_Main= Server.CreateObject("ADODB.Recordset")
sql_Main="select * from Bs_Company"
rs_main.open sql_Main,conn,1,1

CSJ_Profile=ubbcode(rs_Main("EnProfile")) '公司簡介
CSJ_Ceo=ubbcode(rs_Main("EnCeo")) '總裁致辭
CSJ_Culture=ubbcode(rs_Main("EnCulture")) '公司文化
CSJ_Organize=ubbcode(rs_Main("EnOrganize")) '組織機構
CSJ_Principle=ubbcode(rs_Main("EnPrinciple")) '精神理念
CSJ_Contact=ubbcode(rs_Main("EnContact")) '聯系我們
CSJ_Bulletin=ubbcode(rs_Main("EnBulletin")) '公司公告
CSJ_Sale=ubbcode(rs_Main("EnSale"))
CSJ_Salea=ubbcode(rs_Main("EnSalea"))
CSJ_Jobs=ubbcode(rs_Main("EnJob"))
rs_Main.close
set rs_Main=nothing
%>