replyto.asp

来自「采用ASP。NET做的网上游戏交易平台」· ASP 代码 · 共 74 行

ASP
74 行
字号 
<!--#include file="dbconn.asp"-->
<html>
<head>
<%
dim myreplyid
myreplyid=request.QueryString("replyid")
if request.form("btnguest")="确认回复" then
dim myid,myanswer
myid=trim(request.form("txtid"))
myanswer=trim(request.form("txtquestion"))
if myanswer="" then myanswer="暂无回复"
myanswer=replace(myanswer,"'",chr(32))
sql="update guest set answer='"&myanswer&"',sendtime=#"&now()&"# where ID="&clng(myid)
conn.execute(sql)
myreplyid=myid
Response.Write "<script language=javascript>" &vbCrLf&_
"alert('回复提问成功！\n按确定返回！');" &vbCrLf&_
"window.location='reply.asp';"&vbCrLf&_
"</script>"
end if
set rs=server.createobject("adodb.recordset")
sql="select * from guest where ID="&clng(myreplyid)
rs.open sql,conn,3,1
%>
<title>回复提问</title>
<LINK href="../wgcs.css" rel=stylesheet>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<body>
<div align="center"> 
  <table border="0" width="580" cellspacing="0" cellpadding="0" >
    <tr> 
      <td height=5 bgcolor="#767676" colspan="4"></td>
    </tr>
      <tr> 
        
      <td  bgcolor="#666666" width="355" height="25"><font color="#FFFFFF">回复提问......</font></td>
        <td  bgcolor="#666666" width="134" height="25"> 　 </td>
        <td  bgcolor="#666666" width="227" height="25"> <font color="#FFFFFF">&nbsp; 
          </font></td>
        <td  bgcolor="#666666" width="54" height="25">&nbsp; </td>
      </tr>
  </table>
<table cellSpacing="1" width="580" border="1" style="border-collapse: collapse" bordercolor="#666666" height="280">
  <form name="frmguest" method="post" action="replyto.asp">
    <tr valign=top> 
      <td width="757" align="right" valign="middle"> <div align="center">
          <table width="560" border="0" cellspacing="1" cellpadding="0">
            <tr> 
                <td width="133"  height="30" align="right">提 问：</td>
              <td width="424">&nbsp;<%=rs("question")%></td>
            </tr>
            <tr> 
                <td align="right" valign="top">回 复：</td>
              <td valign="top"><textarea name="txtquestion" rows="8" cols="50"><%=rs("answer")%></textarea></td>
            </tr>
            <tr> 
              <td>&nbsp;</td>
              <td><input type="hidden" name="txtid" value="<%=myreplyid%>"></td>
            </tr>
            <tr> 
              <td>&nbsp;</td>
              <td><input class="M"  type="submit" value="确认回复" name="btnguest"></td>
            </tr>
          </table>
        </div></td>
    </tr>
  </form>
</table>
</div>
</body>
</html>

replyto.asp - 源码说明

本页面展示了「采用ASP。NET做的网上游戏交易平台」中的 replyto.asp 源码文件，采用 ASP 编程语言编写，共 74 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与ASP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?