<% dim LanguageID, SiteTitle, AdditionTitle, SiteLogoUrl, SiteUrl, CompanyName, CompanyAddress, CompanyPostCode, CompanyContact, CompanyPhone, CompanyMobile, CompanyFax, CompanyEmail, CompanyICP, StatisticalCode, CopyRight, SiteKeywords, SiteDesc dim rs, sql Sub getComplanySetting dim ID : ID=rCookie("languageID") sql ="select * from {prefix}Language " dim rs : set rs=conn.exec(sql,"r1") if rs.eof then alertMsgAndGo "沒有這條記錄","-1" else LanguageID=rs("LanguageID") SiteTitle=rs("siteTitle") AdditionTitle=rs("additionTitle") SiteLogoUrl=rs("siteLogoUrl") SiteUrl=rs("siteUrl") CompanyName=rs("companyName") CompanyAddress=rs("companyAddress") CompanyPostCode=rs("companyPostCode") CompanyContact=rs("companyContact") CompanyPhone=rs("companyPhone") CompanyMobile=rs("companyMobile") CompanyFax=rs("companyFax") CompanyEmail=rs("companyEmail") CompanyICP=rs("companyICP") StatisticalCode=rs("statisticalCode") CopyRight=rs("copyRight") SiteKeywords=rs("siteKeywords") SiteDesc=rs("siteDesc") end if rs.close : set rs=nothing End Sub getComplanySetting %> 企業名稱:<%=CompanyName%>
企業地址:<%=CompanyAddress%>
郵政編碼:<%=CompanyPostCode%>
聯系人:<%=CompanyContact%>
電話號碼:<%=CompanyPhone%>
手機號碼:<%=CompanyMobile%>
公司傳真:<%=CompanyFax%>
電子郵箱:<%=CompanyEmail%>
備案號:<%=CompanyICP%>
統計代碼:<%=decode(StatisticalCode)%>
版權信息:<%=decode(CopyRight)%>
站點關鍵詞:<%=SiteKeywords%>
站點描述:<%=SiteDesc%>