论文无忧网提供:计算机毕业论文范文|计算机毕业设计|计算机毕业论文
栏目导航 ASP Java Web .NET VB6.0 JAVA VC VF DELPHI PB 计算机网络 计算机科学与技术 PHP 安卓APP 其他 C# 代写论文
当前位置: > 计算机 > 计算机科学与技术 >

A450科研项目网上申报管理系统论文

4.3、系统用户注册管理模块

copyright paper51.com

<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%> 内容来自论文无忧网 www.paper51.com

<!--#includefile="Connections/conn.asp" --> http://www.paper51.com

<% 内容来自论文无忧网 www.paper51.com

DimMM_editAction

内容来自www.paper51.com

MM_editAction= CStr(Request.ServerVariables("SCRIPT_NAME")) copyright paper51.com

If(Request.QueryString <> "") Then copyright paper51.com

  MM_editAction = MM_editAction &"?" & Server.HTMLEncode(Request.QueryString) paper51.com

End If

http://www.paper51.com

' boolean to abort record edit copyright paper51.com

DimMM_abortEdit

内容来自www.paper51.com

MM_abortEdit= false 内容来自www.paper51.com

%> 内容来自论文无忧网 www.paper51.com

<%

http://www.paper51.com

If (CStr(Request("MM_insert")) = "form1")Then copyright paper51.com

  If (Not MM_abortEdit) Then

内容来自论文无忧网 www.paper51.com

    ' executethe insert copyright paper51.com

    Dim MM_editCmd

paper51.com

    Set MM_editCmd =Server.CreateObject ("ADODB.Command") http://www.paper51.com

    MM_editCmd.ActiveConnection= MM_conn_STRING

内容来自www.paper51.com

    MM_editCmd.CommandText ="INSERT INTO [user] (username, password, type, mingcheng, sfz, dizi,youbian, dianhua) VALUES (?, ?, ?, ?, ?, ?, ?,?)"

paper51.com

    MM_editCmd.Prepared = true paper51.com

    MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param1", 201, 1,50, Request.Form("username")) ' adLongVarChar

内容来自论文无忧网 www.paper51.com

    MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param2", 201, 1,50, Request.Form("password")) ' adLongVarChar 内容来自www.paper51.com

    MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param3", 201, 1,50, Request.Form("type")) ' adLongVarChar

内容来自www.paper51.com

    MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param4", 201, 1,50, Request.Form("mingcheng")) ' adLongVarChar

http://www.paper51.com

    MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param5", 201, 1,50, Request.Form("sfz")) ' adLongVarChar

内容来自论文无忧网 www.paper51.com

    MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param6", 201, 1,50, Request.Form("dizi")) ' adLongVarChar

copyright paper51.com

    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 201, 1, 50,Request.Form("youbian")) ' adLongVarChar http://www.paper51.com

    MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param8", 201, 1,50, Request.Form("dianhua")) ' adLongVarChar

paper51.com

    MM_editCmd.Execute 内容来自论文无忧网 www.paper51.com

   MM_editCmd.ActiveConnection.Close copyright paper51.com

    ' appendthe query string to the redirect URL

内容来自论文无忧网 www.paper51.com

    Dim MM_editRedirectUrl http://www.paper51.com

    MM_editRedirectUrl ="cg.htm" 内容来自www.paper51.com

    If (Request.QueryString<> "") Then

http://www.paper51.com

      If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) =0) Then

copyright paper51.com

       MM_editRedirectUrl = MM_editRedirectUrl & "?" &Request.QueryString

http://www.paper51.com

      Else

copyright paper51.com

       MM_editRedirectUrl = MM_editRedirectUrl & "&" &Request.QueryString 内容来自论文无忧网 www.paper51.com

      End If

paper51.com

    End If copyright paper51.com

    Response.Redirect(MM_editRedirectUrl)

http://www.paper51.com

  End If

paper51.com

End If 内容来自论文无忧网 www.paper51.com

%>

paper51.com

<html> paper51.com

<head>

内容来自www.paper51.com

<meta http-equiv="Content-Type"content="text/html; charset=gb2312" /> paper51.com

<title>用户注册-科研项目网上申报管理系统</title> http://www.paper51.com

<styletype="text/css">

内容来自论文无忧网 www.paper51.com

<!-- 内容来自论文无忧网 www.paper51.com

.x { copyright paper51.com

................................................................. font-size: 12px;

copyright paper51.com

................................................................. color: #000000;

http://www.paper51.com

................................................................. text-decoration: none; paper51.com

}

内容来自论文无忧网 www.paper51.com

body {

copyright paper51.com

................................................................. background-image: url(img/bg1.gif); paper51.com

}

