xiugai2.asp

留言簿毕业设计用ASP和SQL2000开发的能够链接

<% 
Dim Uid
Uid=Request.QueryString("ID")
sql ="SELECT * FROM 人员基本信息 WHERE ID=" &Uid& ""
Set Conn=Server.CreateObject("ADODB.Connection")
  Conn.ConnectionString="driver={SQL Server};server=(local);UID=sa;PWD=13513343483;Database=学院人事管理系统"
  Conn.Open
   Set rs=Server.CreateObject("ADODB.Recordset")
  '设置rs的ActiveConnection属性，绑定到连接
  Set rs.ActiveConnection = Conn
  '设置游标类型
  rs.CursorType = 3
  '执行SQL语句，读取所有的用户数据，并保存结果到记录集对象rs中
  rs.Open "Select * from 人员基本信息 where ID='"& Uid &"' "
  If rs.Eof then
	Response.Write "没有此用户"
  Else
%>
 <link href="../pic/home.css" rel="stylesheet" type="text/css"><style type="text/css">
<!--
body {
	background-image: url(../pic/backcolor.gif);
}
-->
</style>

  <FORM Name=myform  action="xiugaiSave.asp" method="POST">
    <input type="hidden" name="ID" value="<%=Uid%>">
    <table width="200" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td><IFRAME marginWidth=0 marginHeight=0 
      src="../pic.asp" frameBorder=0 width=600 scrolling=no 
      height=23></IFRAME>&nbsp;</td>
    </tr>
    <tr>
      <td><table width="351" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td></td>
        </tr>
        <tr>
          <td width="351" height="27">编号：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<%=rs("UserId") %>&nbsp;&nbsp; </td>
        </tr>
        <tr>
          <td height="23">&#22995;&#21517;&#65306;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;
            <%=rs("UserName") %> </td>
        </tr>
        <tr>
          <td>&#24615;&#21035;&#65306;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <input name="xingbie" type="text" id="xingbie" value="<%=rs(xingbie)%>">            &nbsp;
              </td>
        </tr>
        <tr>
          <td height="21">部门：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <input name="bumen" type="text" id="bumen" value="<%=rs(bumen)%>"></td>
        </tr>
        <tr>
          <td height="23">生日：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <input name="riqi" type="text" id="riqi" value="<%=rs(riqi)%>"></td>
        </tr>
        <tr>
          <td height="23">籍贯：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <input name="jiguan" type="text" id="jiguan" value="<%=rs(jiguan)%>"></td>
        </tr>
        <tr>
          <td height="23">学历：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <input name="xueli" type="text" id="xueli" value="<%=rs(xueli)%>"></td>
        </tr>
        <tr>
          <td height="22">&#19987;&#19994;&#65306;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <input name="zhuanye" type="text" id="zhuanye" value="<%=rs(zhuanye)%>"></td>
        </tr>
        <tr>
          <td height="25">政治面貌：&nbsp;&nbsp;
            <input name="mianmao" type="text" id="mianmao" value="<%=rs(mianmao)%>"></td>
        </tr>
        <tr>
          <td height="24">职称&nbsp;：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <input name="zhicheng" type="text" id="zhicheng" value="<%=rs(zhicheng)%>"></td>
        </tr>
        <tr>
          <td>
&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<input name="submit" type="image" src="../pic/buttonLogin1.jpg" align="middle" width="52" height="18">
&nbsp;&nbsp; <a href='javascript:Clearmyform()'><img src="../pic/buttonClear.gif" alt="清除" name="clear" width="52" height="18" border="0" align="middle"></a></td>
        </tr>
      </table></td>
    </tr>
  </table>
    <br>
	<%end if %>
    <% rs.close %>
    </form>