<!--#include file="conn.asp"-->
<%


call head()
Call saycarda("提交留言")
%>
<!--#INCLUDE file="../bbs/sy1.asp"-->


<%
id=usb(request("id"))
mi=usb(request("mi"))
mi2=usb(request("mi2"))
mi3=usb(request("mi3"))
if mi="" or mi2="" then response.redirect "ly.asp?cw=1&sid="&sid&"&id="&id&""
set rs1=Server.CreateObject("ADODB.Recordset")
rspl1="select * from Users where cstr(fid)='"&myid&"' and cstr(name)='"&mi&"'"
rs1.open rspl1,connshop,1,2
if not rs1.eof then response.redirect "ly.asp?cw=2&sid="&sid&"&id="&id&""
rs1.close
set rs1=nothing

set rs=Server.CreateObject("ADODB.Recordset")
rspl="select * from shop_ly order by id desc"
rs.open rspl,connshop,1,2
rs.addnew
rs("did")=id
rs("fid")=myid
rs("fname")=myni
rs("name")=mi
rs("txt")=mi2
rs("mm")=mi3
rs.update
rs.close
set rs=nothing
%>
发布留言成功<br/>
<a href='tly.asp?sid=<%=sid%>&amp;id=<%=id%>'>回到留言本</a><br/>
<!--#include file="fanhui.asp"-->
<%
call headsay()
%>