内容来自www.paper51.com

-->

copyright paper51.com

</style>

http://www.paper51.com

</head> 内容来自www.paper51.com

<bodymarginheight="0"  marginwidth="0"topmargin="0" bottommargin="0" >

copyright paper51.com

<tablewidth="760" border="0" align="center"cellpadding="0" cellspacing="0">

内容来自论文无忧网 www.paper51.com

  <tr>

http://www.paper51.com

    <td><imgsrc="img/1.jpg" width="760"height="160"></td>

paper51.com

  </tr>

内容来自论文无忧网 www.paper51.com

</table>

内容来自论文无忧网 www.paper51.com

<tablewidth="760" border="0" align="center"cellpadding="0" cellspacing="0"bgcolor="#FFFFFF">

paper51.com

  <tr> 内容来自论文无忧网 www.paper51.com

    <tdalign="center" valign="top"><formname="form1" method="POST" action="<%=MM_editAction%>">

内容来自论文无忧网 www.paper51.com

      <tablewidth="400" border="0" cellpadding="0"cellspacing="0" class="x"> http://www.paper51.com

        <tr> 内容来自www.paper51.com

         <td height="25" colspan="2"align="center" valign="middle">用户注册</td>

内容来自www.paper51.com

         </tr>

copyright paper51.com

        <tr> 内容来自www.paper51.com

         <td width="40%" valign="bottom">用户名:</td>

paper51.com

         <td valign="bottom"><label>

http://www.paper51.com

           <input name="username" type="text"id="username"> paper51.com

         </label></td>

内容来自论文无忧网 www.paper51.com

       </tr>

内容来自www.paper51.com

        <tr> paper51.com

         <td valign="bottom">密码:</td> 内容来自论文无忧网 www.paper51.com

         <td valign="bottom"><input name="password"type="text" id="password"></td> paper51.com

       </tr> copyright paper51.com

        <tr>

内容来自www.paper51.com

          <tdvalign="bottom">类型:</td> 内容来自www.paper51.com

         <td valign="bottom"><label>

copyright paper51.com

           <select name="type" id="type">

copyright paper51.com

             <option value="个人" selected>个人</option> http://www.paper51.com

             <option value="所属单位">所属单位</option>

paper51.com

                                   </select>

内容来自www.paper51.com

         </label></td>

http://www.paper51.com

       </tr>

内容来自www.paper51.com

        <tr>

http://www.paper51.com

         <td valign="bottom">个人/单位名称:</td>

内容来自论文无忧网 www.paper51.com

         <td valign="bottom"><input name="mingcheng"type="text" id="mingcheng"></td> paper51.com

       </tr>

copyright paper51.com

        <tr>

内容来自论文无忧网 www.paper51.com

         <td valign="bottom">身份证:</td> 内容来自www.paper51.com

         <td valign="bottom"><input name="sfz"type="text" id="sfz"></td>

内容来自论文无忧网 www.paper51.com

       </tr> 内容来自www.paper51.com

        <tr> paper51.com

         <td valign="bottom">地址:</td>

paper51.com

         <td valign="bottom"><input name="dizi"type="text" id="dizi"></td> paper51.com

       </tr>

内容来自论文无忧网 www.paper51.com

        <tr>

copyright paper51.com

         <tdvalign="bottom">邮编:</td> 内容来自论文无忧网 www.paper51.com

         <td valign="bottom"><input name="youbian"type="text" id="youbian"></td>

http://www.paper51.com

       </tr> paper51.com

        <tr> paper51.com

         <td valign="bottom">电话:</td> copyright paper51.com

         <td valign="bottom"><input name="dianhua"type="text" id="dianhua"></td> copyright paper51.com

       </tr> 内容来自论文无忧网 www.paper51.com

        <tr> http://www.paper51.com

         <td>&nbsp;</td> 内容来自www.paper51.com

         <td valign="bottom"><label> copyright paper51.com

           <input type="submit" name="Submit" value="注册">

paper51.com

         </label></td>

paper51.com

       </tr> copyright paper51.com

      </table>

copyright paper51.com

    http://www.paper51.com

      <inputtype="hidden" name="MM_insert" value="form1"> 内容来自www.paper51.com

    </form>

内容来自论文无忧网 www.paper51.com

    </td> 内容来自论文无忧网 www.paper51.com

  </tr> 内容来自www.paper51.com

</table>

内容来自论文无忧网 www.paper51.com

<!--#includefile="foot.htm"-->

内容来自论文无忧网 www.paper51.com

</body>

http://www.paper51.com

</html>

paper51.com

------分隔线----------------------------
联系方式