<!-- #include file="../conn.asp" -->
<!-- #include file="../admin.asp" -->
<%call ling()
Call Head
%>
<!--#include file="st.asp"-->
<%
call saycardd("简繁互换")

dim pw,txt
pw=request("pw")
txt=request("txt")
if pw=1 then
if txt="" then response.redirect "index.asp"
response.write""&st(""&txt&"",0)&""
response.write"<br/><a href=""word.asp?sid="&sid&"&amp;saytk="&saytk&""">返回上级</a>"
elseif pw=2 then
if txt="" then response.redirect "index.asp"
response.write""&st(""&txt&"",1)&""
response.write"<br/><a href=""word.asp?sid="&sid&"&amp;saytk="&saytk&""">返回上级</a>"
else
if saytk>1 then
Response.write "<form name=""form"" method=""post"" action=""word.asp?pw=1&amp;sid="&sid&"&amp;saytk="&saytk&""">"%>
输入要转换的字符:<br/>
<input type="text" name="txt" title="简体转繁体" value="WAP龙门网[SAYTK.COM]" maxlength="300"/><br/>
<input type="submit" name="Submit" value="简体转繁体"></form><br/>
<%else%>
输入要转换的字符:<br/>
<input type="text" name="txt<%=minute(now)%><%=second(now)%>" title="简体转繁体" value="燃点真情" maxlength="300"/><br/>
<anchor title="简体转繁体">简体转繁体
<go method="post" href="word.asp?pw=1&amp;sid=<%=sid%>&amp;saytk=<%=saytk%>">
<postfield name="txt" value="$(txt<%=minute(now)%><%=second(now)%>)"/>
</go></anchor><br/><%end if%>
<%if saytk>1 then
Response.write "<form name=""form"" method=""post"" action=""word.asp?pw=2&amp;sid="&sid&"&amp;saytk="&saytk&""">"%>
输入要转换的字符:<br/>
<input type="text" name="txt" title="简体转繁体" value="WAP龙门网[SAYTK.COM]" maxlength="300"/><br/>
<input type="submit" name="Submit" value="繁体转简体"></form><br/>
<%else%>
<anchor title="繁体转简体">繁体转简体
<go method="post" href="word.asp?pw=2&amp;sid=<%=sid%>&amp;saytk=<%=saytk%>">
<postfield name="txt" value="$(txt<%=minute(now)%><%=second(now)%>)"/>
</go></anchor><%end if%>
<br/>----------
<%end if%>
<br/><a href="index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[站长工具]</a><br/>
<a href="../index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[后台管理]</a>
<%response.write""
call head1()%>
