<% data_path="../../" 'ACC连接数据库路径，对SQL无效 %>
<!--#include file="../../inc/safe.asp"-->
 <!--#include file="../head.asp"-->
<!--#include file="../../inc/filesystem.asp"-->
<!--#include file="../checkrole.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>操作成功</title>
<link href="../../images/css.css" rel="stylesheet" type="text/css">
<meta HTTP-EQUIV=refresh Content='3;url=index.asp'>
<%
  Response.Buffer = true
  Response.ExpiresAbsolute=now()-1
  Response.Expires=0
  Response.CacheControl="no-cache"
call checkuser("zxsj")

if issession=0 then
gsid=Replace_Text(request.Cookies("Yxmemberid"))
else
gsid=session("id")
end if
vipinfo_id=Replace_Text(Request("vipinfo_id"))
showname=Replace_Text(Request("showname"))
jgsm=Replace_Text(Request("jgsm"))
 content=replace(Request("content"),"'","")
mmfx=Replace_Text(Request("type"))
period=Replace_Text(Request("period"))
p_z_Z_Keywords=Replace_Text(Request("p_z_Z_Keywords"))
 if mmfx="" then 
response.Write("<script>alert('请选择交易类别！');history.back();</script>")
response.End() 
 end if

sortid=Replace_Text(Request.form("topCatFormKey"))                                     '第一类
 if sortid="" then
response.Write("<script>alert('请选择行业大类！');history.back();</script>")
response.End()
end if
typeid=Replace_Text(Request.form("secondCatFormKey"))
                                                                                '第二类
if typeid="" then
	typeid=0
end if
typeid_2=Replace_Text(Request.form("leafCatFormKey"))
if typeid_2="" then
	typeid_2=0
end if
country=Replace_Text(Request("country1"))
city=Replace_Text(Request("city"))
province=Replace_Text(Request("province"))
vippricetems=Replace_Text(Request("vippricetems"))
picture=Replace_Text(Request("picture"))
keywords=Replace_Text(Request("keywords"))
keywords2=Replace_Text(Request("keywords2"))
keywords3=Replace_Text(Request("keywords3"))
keywords1=keywords&","&keywords2&","&keywords3

set rs=server.createobject("adodb.recordset")
sql="select * from Yixiang_vipinfo where vipinfo_id="&vipinfo_id

rs.open sql,conn,1,3
oldpic=rs("picture")
hname=rs("viptype")&"-"&rs("vipinfo_id")&".html"

rs("vipshowname")=showname
rs("vippricetems")=vippricetems
rs("vipcontent")=content
rs("sortid")=sortid
rs("typeid")=typeid
rs("typeid_2")=typeid_2
rs("keywords")=keywords1

rs("viptype")=mmfx
rs("vipperiod")=period
rs("country")=country
rs("city")=city
rs("province")=province
 if Replace_Text(Request("cimg"))=2 then
     rs("picture")=picture
   '删除原有图片^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
    if picture<>oldpic then
	if oldpic<>"nopicture.gif" then
  	 call FileDel(HOPE_InstallDir&"UploadFile/"&oldpic)
	 end if
 	end if
   '^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
  end if
if addvipinfocity=1 then
	rs("flag")=1
else
	rs("flag")=0
end if
rs("weburl")=web
rs("html_pass")=0
rs("dateandtime")=now()
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
'删除当种类变化时原有的html页面^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
if trim(hname)<>trim(mmfx&"-"&vipinfo_id) then
	call FileDel(HOPE_InstallDir&"vipinfo/offerdetail/"&mmfx&"-"&vipinfo_id&".html")
end if
	'生成静态页面
if addvipinfocity=1 then
	Response.Write("<iframe src='../../manage/Autohtml/vipinfo/makedetail.asp?all=vipinfo&selAnnounce="&vipinfo_id&"' width=0 height=0></iframe>")
	
	Response.Write("<iframe src='../../manage/Autohtml/vipinfo/makelist.asp?all=all&other=SendTo&TypeId="&mmfx&"' width=0 height=0></iframe>")
end if
%>
<TABLE width=628 border=0 align="center" cellPadding=0 cellSpacing=0>
  <TBODY>
  <TR>
    <TD 
    style="BACKGROUND-POSITION: right 50%; BACKGROUND-IMAGE: url(i../mages/bg1.gif); BACKGROUND-REPEAT: repeat-y; BACKGROUND-COLOR: #ffffff" 
    vAlign=top align=middle width=628>
      <BR>
      <TABLE cellSpacing=0 cellPadding=0 width=100% border=0>
        <TBODY>
        <TR>
        <TD width="92%" background="../images/info_bg.gif"><IMG src="../images/offer_post.gif" width=578 
            border=0></TD>
        </TR></TBODY></TABLE>
      <table width="100%" border="0" cellpadding="0" cellspacing="0" class="content_border">
		        <tr> 
	              <td align="center">
		                
 <br>
<br>
<TABLE class=bdr1 cellSpacing=0 cellPadding=0 width="95%" 
              border=0>
  <TBODY>
    <TR>
      <TD><TABLE class=bdr2 cellSpacing=0 cellPadding=0 width="100%" 
                  border=0>
        <TBODY>
          <TR>
            <TD height=91 align="center" class=lh13><span class="lh15 C"><font color=#FF0000 class="M">恭喜您，信息已修改成功！</font></span> </TD>
          </TR>
        </TBODY>
      </TABLE></TD>
    </TR>
  </TBODY>
</TABLE><br>
 <br>

<table width="492" border="0" cellspacing="0" cellpadding="0">
    <tr>
        <td height="30" class="C lh18">
            <p class="c">
                <img src="../images/indexpoint.gif" width="5" height="9">
                发布更多专项商机信息，请继续 
                <a href="add_vipinfo.asp"><img src="../images/myalibaba_button_postinfo.gif" width="119" height="22" border="0" align="absmiddle"></a>            </p>
        </td>
    </tr>
        <tr>
        <td height="30" class="c">
            <img src="../images/indexpoint.gif" width="5" height="9"> 想推广自己的产品，请 
            <a href="<%=HOPE_InstallDir%>member/productshow/add_product.asp"><img src="../images/myalibaba_button_quickpost.gif" width="90" height="22" border="0" align="absmiddle"></a> </td>
    </tr>
        <tr>
        <td height="30" class="c">
            <img src="../images/indexpoint.gif" width="5" height="9"> 
            信息发布后，您可以"<a href="index.asp">管理商业信息</a>"，查看和编辑已发布上网的商业信息。        </td>
    </tr>
</table>
<br>
<hr width="95%" size=1 color=#CCCCCC>
<br>
</td>
		        </tr>
      </table><BR><BR></TD></TR>
</TABLE>