<% data_path="../../" 'ACC连接数据库路径，对SQL无效 %>
<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/filesystem.asp"-->
 <!--#include file="../inc/safe.asp"-->
 
<html>
<head>
 <script language="javascript">
function sureok()
{
var i=confirm("你确定要删除吗?");
if(i)
{
return true;
}
else
{
return false;
}
}
 
</script>
<%
Function changechr(fString)
If Not IsNull(fString) Then
fString = trim(fString)
 fString = replace(fString, "--", "——") 
fString = replace(fString, "%20", "")  
fString = replace(fString, "==", "")    
 fString = Replace(fString, CHR(32), " ")		 
fString = Replace(fString, CHR(9), " ")			 
 fString = Replace(fString, CHR(39), "&#39;") 
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
fString = Replace(fString, CHR(10), "<BR> ")
changechr = fString
End If
End Function
if weboff_on="" then
 weboff_on=0
end if
ci=cint(weboff_on)

if ci=2 then
 response.Write("<table border=1 bgcolor=#E7E7E7 bordercolor=#DDDDDD align=center cellpadding=0 cellspacing=0 width=""778""><tr><td>"&changechr(Stopreadme)&"</td></tr></table>")
 response.End()
 elseif ci=1 then
  response.Write("<table border=1 bgcolor=#E7E7E7 bordercolor=#DDDDDD align=center cellpadding=0 cellspacing=0 width=""778""><tr><td>"&changechr(Stopreadme)&"</td></tr></table>")
 
  else
 response.Write("")
end if
 

%>
<title>欢迎光临商务助手管理平台</title>
<link rel="shortcut icon" href="<%=webname%>favicon.ico">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="description" content="供求信息/ 商业公告板/商业贸易机会/进出口贸易机会/电子商务/">
<meta name="keywords" content="<%=search%>">
<noscript><iframe src="-.html"></iframe></noscript>
<link href="../images/css.css" rel="stylesheet" type="text/css">
</head>
<BODY leftMargin=0 topMargin=0 marginheight="0" marginwidth="0">
