<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="../inc.asp"-->
<!--#include file="../ydzq.asp"-->
<!--#INCLUDE file="conn1.asp"-->
<%call head()
call saycardd("发布消息")
Server.ScriptTimeout=999
set rspy=Server.CreateObject("ADODB.Recordset")
strSQL="select yz from wupin where ids="&myid
rspy.open strSQL,liao,1,1
yyzz=rspy("yz")
%>
<%if yyzz=<10 then%>
您只有银子：<%=rspy("yz")%>两<br/>
不能发布挑战！<br/>
*最低发布10两银子！<br/>
<%else%>
您现在有银子：<%=yyzz%>两
<br/>挑战银子：<br/>
<%call xlanlj("ffbbcl.asp?sid="&sid&"&amp;saytk="&saytk&"")
if saytk>1 then%>
<input name="text" title="挑战银子" type="text" format="*M" emptyok="true" maxlength="500" value="<%=yyzz%>"/><br/>
<%else%>
<input name="text<%=minute(now)%><%=second(now)%>" title="挑战银子" type="text" format="*M" emptyok="true" maxlength="500" value="<%=yyzz%>"/><br/>
<%end if%>
匿名发布：
<select  name="yc">
<option  value="0">否</option>
<option  value="1">是</option>
</select><br/>
<%if saytk>1 then
call xltjlj("lid",""&session("useid")&"")
call xltjlj("name","ltname")
call xlanlj1("确定发布")
else%>
<anchor>确定发布
    <go href="ffbbcl.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>" method="post" accept-charset="utf-8">
        <postfield name="txt" value="$(text<%=minute(now)%><%=second(now)%>)"/>
        <postfield name="yc" value="$(yc)"/>
        <postfield name="lid" value="<%=session("useid")%>"/>
        <postfield name="name" value="<%=session("ltname")%>"/>
    </go>
</anchor>
<%end if%><br/>赢了既可以赢得相应银子，输则相反！<br/>
<%end if%>
----------<br/>
<a href="tt.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[挑战大厅]</a><br/>
<a href="index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[江湖首页]</a><br/>
<a href="/bbs/index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[社区首页]</a><br/>
<%call head1()%>