📄 inchange.asp

📁 大家好
💻 ASP
字号:
<%@ language="vbscript" %>
<%if request("boardid")="" or request("password")="" or request("webmaster")="" then
response.redirect ("changeboard.htm")
end if
if request("webmaster")="mingming" and request("password")="music" then
  DbPath = SERVER.MapPath("db1.mdb")
   Set conn = Server.CreateObject("ADODB.Connection")
   conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DbPath
   set rs=server.createobject("adodb.recordset")
   sql="select * from board_info where boardid="&cint(request("boardid"))
   rs.open sql,conn
if rs.bof and rs.eof then
response.write "??óD′?°?￡?"
response.write "<a href='changeboard.htm'>·μ??<a>"
rs.close
conn.close
set rs=nothing
set conn=nothing
response.end
else
%>
<html>

<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<body bgcolor="#FFFFFF">

<form method="post" action="changeboard.asp" name>
  <input type="hidden" name="boardid" value="<%=cint(request("boardid"))%>"><table
  width="75%" border="1" align="center">
    <tr>
      <td width="42%"><div align="center"><center><p>版 面 </td>
      <td width="58%"><input type="text" name="boardname" value="<%=rs("boardname")%>" size="20"> 
      </td>
    </tr>
    <tr>
      <td width="42%"><div align="center"><center><p>斑 竹 </td>
      <td width="58%"><input type="text" name="boardgg" value="<%=rs("boardgg")%>" size="20"> </td>
    </tr>
    <tr>
      <td width="42%"><div align="center"><center><p>板 斧 </td>
      <td width="58%"><input type="text" name="boardmm" value="<%=rs("boardmm")%>" size="20"> </td>
    </tr>
    <tr>
      <td width="42%"><div align="center"><center><p>版面介绍 </td>
      <td width="58%">&nbsp; </td>
    </tr>
    <tr>
      <td colspan="2" height="63">
      <dd align="center"><textarea name="aboutboard" rows="1" cols="20"><%=rs("aboutboard")%></textarea> </dd>
      </td>
    </tr>
  </table>
  <dd align="center"><input type="submit" name="Submit" value="更改"> <input type="reset"
    name="Submit2" value="复原"> </dd>
</form>
</body>
</html>
<%rs.close
conn.close
set rs=nothing
set conn=nothing
response.end
end if
else
response.write "wrong password!"
response.write "<a href='changeboard.htm'>重试</a>"
end if
%>
⌨️ 快捷键说明

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