如何dw做网页

　　用户注册页面要涉及到动态数据库，因为会出现数据回调的情况。　　数据库 students 用到的表 User_info　　User_info 表的字段：　　user_Id，user_Name，passwrod　　login.asp 页面代码如下：　　<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>　　<!--#include file="../Connections/connection.asp" -->　　<!--连接数据库的connection.asp文件包含进来-->　1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768<%　Dim Recordset1__MMColParam　Recordset1__MMColParam = "1"　If (Request.QueryString("user_Id") <> "") Then　Recordset1__MMColParam = Request.QueryString("user_Id")　End If　%>　<%　Dim Recordset1　Dim Recordset1_cmd2　Dim Recordset1_numRows　Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")　Recordset1_cmd.ActiveConnection = MM_connection_STRING　Recordset1_cmd.CommandText = "SELECT * FROM dbo.User_info WHERE user_Id = '"& Request.Form("username") &"'""<!--注意改下你的表，建议不要改，把你的数据库设置成这个样子，不然要改好多地方-->　Set Recordset1 = Recordset1_cmd.Execute　Recordset1_numRows = 0　%>　<%　' *** Validate request to log in to this site.　MM_LoginAction = Request.ServerVariables("URL")　If Request.QueryString <> "" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)　MM_valUsername = Request.Form("username")　If MM_valUsername <> "" Then　Dim MM_fldUserAuthorization　Dim MM_redirectLoginSuccess　Dim MM_redirectLoginFailed　Dim MM_loginSQL　Dim MM_rsUser　Dim MM_rsUser_cmd　Dim shenfen　Dim mingzi　MM_fldUserAuthorization = ""　MM_redirectLoginSuccess = "####.asp"<!--连接成功转至页面-->　MM_redirectLoginFailed = "login.asp"<!--连接不成功转至页面-->　MM_loginSQL = "SELECT user_Id,passwrod"　If MM_fldUserAuthorization <> "" Then MM_loginSQL = MM_loginSQL & "," & MM_fldUserAuthorization　MM_loginSQL = MM_loginSQL & " FROM dbo.User_info WHERE user_Id = ? AND passwrod = ?"　Set MM_rsUser_cmd = Server.CreateObject ("ADODB.Command")　MM_rsUser_cmd.ActiveConnection = MM_connection_STRING　MM_rsUser_cmd.CommandText = MM_loginSQL　MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param1", 200, 1, 10, MM_valUsername) ' adVarChar　MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param2", 200, 1, 20, Request.Form("password")) ' adVarChar　MM_rsUser_cmd.Prepared = true　Set MM_rsUser = MM_rsUser_cmd.Execute　If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then　' username and password match - this is a valid user　Session("MM_Username") = MM_valUsername　If MM_valUsername <>"" Then　shenfen = Recordset1.Fields.Item("status").Value　mingzi = Recordset1.Fields.Item("user_Name").Value　session("shenfen")=shenfen　session("mingzi")=mingzi　End If　If (MM_fldUserAuthorization <> "") Then　Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)　Else　Session("MM_UserAuthorization") = ""　End If　if CStr(Request.QueryString("accessdenied")) <> "" And false Then　MM_redirectLoginSuccess = Request.QueryString("accessdenied")　End If　MM_rsUser.Close　Response.Redirect(MM_redirectLoginSuccess)　End If　MM_rsUser.Close　Response.Redirect(MM_redirectLoginFailed)　End If　%>