|
<%
Dim HtmlContent,strHtml
Newasp.LoadTemplates 9999, 7, 0
HtmlContent = Newasp.HtmlContent
HtmlContent = Replace(HtmlContent,"{$InstallDir}", Newasp.InstallDir)
HtmlContent = Replace(HtmlContent, "{$ChannelID}", 0)
HtmlContent = Replace(HtmlContent,"{$PageTitle}",Newasp.HtmlSetting(1))
HtmlContent = ReadClassMenu(HtmlContent)
HtmlContent = ReadClassMenubar(HtmlContent)
strHtml = Newasp.Readfile("about.ini")
strHtml = Replace(strHtml,"中国海员网", Newasp.SiteName)
strHtml = Replace(strHtml,"http://www.iseaman.com", Newasp.SiteUrl)
HtmlContent = Replace(HtmlContent,"{$TempContent}", strHtml)
Response.Write HtmlContent
CloseConn
%> |
|
您当前的位置：
