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

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

http://www.paper51.com

MM_editAction= CStr(Request.ServerVariables("SCRIPT_NAME")) 内容来自www.paper51.com

If(Request.QueryString <> "") Then

paper51.com

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

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

End If

copyright paper51.com

' boolean to abort record edit 内容来自www.paper51.com

DimMM_abortEdit

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

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

%> http://www.paper51.com

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

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

  If (Not MM_abortEdit) Then

http://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 (?, ?, ?, ?, ?, ?, ?,?)"

http://www.paper51.com

    MM_editCmd.Prepared = true http://www.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 copyright 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 内容来自www.paper51.com

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

copyright paper51.com

    MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param6", 201, 1,50, Request.Form("dizi")) ' adLongVarChar http://www.paper51.com

    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 201, 1, 50,Request.Form("youbian")) ' adLongVarChar

paper51.com

    MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param8", 201, 1,50, Request.Form("dianhua")) ' adLongVarChar 内容来自论文无忧网 www.paper51.com

    MM_editCmd.Execute

copyright paper51.com

   MM_editCmd.ActiveConnection.Close

http://www.paper51.com

    ' appendthe query string to the redirect URL http://www.paper51.com

    Dim MM_editRedirectUrl

copyright paper51.com

    MM_editRedirectUrl ="cg.htm"

http://www.paper51.com

    If (Request.QueryString<> "") Then http://www.paper51.com

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

http://www.paper51.com

       MM_editRedirectUrl = MM_editRedirectUrl & "?" &Request.QueryString

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

      Else

内容来自www.paper51.com

       MM_editRedirectUrl = MM_editRedirectUrl & "&" &Request.QueryString

http://www.paper51.com

      End If 内容来自www.paper51.com

    End If 内容来自www.paper51.com

    Response.Redirect(MM_editRedirectUrl)

paper51.com

  End If

http://www.paper51.com

End If 内容来自www.paper51.com

%>

paper51.com

<html>

copyright paper51.com

<head>

内容来自www.paper51.com

<meta http-equiv="Content-Type"content="text/html; charset=gb2312" /> 内容来自论文无忧网 www.paper51.com

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

<styletype="text/css">

copyright paper51.com

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

.x { paper51.com

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

paper51.com

................................................................. color: #000000; copyright paper51.com

................................................................. text-decoration: none; 内容来自论文无忧网 www.paper51.com

} paper51.com

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

................................................................. background-image: url(img/bg1.gif); 内容来自www.paper51.com

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

--> http://www.paper51.com

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

</head> paper51.com

<bodymarginheight="0"  marginwidth="0"topmargin="0" bottommargin="0" > copyright paper51.com

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

http://www.paper51.com

  <tr> paper51.com

    <td><imgsrc="img/1.jpg" width="760"height="160"></td> 内容来自www.paper51.com

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

</table> copyright paper51.com

<tablewidth="760" border="0" align="center"cellpadding="0" cellspacing="0"bgcolor="#FFFFFF"> http://www.paper51.com

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

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

paper51.com

      <tablewidth="400" border="0" cellpadding="0"cellspacing="0" class="x">

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

        <tr> copyright paper51.com

         <td height="25" colspan="2"align="center" valign="middle">用户注册</td> http://www.paper51.com

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

        <tr> paper51.com

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

内容来自www.paper51.com

         <td valign="bottom"><label>

http://www.paper51.com

           <input name="username" type="text"id="username"> 内容来自www.paper51.com

         </label></td>

http://www.paper51.com

       </tr>

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

        <tr>

copyright paper51.com

         <td valign="bottom">密码:</td>

copyright paper51.com

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

paper51.com

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

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

          <tdvalign="bottom">类型:</td>

内容来自www.paper51.com

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

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

http://www.paper51.com

             <option value="个人" selected>个人</option>

paper51.com

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

copyright paper51.com

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

         </label></td>

copyright paper51.com

       </tr>

copyright paper51.com

        <tr>

paper51.com

         <td valign="bottom">个人/单位名称:</td> 内容来自www.paper51.com

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

内容来自www.paper51.com

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

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

         <td valign="bottom">身份证:</td>

内容来自www.paper51.com

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

copyright paper51.com

       </tr> paper51.com

        <tr> paper51.com

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

         <td valign="bottom"><input name="dizi"type="text" id="dizi"></td> 内容来自论文无忧网 www.paper51.com

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

        <tr> paper51.com

         <tdvalign="bottom">邮编:</td> http://www.paper51.com

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

       </tr>

copyright paper51.com

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

         <td valign="bottom">电话:</td>

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

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

       </tr> paper51.com

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

         <td>&nbsp;</td>

paper51.com

         <td valign="bottom"><label>

http://www.paper51.com

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

         </label></td> 内容来自www.paper51.com

       </tr>

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

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

   

paper51.com

      <inputtype="hidden" name="MM_insert" value="form1"> http://www.paper51.com

    </form>

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

    </td> paper51.com

  </tr>

copyright paper51.com

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

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

paper51.com

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

</html> paper51.com

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