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

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

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

copyright paper51.com

<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%> paper51.com

<!--#includefile="Connections/conn.asp" -->

内容来自www.paper51.com

<% http://www.paper51.com

DimMM_editAction

copyright paper51.com

MM_editAction= CStr(Request.ServerVariables("SCRIPT_NAME"))

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

If(Request.QueryString <> "") Then 内容来自www.paper51.com

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

http://www.paper51.com

End If 内容来自www.paper51.com

' boolean to abort record edit

内容来自www.paper51.com

DimMM_abortEdit

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

MM_abortEdit= false

http://www.paper51.com

%>

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

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

If (CStr(Request("MM_insert")) = "form1")Then

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") 内容来自www.paper51.com

    MM_editCmd.ActiveConnection= MM_conn_STRING http://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

copyright paper51.com

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

http://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

copyright 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

内容来自论文无忧网 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 paper51.com

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

http://www.paper51.com

    MM_editCmd.Execute

内容来自www.paper51.com

   MM_editCmd.ActiveConnection.Close 内容来自www.paper51.com

    ' appendthe query string to the redirect URL copyright paper51.com

    Dim MM_editRedirectUrl

内容来自www.paper51.com

    MM_editRedirectUrl ="cg.htm" 内容来自论文无忧网 www.paper51.com

    If (Request.QueryString<> "") Then

copyright paper51.com

      If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) =0) Then copyright paper51.com

       MM_editRedirectUrl = MM_editRedirectUrl & "?" &Request.QueryString

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

      Else copyright paper51.com

       MM_editRedirectUrl = MM_editRedirectUrl & "&" &Request.QueryString

http://www.paper51.com

      End If paper51.com

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

    Response.Redirect(MM_editRedirectUrl) 内容来自www.paper51.com

  End If

copyright paper51.com

End If 内容来自www.paper51.com

%>

copyright paper51.com

<html>

paper51.com

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

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

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

<styletype="text/css">

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

<!--

paper51.com

.x {

paper51.com

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

http://www.paper51.com

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

................................................................. text-decoration: none;

paper51.com

} paper51.com

body {

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

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

}

copyright paper51.com

-->

copyright paper51.com

</style> copyright 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"> 内容来自www.paper51.com

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

    <td><imgsrc="img/1.jpg" width="760"height="160"></td> http://www.paper51.com

  </tr>

http://www.paper51.com

</table>

copyright paper51.com

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

paper51.com

  <tr>

http://www.paper51.com

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

http://www.paper51.com

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

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

         <td height="25" colspan="2"align="center" valign="middle">用户注册</td> 内容来自www.paper51.com

         </tr> copyright paper51.com

        <tr> paper51.com

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

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

           <input name="username" type="text"id="username">

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

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

       </tr> paper51.com

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

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

http://www.paper51.com

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

       </tr>

paper51.com

        <tr>

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

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

         <td valign="bottom"><label> 内容来自www.paper51.com

           <select name="type" id="type"> paper51.com

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

paper51.com

             <option value="所属单位">所属单位</option> 内容来自www.paper51.com

                                   </select>

内容来自www.paper51.com

         </label></td>

http://www.paper51.com

       </tr>

http://www.paper51.com

        <tr>

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

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

paper51.com

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

http://www.paper51.com

       </tr> 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>

copyright paper51.com

        <tr>

copyright paper51.com

         <td valign="bottom">地址:</td> 内容来自www.paper51.com

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

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

        <tr>

paper51.com

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

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

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

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

        <tr>

http://www.paper51.com

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

paper51.com

         <td valign="bottom"><input name="dianhua"type="text" id="dianhua"></td> 内容来自www.paper51.com

       </tr>

内容来自www.paper51.com

        <tr>

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

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

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

           <input type="submit" name="Submit" value="注册"> 内容来自www.paper51.com

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

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

      </table>

paper51.com

    内容来自www.paper51.com

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

    </form>

paper51.com

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

  </tr> paper51.com

</table> copyright paper51.com

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

内容来自www.paper51.com

</body>

http://www.paper51.com

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

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