📄 wyly_ckly_1.asp

📁 asp+Access开发的客户资源管理系统,用户名:admin,密码:

💻 ASP

字号:

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

<body bgcolor="#FFFFFF" text="#000000">
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<%
name=request.querystring("name")
set conn=server.createobject("adodb.connection")
	conn.open "driver={Microsoft Access Driver (*.mdb)};pwd=webcool_2000;dbq=" & Server.MapPath("../database/customer.mdb")
	set rs=conn.execute("select * from bbs where name='"&name&"'")
%>

<B><I>留言信息</I></B>
  <table width="600" border="1" cellspacing="0" cellpadding="0">
  <tr>
    <td width="169">发送者姓名</td>
    <td width="425"><%=rs("name")%></td>
  </tr>
  <tr>
    <td width="169">标 题 </td>
    <td width="425"><%=rs("title")%></td>
  </tr>
  <tr>
    <td width="169">电子邮件 </td>
    <td width="425"><%=rs("email")%></td>
  </tr>
  <tr>
    <td width="169"> 内容 </td>
    <td width="425" height="150"><%=rs("neirong")%></td>
  </tr>
</table>
  
  
  
  
  
  
  
  
  
  <form name="form1" method="post" action="wyly_wyly_1.asp">
<p><b><font color="#9999FF">回复留言</font></b></p>
<p>姓名 
  <input type="text" name="name">
  &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;电子邮件 
  <input type="text" name="email">
  <br>
  标题 
  <input type="text" name="title" size="50">
  <br>
  内容 
  <textarea name="reirong" cols="60" rows="6"></textarea>
  <br>
  对象 
  <select name="username">
  <option selected>大家</option>
  <%
      set rs=conn.execute("select * from quanxian")
      while not rs.eof
	  %>
  
	 
		<option value="<%=rs("user").value%>"><%=rs("user").value%></option>
      <%     
      rs.movenext
	  wend    %>
  </select>
  <br>
  <br>
  <br>
  <input type="submit" name="Submit" value="确 定">
  <input type="reset" name="Submit2" value="取 消">
</p>


</form>
</body>
</html>

<html></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -